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

📄 left.asp

📁 演示中使用的数据库为省、市、县三级数据库 演示程序实现了省、市、县三级联动(ajax技术) 程序调用方法: 1:把 <script language="javascript" src="
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Admin_Check.asp" -->

<%
' *** Logout the current user.
MM_Logout = CStr(Request.ServerVariables("URL")) & "?MM_Logoutnow=1"
If (CStr(Request("MM_Logoutnow")) = "1") Then
  Session.Contents.Remove("firste_user")
  Session.Contents.Remove("eWebEditor_User")
  Session(CacheName &"AdminName") = Empty
	Response.Cookies(CacheName &"Admin")("AdminName")= Empty
	Session(CacheName &"AdminName") = Empty
	Response.Cookies(CacheName &"Admin")("AdminPassword")= Empty
  response.Cookies("MM_Username")=""
  Session.Contents.Remove("MM_UserAuthorization")
  MM_logoutRedirectPage = "Login_admin.asp"
  ' redirect with URL parameters (remove the "MM_Logoutnow" query param).
  if (MM_logoutRedirectPage = "") Then MM_logoutRedirectPage = CStr(Request.ServerVariables("URL"))
  If (InStr(1, UC_redirectPage, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
    MM_newQS = "?"
    For Each Item In Request.QueryString
      If (Item <> "MM_Logoutnow") Then
        If (Len(MM_newQS) > 1) Then MM_newQS = MM_newQS & "&"
        MM_newQS = MM_newQS & Item & "=" & Server.URLencode(Request.QueryString(Item))
      End If
    Next
    if (Len(MM_newQS) > 1) Then MM_logoutRedirectPage = MM_logoutRedirectPage & MM_newQS
  End If
  Response.Redirect(MM_logoutRedirectPage)
End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script>
		function kai(i)
		{
			var DT_win=document.getElementById(i);
	
			DT_win.style.display=(DT_win.style.display=="none"?"block":"none");
		}
	</script>
<link href="firste.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE2 {
	color: #ffffff;
	font-weight: bold;
}
.STYLE5 {
	color: #000000;
	font-weight: bold;
}
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginheight="0" marginwidth="0">
<table width="158" border="0" cellpadding="0" cellspacing="0" class="tittleName">
  <tr>
    <td><img src="image/title.gif"></td>
  </tr>
</table>
<table width="158" border="0" cellspacing="1" cellpadding="4">
  <tr bgcolor="#66CC99">
    <td colspan="2" bgcolor="#0066CC">&nbsp;<a href="admin.asp" target="mainFrame">管理首页</a> | <a href="<%= MM_Logout %>" target="_top"><img src="image/exit.gif" width="16" height="16">安全退出</a></td>
  </tr>
  <tr bgcolor="#E8FFE8">
    <td colspan="2">&nbsp;&nbsp;&#149; 管理员:<%= Session("firste_user") %></td>
  </tr>
</table>
<table width="158" border="0" cellspacing="1" cellpadding="4">
  <tr bgcolor="#66CC99">
    <td colspan="2" background="image/title_bg_hide.gif" bgcolor="#7FA1E6">&nbsp;<a href="javascript:kai(1)" class="title"><strong>数据管理</strong></a></td>
  </tr>
  <tr bgcolor="#E8FFE8"  id="1" style="display:block">
    <td><table width="100%" border="0" cellspacing="1" cellpadding="4">
      <tr>
        <td>&nbsp;&nbsp;&#149; <a href="admin_class.asp" target="mainFrame">数据列表</a></td>
      </tr>
      <tr>
        <td>&nbsp;&nbsp;&#149; <a href="admin_class_add.asp" target="mainFrame">添加数据</a></td>
      </tr>
      </table></td>
  </tr>
</table>

<table width="158" border="0" cellpadding="4" cellspacing="1" class="bottom">
  <tr bgcolor="#66CC99">
    <td colspan="2" align="left" bgcolor="#7E9BE5">&nbsp;<span class="menu_title STYLE5">开发信息</span></td>
  </tr>
  <tr bgcolor="#E8FFE8">
    <td>&nbsp;&nbsp;&nbsp;&#149;   设计制作:&nbsp;<a href="http://www.firste.cn" target="_blank">firste</a></td>
  </tr>
  
  <tr bgcolor="#E8FFE8">
    <td>&nbsp; </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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