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

📄 admin_left.asp

📁 网络上经典的图片程序
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="setup.asp"-->
<!--#include file="check.asp"-->
<%
Response.Expires = 0  
Response.ExpiresAbsolute = Now() - 1  
Response.cachecontrol = "no-cache" 
%>
<head>
<title><%= Newasp.SiteName %> - 管理页面</title>
<META content="MSHTML 5.00.3315.2870" name=GENERATOR>
<META http-equiv=Content-Type content=text/html;charset=gb2312>
<style type=text/css>
BODY{
	margin:0px;
	FONT-SIZE: 12px;
	FONT-FAMILY: "宋体", "Verdana", "Arial", "Helvetica", "sans-serif";
	background-color: #7D899D; 
	scrollbar-highlight-color: #98A0AD; 
	scrollbar-arrow-color: #FFFFFF; 
	scrollbar-base-color: #7D899D
}
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:#384780;text-decoration:underline; }
.sec_menu { border-left:2px solid #335EA8; border-right:2px solid #335EA8; border-bottom:2px solid #335EA8; overflow:hidden; background:#EEEEE3; }
.menu_title {background-color: #335EA8;color: white;font-size: 12px;font-weight:bold;height: 25; }
.menu_title span { position:relative; top:2px; left:8px; color:#FFFF00; font-weight:bold; }
.menu_title2 {background-color: #335EA8;color: white;font-size: 12px;font-weight:bold;height: 25; }
.menu_title2 span { position:relative; top:2px; left:8px; color:#FEFEFE; font-weight:bold; }
input,select,Textarea{
font-family:宋体,Verdana, Arial, Helvetica, sans-serif; font-size: 12px;}
</style>
<script language=JavaScript>
function logout(){
	if (confirm("系统提示:您确定要退出控制面板吗?"))
	top.location = "logout.asp";
	return false;
}
</script>
<script language=JavaScript1.2>
function showsubmenu(sid) {
	var whichEl = eval("submenu" + sid);
	var menuTitle = eval("menuTitle" + sid);
	if (whichEl.style.display == "none"){
		eval("submenu" + sid + ".style.display=\"\";");
		//if (sid != 0 & sid < 999) {
			//menuTitle.background="images/title_bg_hide.gif";
		//}
	}else{
		eval("submenu" + sid + ".style.display=\"none\";");
		//if (sid != 0 & sid < 999) {
			//menuTitle.background="images/title_bg_show.gif";
		//}
	}
}
</script>
</head>
<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 style="vertical-align:bottom; border:0px;"> 
        </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/admin_left_1.jpg> 
          <a href="admin_main.asp" target=main><span>管理首页</span></a> <span>|</span> <a href="#"  onclick="logout();"><span>退 出</b></span> 
        </td>
      </tr>
      <tr> 
        <td style="display:"> <div class=sec_menu style="width:158"> 
            
            <table cellpadding=0 cellspacing=0 align=center width=135>
              <tr> 
                <td height=20>用户名:<font color=red><%=session("AdminName")%></font></td>
              </tr>
              <tr> 
                <td height=20>身 份:<font color=red><%=Session("AdminStatus")%></font></td>
              </tr></table></td>
    </table>
    <div  style="width:158"> 
            <table cellpadding=0 cellspacing=0 align=center width=135>
              <tr>
            <td height=5></td>
              </tr>
            </table>
     </div>
    <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.jpg id=menuTitle0 onClick="showsubmenu(0)"> 
          <span>常规设置</span> </td>
      </tr>
      <tr> 
        <td style="display:" id='submenu0'> <div class=sec_menu style="width:158"> 
            <table cellpadding=0 cellspacing=0 align=center width=135 style="POSITION: relative; TOP: 5px">
              <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_config.asp target=main>基本设置</a> | <a href=../index.asp target=main>浏览首页</a></td>
              </tr>
			  <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_channel.asp?action=add target=main>添加频道</a> | <a href=admin_channel.asp target=main>频道管理</a></td>
              </tr>
              <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_template.asp target=main>模板样式总管理</a></td>
              </tr>
              <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_loadskin.asp target=main>模板导出</a> | <a href=admin_loadskin.asp?action=load target=main>模板导入</a></td>
              </tr>
	      <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_announce.asp?action=add target=main>发布公告</a> | <a href=admin_announce.asp target=main>公告管理</a></td>
              </tr>
	      <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_log.asp target=main>日志管理</a> | <a href=admin_message.asp target=main>发送短信</a></td>
              </tr>
	      <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_createindex.asp target=main>生成首页(HTML)</a></td>
              </tr>
	      <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_admanage.asp?action=add target=main>添加广告</a> | <a href=admin_admanage.asp target=main>广告管理</a></td>
              </tr>
            </table>
          </div>
          <div  style="width:158"> 
            <table cellpadding=0 cellspacing=0 align=center width=135>
              <tr>
                <td height=5></td>
              </tr>
            </table>
          </div></td>
      </tr>
    </table>
<%
Dim ChannelName,ChannelDir,ModuleName,strModules
Set Rs = Newasp.Execute("SELECT ChannelID,ChannelName,ChannelDir,modules,ModuleName FROM NC_Channel WHERE StopChannel = 0 And ChannelID <> 4 And ChannelType < 2 ORDER BY orders ASC")
Do While Not Rs.EOF
	ChannelID = Rs("ChannelID")
	ChannelName = Rs("ChannelName")
	ChannelDir = Replace(Rs("ChannelDir"), "/", "")
	ModuleName = Rs("ModuleName")
	Select Case Rs("modules")
		Case 1:strModules = "Article"
	Case Else
		strModules = "Article"
	End Select
%>
    <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.jpg id=menuTitle<%=ChannelID%> onClick="showsubmenu(<%=ChannelID%>)"> 
          <span><%=ChannelName%></span> </td>
      </tr>
      <tr> 
        <td style="display:none" id='submenu<%=ChannelID%>'> <div class=sec_menu style="width:158"> 
            <table cellpadding=0 cellspacing=0 align=center width=135 style="POSITION: relative; TOP: 5px">
              <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_<%=strModules%>.asp?ChannelID=<%=ChannelID%>&action=add target=main>添加<%=ModuleName%></a> | <a href=admin_<%=strModules%>.asp?ChannelID=<%=ChannelID%> target=main><%=ModuleName%>管理</a></td>
              </tr>
	      <tr> 
                <td height=20><img src="images/bullet.gif"><a href=admin_classify.asp?ChannelID=<%=ChannelID%>&action=add target=main>添加分类</a> | <a href=admin_classify.asp?ChannelID=<%=ChannelID%> target=main>分类管理</a></td>
              </tr>

⌨️ 快捷键说明

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