⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_index.asp

📁 浪人文章系统
💻 ASP
字号:
<%OPTION EXPLICIT%>
<!--#include file="Include/Config.asp"-->
<!--#include file="Include/SQLAdmin.asp"-->
<!--#include file="Include/Conn.asp"-->
<!--#include file="Include/IPLockAdmin.asp"-->
<%dim Admin_Purview:Admin_Purview="1"%>
<!--#include file="Include/Session.asp"-->

<%
	select case Trim(Request.QueryString("GuComm"))
		case "AL"
			call Admin_Login()
		case "AM"
			call Admin_Menu()
		case "AT"
			call Admin_Top()
		case else
			call Admin_Index()
	end select

end if


sub Admin_Login()
	Response.redirect "Admin.asp"
end sub 

sub Admin_Index()
%>
<html>
<head>
<title><%=WebSiteName%>--网站管理中心</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<meta http-equiv="Content-Language" Content="zh-CN">
<meta name="Keywords" Content="">
<meta name="Description" Content="">
<link type="text/css" rel="stylesheet" href="Include/Style.css">
</head>

<frameset cols="171,*" framespacing="0" border="0" frameborder="0">
<frame name="left" scrolling="auto" target="rtop" src="Admin_Index.asp?GuComm=AM">
<frameset rows="6%,*">
<frame name="top" target="rbottom" src="Admin_Index.asp?GuComm=AT" scrolling="no" noresize>
<frame name="main" src="Admin_Server.asp">
</frameset>
<noframes>

<body>

</body>
</noframes>
</frameset>
</html>

<%
end sub

sub Admin_Menu()
%>

<html>

<head>
<title>管理菜单</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<meta http-equiv="Content-Language" Content="zh-CN">
<meta name="Keywords" Content="">
<meta name="Description" Content="">
<link type="text/css" rel="stylesheet" href="Include/Style.css">

</head>

<body topmargin="4" leftmargin="4" bgcolor="#CEEFE7">

<center>
<table border="0" cellpadding="0" cellspacing="0" width="160" height="176">
 <tr>
  <td width="181" height="36" colspan="2" background="Images/Admin_Menu_Title.gif"></td>
 </tr>
 <tr>
  <td width="181" height="29" colspan="2" background="Images/Admin_Menu_Bg1.gif">&nbsp;<font class="BlackS12">□</font><a href="Admin.asp?GuComm=0" target="_top" class="BlackS12">退出管理</a>&nbsp;&nbsp;<font class="BlackS12">□</font><a href="<%=WebSiteURL%>" target="_blank" class="BlackS12">首页</a></td>
 </tr>
 <tr>
  <td width="181" height="2" colspan="2"></td>
 </tr>
 <tr>
  <td width="181" height="26" colspan="2" background="Images/Admin_Menu_Bg2.gif">&nbsp;<font class="BlackS12">□资源管理</font></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="25"></td>
  <td width="152" height="25"><font class="BlackS12">□</font><a href="Admin_Article.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">添加新的文章</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="25"></td>
  <td width="152" height="25"><font class="BlackS12">□</font><a href="Admin_UpdateData.asp?GuComm=All" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">更新网站数据</a></td>
 </tr>
   <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="25"></td>
  <td width="152" height="25"><font class="BlackS12">□</font><a href="Admin_List.asp" target="main" onclick="window.open('Admin_Index_Top.asp?GuComm=AT_List','top')" class="BlackS12">文章资源管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7">
  <td width="27" height="25"></td>
  <td width="152" height="25"><font class="BlackS12">□文章搜索</font></td>
 </tr>
 <form name="Admin_Index_Menu" method="get" action="Admin_List.asp" target="main">
 <tr>
  <td width="27" height="25" bgcolor="#EFFBF7"></td>
  <td width="152" height="25" bgcolor="#EFFBF7"><input name="GuKeyword" type="text" maxlength="50" class="Admin_InputText" style="width:80;background-color:#EAFBF5;" value="" onFocus="JavaScript:GuKeyword.select();"> <input type="submit" name="Submit" value="" Class="Admin_Button_Search"></td>
 </tr>
 </form>
 <tr>
  <td width="181" height="26" colspan="2" background="Images/Admin_Menu_Bg3.gif">&nbsp;<font class="BlackS12">□网站管理</font></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_Guestbook.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">用户留言管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_Ads.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">网站广告管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_WebLink.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">友情链接管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_Sort.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">类别分类管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_Explorer.asp" target="main" onclick="window.open('Admin_Index_Top.asp?GuComm=AT_File','top')" class="BlackS12">网站文件管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_IPLock.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">访问限制管理</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_Manager.asp" target="main" onclick="window.open('Admin_Index.asp?GuComm=AT','top')" class="BlackS12">网站用户设置</a></td>
 </tr>
 <tr bgcolor="#EFFBF7" onMouseOver=this.bgColor='#CEEFE7' onMouseOut=this.bgColor='#EFFBF7' this.style cursor='hand'>
  <td width="27" height="26"></td>
  <td width="152" height="26"><font class="BlackS12">□</font><a href="Admin_Config.asp" target="main" onclick="window.open('Admin_Index_Top.asp?GuComm=AT_Config','top')" class="BlackS12">网站参数设置</a></td>
 </tr>
 <tr>
  <td width="181" height="26" colspan="2" background="Images/Admin_Menu_Bg4.gif">&nbsp;<font class="BlackS12">□版权所有</font></td>
 </tr>
 <tr>
  <td width="181" height="66" colspan="2" bgcolor="#EFFBF7" align="center"><a href="http://www.lre.cn" target="_blank" class="BlackS12">浪人网络</a> <a href="mailto:gueeon@gmail.com" target="_blank" class="BlackS12">啊估设计</a></td>
 </tr>
</table>
</center>

</body>
</html>

<%
end sub
sub Admin_Top()
%>
<html>
<head>
<title>网站管理中心</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<meta http-equiv="Content-Language" Content="zh-CN">
<meta name="Keywords" Content="">
<meta name="Description" Content="">
<link type="text/css" rel="stylesheet" href="Include/Style.css">
</head>

<body background="Images/Admin_T_Bg1.gif" leftmargin="0" topmargin="0">

<table height="100%" width="100%" border="0" cellpadding="0" cellspacing="0">
 <tr>
  <td height="100%" width="80%"></td>
  <td height="100%" width="20%"></td>
 </tr>
</table>

</body>
</html>

<%end sub%>

<%CloseDatabase%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -