📄 20050130_loginagine.asp
字号:
<%
username=request("username") '接受管理员用户名
password=request("password") '接受管理员密码
keys=request("keys")
mm=0
%>
<!--#include file="conn.asp"-->
<%
if username<>"" and password<>"" then
set rs=conn.execute("select * from administrator where username='"& username & "'") '判断是否存在该用户
if not (rs.bof and rs.eof) then '判断是否有该权限
if rs("password")=password then
session("password")=rs("password") '为真则将该用户的该权限放入SESSION中
Response.Redirect "admin.asp" '跳转到管理员管理页面
else
mm=1
end if
else
mm=2
end if
elseif keys="submit" then
mm=3
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" rel="stylesheet" type="text/css">
<title>25175.com 在线考试系统v1.3</title>
</head>
<body>
<table width="250" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align=center>
<form action="20050130_loginagine.asp" method="post" name="form2" id="form2">
<table width="250" border="0">
<tr bgcolor="#F3F3F3">
<td height="28" colspan="2">
<div align="center">
<%
if mm=1 then
Response.Write "对不起，您输入的密码有误！"
elseif mm=2 then
Response.Write "您没有登陆的权限！"
elseif mm=3 then
Response.Write "请输入完整的用户名和密码！"
end if
%>
</div></td>
</tr>
<tr>
<td align="right">管理员帐号：</td>
<td width="150"><input name="keys" type="hidden" value="submit">
<input name="username" type="text" class="editbox1" id="username" value="admin" size="15"></td>
</tr>
<tr>
<td align="right">管理员密码：</td>
<td><input name="password" type="password" class="editbox1" value="admin" size="15"></td>
</tr>
<tr align="center">
<td colspan="2">
<input type="submit" name="Reg2" value="登录" class="bottom">
<input type="reset" name="Submit32" value="重写" class="bottom">
</td>
</tr>
</table>
</form>
</div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -