📄 admin.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file = "chk.asp" -->
<!--#include file = "class.asp"-->
<%
Dim T
Sub head
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="zh-cn" />
<title><%=T%> - 管理页面 - 依悠广告管理系统 V1.1</title>
<link href="images/style.css" type="text/css" rel="stylesheet" />
</head>
<body>
<div id="content">
<div id="menu">
<a href="?menu=ADadd">添加广告</a>
<a href="?menu=list">广告管理</a>
<a href="?menu=MA">修改密码</a>
<a href="?menu=help">使用帮助</a>
<a href="javascript:history.go(-1)">返回上层</a>
<a href="login.asp?menu=out">退出管理</a>
<a href="http://www.yiuu.net/" target="_blank">问题反馈</a>
</div>
<br />
<%
End Sub
Select case menu
case ""
T = "广告管理"
head
list
case "ADadd"
T = "添加广告"
head
ADadd
case "ADadde"
ADadde
case "list"
T = "广告管理"
head
list
case "del"
ADdel
case "ADedite"
ADedite
case "ADedit"
T = "广告编辑"
head
ADedit
case "dy"
T = "广告预览"
head
list
dy
case "help"
T = "使用帮助"
head
help
case "MA"
T = "修改密码"
head
MA
case "MAsave"
MAsave
End Select
%>
</div>
</body>
</html>
<%
Set Rs = Nothing
conn.close:Set conn = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -