📄 admin_login.asp
字号:
<!--#include file="inc/CONN.asp"-->
<!--#include file="inc/Const.asp"-->
<!--#include file="inc/md5.asp"-->
<%
Dim AdminName,AdminPass
AdminName=Request.form("AdminName")
AdminPass=MD5(Request.form("AdminPass"))
If request("action")="logout" Then
session("admin")=false
response.write "<script language=javascript>alert( ""退出登录成功"");"&Chr(13)&"location.href=""admin_login.asp"";</script>"
response.end
end if
If Request("Action")="chklogin" then
if AdminName<>cfg(9) or AdminPass<>cfg(10) then
response.write "<script language=javascript>alert( ""管理名或密码错误！"");"&Chr(13)&"location.href=""javascript:history.back()"";</script>"
response.end
else
session("admin")=true
response.write "<script language=javascript>alert( ""登录成功"");"&Chr(13)&"location.href=""admin_user.asp"";</script>"
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言本管理登录</title>
<!--#include file="inc/style.css"-->
<script language=javascript src="inc/js.inc"></script>
<script language="JavaScript1.2">
function check(theForm) {if(theForm.AdminName.value == "" || theForm.AdminPass.value == "" ) {alert("你还没完全留言下所需信息，管理名和密码都是必须要的。"); return false;}}</script>
</head>
<body <%=skin(13)%>>
<table border=0 align=center><tr height=40><Td></td></tr></table>
<table align=center border=1 bordercolor=<%=skin(12)%> cellpadding=3 cellspacing=0 width=280>
<form name=theform action="admin_login.asp?action=chklogin" method=post onsubmit="submitonce(this)">
<tr class=titlestyle>
<Td align=center><b>留 言 系 统 管 理 登 陆</B></td>
</tr>
<tr bgcolor=<%=skin(4)%>>
<td align=center height=32 style="Border-color:<%=skin(5)%>">管 理 员： <input name=AdminName maxlength=16 type=text size=16>
<tr bgcolor=<%=skin(4)%>>
<td align=center height=32 style="Border-color:<%=skin(5)%>">密 码： <input name=AdminPass maxlength=15 type=password size=16 oncut="return false" onpaste="return false"></td>
</tr>
<tr bgcolor=<%=skin(4)%>>
<td align=center height=32><input name=submit type=submit value="登 录" onclick="return check(theform)"> <input name=reset type=reset value="取 消" onclick="javascript:window.close()"></td>
</tr>
</table>
<!--#include file="inc/foot.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -