📄 login.asp
字号:
<head>
<link href=../style.css rel=stylesheet type=text/css>
<style type="text/css">
<!--
.style1 {
font-size: 24pt;
font-family: "黑体";
}
-->
</style>
</head>
<center>
<table width="400" border="0" align="center" cellspacing="1">
<tr>
<td width="100%" bgcolor="#cc9966">
<p> </p>
<p align="center"> <span class="style1">网站后台维护程序</span></p>
<p> </p>
<p> </td>
</tr>
<tr>
<td width="100%">
<form method="post" action="login.asp?action=login">
<table border="0" width="100%" cellspacing="1">
<tr>
<td width="18%">用户名</td>
<td width="82%"><input type="text" name="admin_name" size="20" class=input></td>
</tr>
<tr>
<td width="18%">密码</td>
<td width="82%"><input type="password" name="admin_pass" size="20" class=input></td>
</tr>
</table>
<input type="submit" value="提交" name="b1" class=input><input type="reset" value="全部重写" name="b2" class=input>
</form>
</td>
</tr>
<tr>
<td width="100%"></td>
</tr>
</table>
<%
'如果是进行帐号/密码验证
if request("action")="login" then
'获得用户输入的帐号和密码
admin_name=request("admin_name")
admin_pass=request("admin_pass")
%>
<!--#include file="conn.asp"-->
<%
'记录集对象
set rs=server.createobject("adodb.recordset")
'查询数据库，是否存在与帐号/密码相匹配的记录
sql="select * from admin where admin_name='"&admin_name&"' and admin_pass='"&admin_pass&"'"
rs.open sql,conn,3,3
'如果记录集为空
if rs.eof then
'提示用户输入不正确
response.write "<center>用户名和密码不匹配"
else
'记录用户帐号
session("admin_name")=rs("admin_name")
'重转向manage.asp页面
response.redirect "manage.asp"
end if
'关闭记录集，释放对象
rs.close
set rs=nothing
'关闭数据库连接，释放对象
conn.close
set conn=nothing
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -