📄 login.asp
字号:
<%session("user")=""
session("pwd")=""
if request("exit")="ok" then
response.redirect "index.asp"
end if%>
<%
user=trim(request.form("user"))
pwd=trim(request.form("pwd"))%>
<%if user<>"" and pwd<>"" then%>
<!--#include file="conn.asp"-->
<%
set rsadm=server.createobject("adodb.recordset")
sqladm="select * from admin"
rsadm.open sqladm,conn,1,1
if not rsadm.eof then
if rsadm("user")="" then
response.write("<script>alert('用户名不对！');history.go(-1)</script>")
end if
if pwd=rsadm("pwd") then
session("user")=rsadm("user")
session("pwd")=rsadm("pwd")
response.redirect "index.asp"
else
response.write("<script>alert('密码不对哦！');history.go(-1)</script>")
end if
else
end if
response.write("<script>alert('用户名不对！');history.go(-1)</script>")
rsadm.close
set rsadm=nothing
conn.close
set conn=nothing
end if%>
<html>
<head>
<title>管理入口</title>
<link href="aaa.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="500" height="400" border="0" align="center">
<tr>
<td><div align="center"><font size="6">超级站长管理入口</font><br>
<form name="form1" method="post" action="login.asp">
<table width="200" height="54" border="0" cellpadding="5" cellspacing="0">
<tr>
<td><div align="right">管理员:</div></td>
<td><input name="user" type="text" id="user" size="20" maxlength="20"></td>
</tr>
<tr>
<td><div align="right">密码:</div></td>
<td><input name="pwd" type="password" id="pwd" size="20" maxlength="20"></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input type="submit" name="Submit" value="登录">
</div></td>
</tr>
</table>
<br>
<a href="index.asp">返回>> </a>
</form>
</div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -