📄 admin_index.asp
字号:
<tr class="tdbg"><td height="20"> <a href="Admin_User.asp?Action=Update" target="main">更新用户数据</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_User.asp" target="main">用户资料(权限)管理</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_UserGroup.asp?Action=Add" target="main">用户组添加</a>
| <a href="Admin_UserGroup.asp" target="main">管理</a></td></tr>
<%end if%>
<%if TrueCz then%>
<tr class="tdbg"><td height="20"> <a href="Admin_UserCz.asp?Action=AddMore" target="main">充值卡添加</a>
| <a href="Admin_UserCz.asp" target="main">管理</a></td></tr>
<%end if%>
<%if Cl.Admin_Purview(0)=1 then%>
<%if SysTemVersion>10 then%>
<tr class="tdbg"><td height="20"> <a href="Admin_PassIP.asp?Action=Add" target="main">全站通IP管理</a>
| <a href="Admin_PassIP.asp" target="main">管理</a></td></tr>
<%end if%>
<tr class="tdbg"><td height="20"> <a href="Admin_Admin.asp?Action=Add" target="main">管理员添加</a>
| <a href="Admin_Admin.asp" target="main">管理</a></td></tr>
<%end if%>
</table>
<table cellpadding="0" cellspacing="0" align="center" width="100%">
<tr><td height="15"></td></tr>
</table>
</td>
</tr>
</table>
<%end if%>
<%if TrueLinkSite then%>
<table cellpadding="0" cellspacing="0" width="158" align="center">
<tr width="100%">
<td height="25" class="menu_title" onmouseover="this.className='menu_title2';" onmouseout="this.className='menu_title';" background="Images/admin_left.gif" onclick="showsubmenu(51)" style="cursor:hand;"><span><img src="Images/open.gif" style="float:left;margin:2 5 0px;" id="imgMenu51" align="absmiddle" alt="" />友情链接管理</span></td>
</tr>
<tr>
<td style="width:100%;display:none" id="submenu51">
<table class="sec_menu" cellpadding="0" cellspacing="1" align="center" width="100%">
<tr class="tdbg"><td height="20"> <a href="Admin_LinkSite.asp?Action=Add" target="main">友情链接添加</a> | <a href="Admin_LinkSite.asp" target="main">管理</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_LinkClass.asp?Action=Add" target="main">链接栏目添加</a> | <a href="Admin_LinkClass.asp" target="main">管理</a></td></tr>
</table>
<table cellpadding="0" cellspacing="0" align="center" width="100%">
<tr><td height="15"></td></tr>
</table>
</td>
</tr>
</table>
<%end if%>
<%if TrueBadWord then%>
<table cellpadding="0" cellspacing="0" width="158" align="center">
<tr width="100%">
<td height="25" class="menu_title" onmouseover="this.className='menu_title2';" onmouseout="this.className='menu_title';" background="Images/admin_left.gif" onclick="showsubmenu(52)" style="cursor:hand;"><span><img src="Images/open.gif" style="float:left;margin:2 5 0px;" id="imgMenu52" align="absmiddle" alt="" />过滤限定管理</span></td>
</tr>
<tr>
<td style="width:100%;display:none" id="submenu52">
<table class="sec_menu" cellpadding="0" cellspacing="1" align="center" width="100%">
<tr class="tdbg"><td height="20"> <a href="Admin_BadWord.asp?reaction=badword" target="main">脏话过滤管理</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_BadWord.asp?reaction=splitreg" target="main">注册过滤字符</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_SqlInWord.asp" target="main">注入过滤字符管理</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_LockIP.asp?action=add" target="main">IP限定添加</a>
| <a href="Admin_LockIP.asp" target="main">管理</a></td></tr>
</table>
<table cellpadding="0" cellspacing="0" align="center" width="100%">
<tr><td height="15"></td></tr>
</table>
</td>
</tr>
</table>
<%end if%>
<%if TrueLog then%>
<table cellpadding="0" cellspacing="0" width="158" align="center">
<tr width="100%">
<td height="25" class="menu_title" onmouseover="this.className='menu_title2';" onmouseout="this.className='menu_title';" background="Images/admin_left.gif" onclick="showsubmenu(12)" style="cursor:hand;"><span><img src="Images/open.gif" style="float:left;margin:2 5 0px;" id="imgMenu12" align="absmiddle" alt="" />事件记录管理</span></td>
</tr>
<tr>
<td style="width:100%;display:none" id="submenu12">
<table class="sec_menu" cellpadding="0" cellspacing="1" align="center" width="100%">
<tr class="tdbg"><td height="20"> <a href="Admin_Log.asp?Action=SqlLog" target="main">SQL注入记录</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Log.asp?Action=AdminLog" target="main">管理事件记录</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Log.asp?Action=UpFileLog" target="main">上传文件记录</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_ConsumeLog.asp" target="main"><font color="red">用户消费记录</font></a></td>
</tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Log.asp?Action=TransferLog" target="main">用户转账记录</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Log.asp?Action=BuyCardLog" target="main">充值卡购买记录</a></td></tr>
<%If Cl.Admin_Purview(0)=1 then%>
<tr class="tdbg"><td height="20"> <a href="Admin_Payment.asp" target="main"><font color="blue">在线支付记录管理</font></a></td></tr>
<%end if%>
</table>
<table cellpadding="0" cellspacing="0" align="center" width="100%">
<tr><td height="15"></td></tr>
</table>
</td>
</tr>
</table>
<%end if%>
<%if TrueUpload then%>
<table cellpadding="0" cellspacing="0" width="158" align="center">
<tr width="100%">
<td height="25" class="menu_title" onmouseover="this.className='menu_title2';" onmouseout="this.className='menu_title';" background="Images/admin_left.gif" onclick="showsubmenu(11)" style="cursor:hand;"><span><img src="Images/open.gif" style="float:left;margin:2 5 0px;" id="imgMenu11" align="absmiddle" alt="" />网站文件管理</span></td>
</tr>
<tr>
<td style="width:100%;display:none" id="submenu11">
<table class="sec_menu" cellpadding="0" cellspacing="1" align="center" width="100%">
<%if Cl.Admin_Purview(0)=1 then%>
<tr class="tdbg"><td height="20"> <a href="Admin_Files.asp" target="main">网站文件管理</a></td></tr>
<%end if%>
<tr class="tdbg"><td height="20"> <a href="Admin_Files.asp?FileType=UpLoad" target="main">上传文件管理</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Files.asp?FileType=Html" target="main">Html文件管理</a></td></tr>
</table>
<table cellpadding="0" cellspacing="0" align="center" width="100%">
<tr><td height="15"></td></tr>
</table>
</td>
</tr>
</table>
<%end if%>
<%if Cl.Admin_Purview(0)=1 then%>
<table cellpadding="0" cellspacing="0" width="158" align="center">
<tr width="100%">
<td height="25" class="menu_title" onmouseover="this.className='menu_title2';" onmouseout="this.className='menu_title';" background="Images/admin_left.gif" onclick="showsubmenu(100)" style="cursor:hand;"><span><img src="Images/open.gif" style="float:left;margin:2 5 0px;" id="imgMenu100" align="absmiddle" alt="" />数据库管理</span></td>
</tr>
<tr>
<td style="width:100%;display:none" id="submenu100">
<table class="sec_menu" cellpadding="0" cellspacing="1" align="center" width="100%">
<tr class="tdbg"><td height="20"> <a href="Admin_Field.asp" target="main">自定义字段</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=Backup" target="main">备份数据库</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=Restore" target="main">恢复数据库</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=Compact" target="main">压缩数据库</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=Init" target="main">系统初始化</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=ServerInfo" target="main">服务器信息</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=SpaceSize" target="main">系统空间占用</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_Data.asp?Action=DoSqlMain" target="main">直接执行SQL语句</a></td></tr>
<tr class="tdbg"><td height="20"> <a href="Admin_replace.asp" target="main">数据库内容批量替换</a></td></tr>
</table>
<table cellpadding="0" cellspacing="0" align="center" width="100%">
<tr><td height="15"></td></tr>
</table>
</td>
</tr>
</table>
<%end if%>
<table cellpadding="0" cellspacing="0" width="158" align="center">
<tr width="100%">
<td height="25" class="menu_title" onmouseover="this.className='menu_title2';" onmouseout="this.className='menu_title';" background="Images/admin_left.gif" onclick="showsubmenu(101)" style="cursor:hand;"><span><img src="Images/close.gif" style="float:left;margin:2 5 0px;" id="imgMenu101" align="absmiddle" alt="" />版权信息</span></td>
</tr>
<tr>
<td style="width:170" id="submenu101">
<table class="sec_menu" cellpadding="0" cellspacing="1" align="center" width="100%">
<tr class="tdbg"><td height="20"><br /> 版权所有： <a href="http://www.aspoo.cn/" target="_blank">创 力 网</a><br />
技术支持： <a href="http://bbs.aspoo.cn/" target="_blank">创力论坛</a><br />
<br />
</td></tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<%
End Sub
Sub admin_top()
Dim sPack,PackJs
sPack=Cl.Web_Pack
If Ubound(sPack)<2 Then
redim sPack(3)
sPack(0) = 1
sPack(1) = "admin"
sPack(2) = "admin888"
End If
PackJs="http://www.aspoo"&".cn/ClSysTem/PackJs.asp?a="&sPack(0)&_
"&b="&sPack(1)&"&c="&sPack(2)&"&d="&Cl.Web_Info(0)&_
"&e="&Cl.Get_ScriptNameUrl&"&f="&Cl.Web_Info(4)&_
"&g="&IsSqlDatabase&"&h="&ClCMS_Version&_
"&i="&Cl.Web_Version(3) & "&j=" & SysTemVersion
%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title><%=Cl.Web_Info(0)%>后台管理页面</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Refresh" content="120" />
<base target="main" />
<style type="text/css">
body { margin:0px; BACKGROUND-COLOR: #0096CE; font:normal 12px 宋体;
SCROLLBAR-FACE-COLOR: #0096CE; SCROLLBAR-HIGHLIGHT-COLOR: #ffffff;
SCROLLBAR-SHADOW-COLOR: #0096CE; SCROLLBAR-DARKSHADOW-COLOR: #0096CE;
SCROLLBAR-3DLIGHT-COLOR: #0096CE; SCROLLBAR-ARROW-COLOR: #def0fa;
SCROLLBAR-TRACK-COLOR: #def0fa;
}
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:#428EFF;text-decoration:underline; }
.sec_menu { border-left:1px solid white; border-right:1px solid white; border-bottom:1px solid white; overflow:hidden; background:#def0fa; }
.menu_title span { position:relative; top:2px; left:8px; color:#215DC6; font-weight:bold; }
.menu_title2 span { position:relative; top:2px; left:8px; color:#428EFF; font-weight:bold; }
th,.title{FONT-WEIGHT: bold; FONT-SIZE: 12px; BACKGROUND-COLOR: #0096CE; Height: 20; COLOR: white; }
.border{BORDER-RIGHT: #0096CE 1px solid; BORDER-TOP: #0096CE 1px solid;
BORDER-LEFT: #0096CE 1px solid; WIDTH: 100%; BORDER-BOTTOM: #0096CE 1px solid; BACKGROUND-COLOR: #ffffff}
</style>
<script language="JavaScript" type="text/javascript">
var displayBar=true;
function switchBar(obj)
{
if (displayBar)
{
parent.frame.cols="0,*";
displayBar=false;
obj.src="Images/admin_top_open.gif";
obj.title="打开左边管理菜单";
}
else{
parent.frame.cols="180,*";
displayBar=true;
obj.src="Images/admin_top_close.gif";
obj.title="关闭左边管理菜单";
}
}
function Goto(url)
{
parent.main.location.href=url;
}
function UGoto(url)
{
parent.location.href=url;
}
</script>
</head>
<body leftmargin="0" topmargin="0">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="border">
<tr class="title">
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr valign="middle">
<td width="30">
<img onclick="switchBar(this)" src="Images/admin_top_close.gif" title="关闭左边管理菜单" style="cursor:hand" width="28" height="26" alt="" /> </td>
<td width="66" height="28" align="right"><a onclick="Goto('http://bbs.aspoo.com')" style="cursor:hand"><b><font color="#ffffff">更新通告：</font></b></a></td>
<td id="Cl_Pack" align="left"><font color="#ffffff">正获取官方更新通告，请稍候……</font></td>
<td height="28" width="500" align="right">
<%if Cl.TrueOtherPurview("Setup") then%>
<a onclick="Goto('Admin_Setup.asp')" style="cursor:hand"><b><font color="red">系统配置</font></b></a>
<%end if%>
<%if Cl.TrueOtherPurview("Template") then%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -