admin_index_left.asp
来自「利用C++编写的网络跟踪代码」· ASP 代码 · 共 534 行 · 第 1/2 页
ASP
534 行
<%@language=vbscript codepage=936 %>
<%
option explicit
response.buffer=true
Const PurviewLevel=0
%>
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="Admin_ChkPurview.asp"-->
<html>
<head>
<title>QQ免费资源网后台管理</title>
<style type=text/css>
body { background:#333333; margin:0px; font:9pt 宋体; FONT-SIZE: 9pt;text-decoration: none;
table { border:0px; }
td { font:normal 12px 宋体; }
img { vertical-align:bottom; border:0px; }
a { font:normal 12px 宋体; color:#000000; text-decoration:none; }
a:hover { color:#cc0000;text-decoration:underline; }
.sec_menu { border-left:1px solid white; border-right:1px solid white; border-bottom:1px solid white; overflow:hidden; background:#E8E8E8; }
.menu_title { }
.menu_title span { position:relative; top:2px; left:8px; color:#333333; font-weight:bold; }
.menu_title2 { }
.menu_title2 span { position:relative; top:2px; left:8px; color:#cc0000; font-weight:bold; }
</style>
<STYLE type=text/css>
BODY {
SCROLLBAR-FACE-COLOR: #E4E4E4; SCROLLBAR-HIGHLIGHT-COLOR: #cccccc; SCROLLBAR-SHADOW-COLOR: #828282; SCROLLBAR-3DLIGHT-COLOR: #ffffff; SCROLLBAR-ARROW-COLOR: #797979; SCROLLBAR-TRACK-COLOR: #ECECEC; SCROLLBAR-DARKSHADOW-COLOR: #ffffff
}
.style1 {color: #FF0000}
.style2 {color: #0000FF}
.STYLE3 {color: #000000}
</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>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<BODY leftmargin="0" topmargin="0" marginheight="0" marginwidth="0">
<table width=158 border="0" align=center cellpadding=0 cellspacing=0>
<tr>
<td height=42 valign=bottom>
<table width="100%" height="25" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC">
<tr>
<td><div align="center"><strong>后台管理</strong></div></td>
</tr>
</table>
<br>
</td>
</tr>
</table>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 bgcolor="#B9B9B9" class=menu_title id=menuTitle0 onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title';>
<span><a href="Admin_Index_Main.asp" target=main><b>管理首页</b></a> | <a href=Admin_logout.asp target=_top><b>退出</b></a></span>
</td>
</tr>
<tr>
<td style="display:" id='submenu0'>
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr><td height=20>用户名：<%=AdminName%></td></tr>
<tr><td height=20>权 限：<%
select case AdminPurview
case 1
response.write "超级管理员"
case 2
response.write "<a href=Admin_ShowPurview.asp target=main>普通管理员</a>"
end select
%></td></tr>
</table>
</div>
<div style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr><td height=20></td></tr>
</table>
</div>
</td>
</tr>
</table>
<%if AdminPurview=1 or AdminPurview_Article<=3 then%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 bgcolor="#B9B9B9" class=menu_title id=menuTitle1 style="cursor:hand;" onClick="showsubmenu(1)" onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title';>
<span>文章管理</span> </td>
</tr>
<tr>
<td style="display:" id='submenu1'>
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr><td height=20><a href=Admin_ArticleAdd2.asp target=main>添加文章（高级模式）</a></td></tr>
<tr><td height=20><a href=Admin_ArticleManage.asp?ManageType=MyArticle target=main>我发表的文章</a></td></tr>
<tr><td height=20><a href=Admin_ArticleManage.asp target=main>文章管理</a>
| <a href=Admin_ArticleCheck.asp target=main>审核</a></td></tr>
<%if AdminPurview=1 or AdminPurview_Article<=2 then%>
<tr><td height=20><a href=Admin_ArticleManageSpecial.asp target=main>专题文章管理</a></td></tr>
<%end if%>
<%if AdminPurview=1 or AdminPurview_Article=1 then%>
<tr><td height=20><a href=Admin_ArticleRecyclebin.asp target=main>文章回收站管理</a></td></tr>
<tr><td height=20><a href=Admin_ArticleComment.asp target=main>文章评论管理</a></td></tr>
<tr><td height=20><a href=Admin_Class_Article.asp?Action=Add target=main>文章栏目添加</a> | <a href=Admin_Class_Article.asp target=main>管理</a></td></tr>
<tr><td height=20><a href=Admin_Special.asp?Action=Add target=main>文章专题添加</a> | <a href=Admin_Special.asp target=main>管理</a></td></tr>
<%end if%>
</table>
</div>
<div style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr><td height=20></td></tr>
</table>
</div>
</td>
</tr>
</table>
<%
end if
if AdminPurview=1 or AdminPurview_Soft<=3 then
%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 bgcolor="#B9B9B9" class=menu_title id=menuTitle21 style="cursor:hand;" onClick="showsubmenu(21)" onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title';>
<span>下载管理</span> </td>
</tr>
<tr>
<td style="display:" id='submenu21'>
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr>
<td height=20><a href=Admin_SoftAdd.asp target=main>添加软件（高级模式）</a></td>
</tr>
<tr><td height=20><a href=Admin_SoftManage.asp?ManageType=MySoft target=main>我添加的软件</a></td></tr>
<tr>
<td height=20><a href=Admin_SoftManage.asp target=main>软件管理</a> | <a href=Admin_SoftCheck.asp target=main>审核</a></td>
</tr>
<%if AdminPurview=1 or AdminPurview_Soft=1 then%>
<tr>
<td height=20><a href=Admin_SoftRecyclebin.asp target=main>软件回收站管理</a></td>
</tr>
<tr>
<td height=20><a href=Admin_SoftComment.asp target=main>软件评论管理</a></td>
</tr>
<tr>
<td height=20><a href=Admin_Class_Soft.asp?Action=Add target=main>下载栏目添加</a>
| <a href=Admin_Class_Soft.asp target=main>管理</a></td>
</tr>
<%end if%>
</table>
</div>
<div style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr><td height=20></td></tr>
</table>
</div>
</td>
</tr>
</table>
<%
end if
if AdminPurview=1 or AdminPurview_Photo<=3 then
%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 bgcolor="#B9B9B9" class=menu_title id=menuTitle31 style="cursor:hand;" onClick="showsubmenu(31)" onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title';>
<span>图片管理</span> </td>
</tr>
<tr>
<td style="display:" id='submenu31'>
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr>
<td height=20><a href=Admin_PhotoAdd.asp target=main>添加图片（高级模式）</a></td>
</tr>
<tr><td height=20><a href=Admin_PhotoManage.asp?ManageType=MyPhoto target=main>我添加的图片</a></td></tr>
<tr><td height=20><a href=Admin_PhotoManage.asp target=main>图片管理</a> | <a href=Admin_PhotoCheck.asp target=main>审核</a>
</td></tr>
<%if AdminPurview=1 or AdminPurview_Photo=1 then%>
<tr>
<td height=20><a href=Admin_PhotoRecyclebin.asp target=main>图片回收站管理</a></td>
</tr>
<tr><td height=20><a href=Admin_PhotoComment.asp target=main>图片评论管理</a></td></tr>
<tr>
<td height=20><a href=Admin_Class_Photo.asp?Action=Add target=main>图片栏目添加</a>
| <a href=Admin_Class_Photo.asp target=main>管理</a></td>
</tr>
<%end if%>
</table>
</div>
<div style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<tr><td height=20></td></tr>
</table>
</div>
</td>
</tr>
</table>
<%
end if
PurviewPassed=False
arrPurview(0)=CheckPurview(AdminPurview_Others,"Channel")
arrPurview(1)=CheckPurview(AdminPurview_Others,"AD")
arrPurview(2)=CheckPurview(AdminPurview_Others,"FriendSite")
arrPurview(3)=CheckPurview(AdminPurview_Others,"Announce")
arrPurview(4)=CheckPurview(AdminPurview_Others,"Vote")
arrPurview(5)=CheckPurview(AdminPurview_Others,"Count")
for PurviewIndex=0 to 5
if arrPurview(PurviewIndex)=True then
PurviewPassed=True
exit for
end if
next
if AdminPurview=1 or PurviewPassed=True then
%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
<tr>
<td height=25 bgcolor="#CCCCCC" class=menu_title id=menuTitle2 style="cursor:hand;" onClick="showsubmenu(2)" onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title';>
<span>常规设置</span> </td>
</tr>
<tr>
<td style="display" id='submenu2'>
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=130>
<%if AdminPurview=1 then%>
<tr>
<td height=20><a href=Admin_SiteConfig.asp target=main>网站信息配置</a>
| <a href=Admin_SiteConfig.asp target=main>选项</a></td>
</tr>
<%
end if
if AdminPurview=1 or arrPurview(0)=True then
%>
<tr>
<td height=20><a href=Admin_Channel.asp?Action=Add target=main>网站频道添加</a>
| <a href=Admin_Channel.asp target=main>管理</a></td>
</tr>
<%
end if
if AdminPurview=1 or arrPurview(1)=True then
%>
<tr>
<td height=20><a href=Admin_Advertisement.asp?Action=Add target=main>网站广告添加</a>
| <a href=Admin_Advertisement.asp target=main>管理</a></td>
</tr>
<%
end if
if AdminPurview=1 or arrPurview(2)=True then
%>
<tr>
<td height=20><a href=Admin_FriendSite.asp?Action=Add target=main>友情链接添加</a>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?