📄 menu.asp
字号:
<!--#include file = include.asp--><head>
<title>天创商务网客户资源管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<style>
a {font-family:"verdana", "arial", "helvetica", "sans-serif"; font-size:12px; color:#ffffff; text-decoration:none;;}
a:hover {text-decoration:none; color:#ffffff;}
</style>
<script language=JavaScript>
function about()
{
window.showModalDialog("about.asp","ABOUT","dialogwidth:300px;dialogheight:150px;center:yes;status:no;scroll:no;help:no");
}
if(top==self)document.location="manage.asp";
var img1 = new Image();img1.src = "images/list.gif";
var img2 = new Image(); img2.src = "images/list2.gif";
function doOutline()
{var srcId, srcElement, targetElement,srcNum,toggleElement,toggleImage;
srcElement = window.event.srcElement;
if(srcElement.className.toUpperCase()=="LEVEL1")
{srcID=srcElement.id.substr(0, srcElement.id.length-1);
targetElement=document.all(srcID + "s");
srcElement=document.all(srcID + "i");
srcNum=srcElement.id.substr( 3, 1);
if(targetElement.style.display == "none"){
for(i=0; i<10; i++){if(srcNum == i){
targetElement.style.display = "";
if (srcElement.className == "LEVEL1") srcElement.src = img2.src;
}else{
toggleElement = document.all("out" + i + "s");
toggleImage = document.all("out" + i + "i");
}}
}else{
targetElement.style.display = "none";
if (srcElement.className == "LEVEL1") srcElement.src = img1.src;
}}}
document.onclick = doOutline;
</script>
<%
set rs = server.createobject("adodb.recordset")
sql = "select BigClass from bigclass order by id desc "
rs.open sql,conn,1,1
%>
<body bgcolor=#4D9CC8 background="" leftmargin=0>
<table width=134 border=0 height=100%>
<tr valign=top height=100%>
<td><font color="#FFFFFF">V1.0版 开发：沈晓明</font><br>
<br>
<%
if rs.recordcount=0 then
response.write("<font color=red>你没有添加区域</font><br>")
end if
dim x
x=10
while not rs.eof
x=x+1
BigClass=rs("BigClass")
if x=11 then
response.write(" <A class=Level1 id=OUT"&x&"t style=""cursor: hand""><img class=LEVEL1 id=OUT"&x&"i src=images/list.gif border=0 align=absMiddle> "&rs("BigClass")&"</a><br>")
else
response.write(" <A class=Level1 id=OUT"&x&"t style=""cursor: hand""><img class=LEVEL1 id=OUT"&x&"i src=images/list.gif border=0 align=absMiddle> "&rs("BigClass")&"</a><br>")
end if
response.write(" <div class=chn id=OUT"&x&"s style=""DISPLAY: none""> ")
set rsSmallClass = server.createobject("adodb.recordset")
rsSmallClass.source = "select SmallClass from SmallClass where BigClass='"&BigClass&"'"
rsSmallClass.open rsSmallClass.source,conn,1,1
while not rsSmallClass.eof
rsSmallClass.movenext
if rsSmallClass.eof then
rsSmallClass.moveprevious
response.write("├ <A href=NewsManage.asp?SmallClass="&rsSmallClass("SmallClass")&"&BigClass="&BigClass&" target=main><font color=000000>"&rsSmallClass("SmallClass")&"</A>")
else
rsSmallClass.moveprevious
response.write("├ <A href=NewsManage.asp?SmallClass="&rsSmallClass("SmallClass")&"&BigClass="&BigClass&" target=main><font color=000000>"&rsSmallClass("SmallClass")&"</A><br> ")
end if
rsSmallClass.movenext
wend
response.write("</div>")
rsSmallClass.Close
rs.movenext
wend
rs.close
%> <A class=Level1 id=OUT1t style="cursor: hand"><img class=LEVEL1 id=OUT1i src=images/list.gif border=0 align=absMiddle > 控制面板</a><br>
<div class=chn id=OUT1s style="DISPLAY: none"><font color=000000> ├ <A href=ClassManage.asp target=main><font color=000000>栏目管理</font></A><br>
├ <a href="ServerManage.asp" target=main><font color=000000>业务管理</font></A>
<br>
├ <A href=UserManage.asp target=main><font color=000000>用户管理</font></A><br>
├ <A href=LogManage.asp target=main><font color=000000>日志管理 </font></A>
<br>
├ <A href=Recycle.asp target=main><font color=000000>回收站 </font></A>
</font><font color=000000><br>
</font><A class=Level1 id=OUT2t style="cursor: hand"> <img class=LEVEL1 id=OUT2i src=images/list.gif border=0 align=absMiddle width="11" height="11" > 系统管理</a><br>
</div>
<div class=chn id=OUT2s style="DISPLAY: none"><font color=000000> ├ <A href=BackupDatabase.asp target=main><font color=000000>数据备份</font></A>
</font><br>
<a href="Logout.asp" target=main><IMG src=images/list2.gif border=0 align=absMiddle width="11" height="11" ><font color=ffffff>
退出系统</font></a> </div>
</td>
</tr>
</table>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -