手机WAP编程

开发平台：
ASP/ASPX

admin_menu1.asp：源码内容
							<!--#include file="admin_sb.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="images/css.css" type=text/css rel=stylesheet>
<title></title>
<STYLE type=text/css>
BODY {
	BACKGROUND: #799ae1;
	MARGIN: 0px;
	FONT: 9pt 宋体;
	scrollbar-face-color: #DEE3E7;
	scrollbar-highlight-color: #FFFFFF;
	scrollbar-shadow-color: #DEE3E7;
	scrollbar-3dlight-color: #D1D7DC;
	scrollbar-arrow-color:  #006699;
	scrollbar-track-color: #EFEFEF;
	scrollbar-darkshadow-color: #98AAB1;
	background-color: #FF66FF;
}
TABLE {
	BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px
}
TD {
	FONT: 12px 宋体
}
IMG {
	BORDER-RIGHT: 0px; BORDER-TOP: 0px; VERTICAL-ALIGN: bottom; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px
}
A {
	FONT: 12px 宋体; COLOR: #215dc6; TEXT-DECORATION: none
}
A:hover {
	COLOR: #428eff
}
.sec_menu {
	BORDER-RIGHT: white 1px solid; BACKGROUND: #d6dff7; OVERFLOW: hidden; BORDER-LEFT: white 1px solid; BORDER-BOTTOM: white 1px solid
}
.menu_title {
	
}
.menu_title SPAN {
	FONT-WEIGHT: bold; LEFT: 8px; COLOR: #215dc6; POSITION: relative; TOP: 2px
}
.menu_title2 {
	
}
.menu_title2 SPAN {
	FONT-WEIGHT: bold; LEFT: 8px; COLOR: #428eff; POSITION: relative; TOP: 2px
}
</STYLE>
<SCRIPT language=javascript>
  var whichOpen="";				//展开的菜单
  var whichContinue='';			//继续执行的菜单
function menuShow(obj,maxh,obj2)			//显示出动态菜单
{
  if(obj.style.pixelHeight<maxh)
  {
    obj.style.pixelHeight+=maxh/10;
	obj.filters.alpha.opacity+=10;
	obj2.background="images/title_bg_hide.gif";
    if(obj.style.pixelHeight==maxh/5)
	  obj.style.display='block';
	myObj=obj;
	myMaxh=maxh;
	myObj2=obj2;
	setTimeout('menuShow(myObj,myMaxh,myObj2)','4');
  }
}
function menuHide(obj,maxh,obj2)			//菜单的隐藏
{
  if(obj.style.pixelHeight>0)
  {
    if(obj.style.pixelHeight==maxh/10)
	  obj.style.display='none';
    obj.style.pixelHeight-=maxh/10;
	obj.filters.alpha.opacity-=10;
	obj2.background="images/title_bg_show.gif";
	myObj=obj;
	myMaxh=maxh
	myObj2=obj2;
	setTimeout('menuHide(myObj,myMaxh,myObj2)','5');
  }
  else
    if(whichContinue)
	  whichContinue.click();
}
function menuChange(obj,maxh,obj2)	  			//菜单状态的跳转
{
  if(obj.style.pixelHeight)									//如果该菜单已经展开,则收进菜单
  {
    menuHide(obj,maxh,obj2);
	whichOpen='';
	whichcontinue='';
  }	
  else																	//该菜单没有展开
    if(whichOpen)												//有别的菜单展开,则将其收回
	{
	  whichContinue=obj2;
      whichOpen.click();										//模拟鼠标的点击,相当于一个递归调用	
	}
	else
	{
	  menuShow(obj,maxh,obj2);
	  whichOpen=obj2;
	  whichContinue='';
	}
}
var tt='start';
var ii='start';
function turnit(ss,bb) {
  if (ss.style.display=="none") {
    if(tt!='start') tt.style.display="none";
    if(ii!='start') ii.src="dian.gif";
    ss.style.display="";
    tt=ss;
    ii=bb;
    bb.src="ball.gif";
  }
  else {
    ss.style.display="none"; 
    bb.src="dian.gif";
  }
}
function openWindow(url) {
  popupWin = window.open(url, 'new_page', 'width=400,height=410,scrollbars')
}
</SCRIPT>
</head>
<body leftmargin="0" topmargin="0">
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=left border=0> 
<TBODY>
  <TR>
    <TD vAlign=top>
      <TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
          <TD vAlign=bottom height=42><IMG height=38 
            src="images/title.gif" width=178> 
	  </TD>
	</TR>
	</TBODY>
      </TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
            <TD class=menu_title onmouseover="this.className='menu_title2';" 
          	onmouseout="this.className='menu_title';" 
          	background="images/title_bg_quit.gif" 
            	height=25><SPAN><a href="admin_index.asp" target="_top"><B>管理中心</B></A>/<a href="admin_login_out.asp" target="_parent"><B>退出</B></A></SPAN> 
            </TD>
        </TR>
                         </TBODY>
                </TABLE>&nbsp;
      <TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
            <TD class=menu_title id=menuTitle1 
          onmouseover="this.className='menu_title2';" 
          onclick=menuChange(menu1,150,menuTitle1); 
          onmouseout="this.className='menu_title';" 
          background="images/title_bg_show.gif" 
            height=25><SPAN>站点管理</SPAN> </TD>
          </TR>
        <TR>
          <TD>
            <DIV class=sec_menu id=menu1 
            style="DISPLAY: none; FILTER: alpha(Opacity=0); WIDTH: 158px; HEIGHT: 0px">
                <TABLE style="POSITION: relative; top: 10px;" cellSpacing=0 
            cellPadding=0 width=135 align=center>
                  <TBODY>
                    <TR>
                      <TD height=20><a href="admin_lb.asp" target="mainFrame">列表方式</a></TD>
                    </TR>
                    
                    <TR>
                      <TD height=20><a href="admin_lbfs.asp" target="mainFrame">列表分页</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="admin_yl.asp" target="mainFrame">预览方式</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="tjlm.asp" target="mainFrame">添加栏目</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="admin1.asp" target="mainFrame">源码察看</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="adminuser.asp" target="mainFrame">帐号管理</a></TD>
                    </TR>
                    </TBODY>
                </TABLE>
 
              </DIV></TD></TR></TBODY></TABLE>&nbsp; 
      <TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
            <TD class=menu_title id=menuTitle9
          onmouseover="this.className='menu_title2';" 
          onclick=menuChange(menu1,150,menuTitle9); 
          onmouseout="this.className='menu_title';" 
          background="images/title_bg_show.gif" 
            height=25><SPAN>站点管理</SPAN> </TD>
          </TR>
        <TR>
          <TD>
            <DIV class=sec_menu id=menu9
            style="DISPLAY: none; FILTER: alpha(Opacity=0); WIDTH: 158px; HEIGHT: 0px">
                <TABLE style="POSITION: relative; top: 10px;" cellSpacing=0 
            cellPadding=0 width=135 align=center>
                  <TBODY>
                    <TR>
                      <TD height=20><a href="admin_lb.asp" target="mainFrame">列表方式</a></TD>
                    </TR>
                    
                    <TR>
                      <TD height=20><a href="admin_lbfs.asp" target="mainFrame">列表分页</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="admin_yl.asp" target="mainFrame">预览方式</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="tjlm.asp" target="mainFrame">添加栏目</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="admin1.asp" target="mainFrame">源码察看</a></TD>
                    </TR>
                    <TR>
                      <TD height=20><a href="adminuser.asp" target="mainFrame">帐号管理</a></TD>
                    </TR>
                    </TBODY>
                </TABLE>
 
              </DIV></TD></TR></TBODY></TABLE>&nbsp; 
      <TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
            <TD class=menu_title id=menuTitle7 
          onmouseover="this.className='menu_title2';" 
          onclick=menuChange(menu7,110,menuTitle7); 
          onmouseout="this.className='menu_title';" 
          background="images/title_bg_show.gif" 
            height=25><SPAN>数据库管理(Access)</SPAN> </TD>
          </TR>
        <TR>
          <TD>
            <DIV class=sec_menu id=menu7 
            style="DISPLAY: none; FILTER: alpha(Opacity=0); WIDTH: 158px; HEIGHT: 0px"> 
                <TABLE style="POSITION: relative; TOP: 10px;" cellSpacing=0 
            cellPadding=0 width=135 align=center>
                  <TBODY>
				    <TR><TD height=20>
                <A    href="admin_db_compact.asp" target="mainFrame">压缩数据库</A>
				</TD></TR>
				<TR><TD height=20>
                <A    href="admin_db_backup.asp" target="mainFrame">备份数据库</A>
				</TD></TR>
				<TR>
				<TR><TD height=20>
                <A    href="admin_db_ubackup.asp" target="mainFrame">还原数据库</A>
				</TD></TR>
				<TR>
				<TD height=20>
                <A    href="admin_db_executesql.asp" target="mainFrame">执行SQL语句</A>
				</TD></TR>
              <TR>
                      <TD height=20> <A    href="admin_db_space.asp" target="mainFrame">系统空间占用</A> 
                      </TD>
                    </TR>
				   </TBODY></TABLE></DIV></TD></TR></TBODY></TABLE>
      　<TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
            <TD class=menu_title id=menuTitlex 
          onmouseover="this.className='menu_title2';" 
          onclick=menuChange(menux,50,menuTitlex); 
          onmouseout="this.className='menu_title';" 
          background="images/title_bg_show.gif" 
            height=25><SPAN>其他>></SPAN> </TD>
          </TR>
        <TR>
          <TD>
            <DIV class=sec_menu id=menux 
            style="DISPLAY: none; FILTER: alpha(Opacity=0); WIDTH: 158px; HEIGHT: 0px"> 
                <TABLE style="POSITION: relative; TOP: 10px;" cellSpacing=0 
            cellPadding=0 width=135 align=center>
                  <TBODY>
				    <TR><TD height=20>
                <A    href="admin_body.htm" target="mainFrame">帮助文档</A>
				</TD></TR>
				<TR>
				      <TD height=20>
                <A    href="aspcheck.asp" target="mainFrame">程序探测</a>
                      </TD>
				</TR>
		</TBODY></TABLE></DIV></TD></TR></TBODY></TABLE>&nbsp; 
      <TABLE cellSpacing=0 cellPadding=0 width=158 align=center>
        <TBODY>
        <TR style="CURSOR: hand">
            <TD class=menu_title id=menuTitle8 
          onmouseover="this.className='menu_title2';" 
          onmouseout="this.className='menu_title';" 
          background="images/title_bg_show.gif" 
            height=25><SPAN>技术支持</SPAN> </TD>
          </TR>
        <TR>
            <TD align="center"> 
              <DIV class=sec_menu id=menu8 
            style="FILTER: alpha(Opacity=100); WIDTH: 158px; HEIGHT:40px"><a href="http://www.gotf.cn/" target="_blank"><br>
                </a>掌上校园技术支持<br>
                 </DIV></TD></TR></TBODY></TABLE>
  </table>  
</body>   
</html>

						