📄 menu.asp
字号:
<%
if session("Flag")=1 then
color="#000000"
elseif session("Flag")=2 then
color="#000000"
else
color="#CCCCCC"
end if
if session("Flag")=1 then
colorx="#000000"
else
colorx="#CCCCCC"
end if
REM 管理栏目设置
dim menu(6,10)
menu(0,0)="常规设置"
menu(0,1)="<a href=webconfig.asp target=right><font color="&colorx&">网站设置</a> | <a href=Err.asp target=right><font color="&colorx&">系统设置</a>"
menu(0,2)="<a href=ManagePostalcode.asp target=right><font color="&colorx&">邮编设置</a> | <a href=Err.asp target=right><font color="&colorx&">浮动价格</a>"
menu(0,3)="<a href=Deliver_Pay.asp?action=songhuo target=right><font color="&colorx&">送货/汇款</a> | <a href=Err.asp target=right><font color="&colorx&">其它信息</a>"
menu(0,4)="<a href=links.asp target=right><font color="&colorx&">合作伙伴</a> | <a href=Err.asp target=right><font color="&colorx&">广告设置</a>"
menu(1,0)="商品管理"
menu(1,1)="<a href=addbook.asp target=right>添加商品</a> | <a href=Err.asp target=right>查看修改</a>"
menu(1,2)="<a href=Err.asp target=right><font color="&color&">品牌管理</a> | <a href=err.asp target=right><font color="&color&">单位管理</a>"
menu(1,3)="<a href=Err.asp target=right><font color="&color&">大类管理</a> | <a href=nclass.asp target=right><font color="&color&">小类管理</a>"
menu(1,4)="<a href=moveclass.asp target=right><font color="&color&">类别转移</a>"
menu(1,5)="<a href=ManageReview.asp?action=all target=right><font color=red>评论管理</a></font> | <a href=editorderform.asp?zhuangtai=0 target=right><font color="&color&"><font color=Red>订单管理</font></a>"
menu(2,0)="信息管理"
menu(2,1)="<a href=Err.asp target=right><font color="&color&">添加新闻</a> | <a href=editnews.asp target=right><font color="&color&">管理新闻</a>"
menu(2,2)="<a href=bulletin.asp target=right><font color="&color&">公告设置</a> | <a href=viewgbook.asp target=right><font color=red>客户意见</a></font>"
menu(2,3)="<a href=ManageStat.asp target=right><font color="&color&">访问计数</a> | <a href=ManageVote.asp target=right><font color="&color&">投票管理</a>"
menu(2,4)="<a href=Err.asp target=right><font color=#00HHFF>销售统计</font></a>| <a href=Err.asp target=right><font color="&color&"><font color=#00HHFF>邮件群发</font></a>"
menu(3,0)="VIP管理"
menu(3,1)="<a href=Err.asp target=right>添加奖品</a> | <a href=Err.asp target=right>查看修改</a>"
menu(3,2)="<a href=Err.asp target=right><font color="&color&">积分兑奖</a> | <a href=Err.asp target=right><font color="&color&">VIP 说明</a>"
menu(3,3)="<a href=Err.asp target=right><font color="&color&">VIP 活动</a> | <a href=Err.asp target=right><font color="&color&">幸运 VIP</a>"
menu(4,0)="用户管理"
menu(4,1)="<a href=manageuser.asp?action=all target=right>注册用户</a>"
menu(4,2)="<a href=Err.asp target=right>幸运VIP用户</a>"
menu(4,3)="<a href=manageadmin.asp target=right><font color="&color&">系统用户</a>"
menu(5,0)="省市管理"
menu(5,1)="<a href=ManageProvince.asp target=right><font color="&color&">省管理</a> | <a href=ManageCity.asp target=right><font color="&color&">市管理</a>"
menu(6,0)="数据处理(Access)"
menu(6,1)="<a href=Err.asp target=right><font color="&colorx&">数据库更名</a> | <a href=Err.asp target=right><font color="&colorx&">备 份</a>"
menu(6,2)="<a href=Err.asp target=right><font color="&colorx&">数据库压缩</a> | <a href=Err.asp target=right><font color="&colorx&">恢 复</a>"
menu(6,3)="<a href=Err.asp target=right><font color="&color&">系统空间占用</a>"
menu(6,4)="<a href=Err.asp target=right><font color="&color&">服务器环境</a>"
menu(6,5)="<a href=Err.asp target=right><font color="&colorx&">管理远程文件</a>"
%>
<title>管理页面</title>
<META content="MSHTML 5.00.3315.2870" name=GENERATOR>
<style type=text/css>
<!--
BODY{
margin:0px;
FONT-SIZE: 12px;
FONT-FAMILY: "宋体", "Verdana", "Arial", "Helvetica", "sans-serif";
background-color: #BEBFD9;
scrollbar-face-color: #EAEAF2;
scrollbar-highlight-color: #FFFFFF;
scrollbar-shadow-color: #9395C0;
scrollbar-3dlight-color: #F3F3F8;
scrollbar-arrow-color: #9395C0;
scrollbar-track-color: #F3F3F8;
scrollbar-darkshadow-color: #F3F3F8;
}
table { border:0px; }
td { font:normal 12px 宋体; }
img { vertical-align:bottom; border:0px; }
a { font:normal 12px 宋体; color:#111111; text-decoration:none; }
a:hover { color:#6C70AA;text-decoration:underline; }
.sec_menu { border-left:1px solid white; border-right:1px solid white; border-bottom:1px solid white; overflow:hidden; background:#FBFBFC; }
.menu_title { }
.menu_title span { position:relative; top:2px; left:8px; color:#4A4F80; font-weight:bold; }
.menu_title2 { }
.menu_title2 span { position:relative; top:2px; left:8px; color:#596099; font-weight:bold; }
input,select,Textarea{
font-family:宋体,Verdana, Arial, Helvetica, sans-serif; font-size: 12px;}
}
-->
</style>
<SCRIPT language=javascript1.2>
function showsubmenu(sid)
{
whichEl = eval("submenu" + sid);
if (whichEl.style.display == "none")
{
eval("submenu" + sid + ".style.display=\"\";");
}
else
{
eval("submenu" + sid + ".style.display=\"none\";");
}
}
</SCRIPT>
<BODY leftmargin="0" topmargin="0" marginheight="0" marginwidth="0">
<table width=100% cellpadding=0 cellspacing=0 border=0 align=left>
<tr>
<td valign=top> <table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=42 valign=bottom> <img src="images/admin_title.gif" width=158 height=38>
</td>
</tr>
</table>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background=images/title_bg_quit.gif >
<span><a href="index.asp" target=_top><b>管理首页</b></a> | <a href="logout.asp" target=_top><b>退出</b></a></span>
</td>
</tr>
<tr>
<td style="display:"> <div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
<tr>
<td height=20>用户名：<font color=red><%=session("Admin")%></font>|<a href=renpassword.asp target=right><font color=red>修改密码</font></a></td>
</tr>
<tr>
<td height=20>身 份：<font color=red><%
select case session("Flag")
case 1
response.write "系统CEO (站长)"
case 2
response.write "管理员"
case 3
response.write "业务员"
end select
%> </font></td>
</tr></table></td>
</table>
<div style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
<tr>
<td height=10></td>
</tr>
</table>
</div>
<%
dim j,i
dim tmpmenu
dim menuname
dim menurl
for i=0 to ubound(menu,1)
%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background="images/title_bg_show.gif" id=menuTitle1 onclick="showsubmenu(<%=i%>)">
<span><%=menu(i,0)%></span> </td>
</tr>
<tr>
<td <%if i=1 or i=2 then%> style="display:" <%else%> style="display:none" <%end if%> id='submenu<%=i%>'>
<!--<td style="display:none" id='submenu<%=i%>'>-->
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
<%
for j=1 to ubound(menu,2)
if isempty(menu(i,j)) then exit for
%>
<tr><td height=20><img src=images/bullet.gif border=0><%=menu(i,j)%></td></tr>
<%
next
%>
</table>
</div>
<div style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
<tr><td height=10></td></tr>
</table>
</div>
</td>
</tr>
</table>
<%next%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background="images/admin_left_2.gif" id=menuTitle1>
<span>系统信息</span> </td>
</tr>
<tr>
<td> <div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
<tr>
<td height=20><br>
版权所有:<BR>
彭方春<BR>
<BR>
官方网站:<BR>
http://d.lstc.edu.cn/jkx/05360108/<BR>
<BR></td>
</tr>
</table>
</div></td>
</tr>
</table><BR>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -