📄 admin_left.asp

📁 改进及新特性: 1、调整模版编辑时的流程及提示语言 2、新增sitemaps生成功能 3、优化评论页面的显示格式 BUG修正: 1、getarticlelist标签对于现有参数提示错误
💻 ASP
字号:
<!--#Include File="../conn.asp" -->
<!--#Include File="comm/inc.asp" -->
<%
'====================================================================
'= Team Elite - Elite Article System
'= Copyright (c) 2005 Eason Chan All Rights Reserved.
'=-------------------------------------------------------------------
'= 文件名称：/Manager/Admin_Left.asp
'= 摘    要：后台-左边控制菜单文件
'=-------------------------------------------------------------------
'= 最后更新：eason007
'= 最后日期：2005-07-26
'====================================================================

Call EA_Manager.Chk_IsMaster

Dim i,j

Call EA_Pub.Close_Obj
Set EA_Pub=Nothing

%>
<title>管理页面</title>
<style type=text/css>
<!--
BODY{
	margin:0px;
	FONT-SIZE: 12px;
	FONT-FAMILY:  "宋体", "Verdana", "Arial", "Helvetica", "sans-serif";
	background-color: #799AE1;
	scrollbar-face-color: #DEE3E7;
	scrollbar-highlight-color: #FFFFFF;
	scrollbar-shadow-color: #DEE3E7;
	scrollbar-3dlight-color: #D1D7DC;
	scrollbar-arrow-color:  #006699;
	scrollbar-track-color: #EFEFEF;
	scrollbar-darkshadow-color: #98AAB1;
}
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:#D6DFF7; }
.menu_title  { }
.menu_title span  { position:relative; top:2px; left:8px; color:#215DC6; font-weight:bold; }
.menu_title2  { }
.menu_title2 span  { position:relative; top:2px; left:8px; color:#428EFF; 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="admin_index.asp" target=_top><b>管理首页</b></a> | <a href="Login.asp?action=logout" target=_top onclick="{if(confirm('确定退出吗?')){return true;}return false;}"><b>退出</b></a></span> </td>
		    </tr>
		</table>
    <br>
	<!--后台菜单开始-->
	<%For i=0 To Ubound(str_LeftMenu)-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/admin_left_<%=i%>.gif" id=menuTitle1 onclick="showsubmenu(<%=i%>)"> <span><%=str_LeftMenu(i,0)%></span></td>
			</tr>
			<tr> 
				<td style="display:none" id='submenu<%=i%>'>
				<div class=sec_menu style="width:158">
				<%
					For j=1 To Ubound(str_LeftMenu,2)
						If IsEmpty(str_LeftMenu(i,j)) Then Exit For
				%>
				<table cellpadding=0 cellspacing=0 align=center width=135>
					<tr> 
						<td height=20 align=left><img src="images/ico.gif"><%=str_LeftMenu(i,j)%></td>
					</tr>
	            </table>
	            <%Next%>
		        </div>
				<div  style="width:158"> 
					<table cellpadding=0 cellspacing=0 align=center width=135>
						<tr>                
							<td height=10></td>
						</tr>
					</table>
				</div>
				</td>
			</tr>
		</table>
	<%Next%>
	<br>
	<!--后台菜单结束-->    
		<SCRIPT language=JavaScript>showsubmenu(1)</script>
	<SCRIPT language=JavaScript>showsubmenu(4)</script>
<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_9.gif" id=menuTitle1> <span>系统信息</span> </td>
    </tr>
    <tr> 
	    <td> <div class=sec_menu style="width:158"> 
	    <table cellpadding=0 cellspacing=0 align=center width=135>
			<tr>
				<td height=20>&nbsp;<BR>
				支持论坛：<BR>
⌨️ 快捷键说明

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