?? login.asp
字號:
<!--#include file="conn.asp"-->
<%if session("password")<>"" then%>
<%
username=request("username") '接受管理員用戶名
password=request("password") '接受管理員密碼
keys=request("keys")
mm=0
%>
<%
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.5</title>
</head>
<body>
<table width="250" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align=center>
<form action="login.asp" method="post" name="form2" id="form2">
<table width="250" border="0">
<tr bgcolor="#F3F3F3">
<td height="28" colspan="2">
<div align="center"><a href="index.asp">考試學生請進入-->測試</a></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>
<table width="250" border="0" align="center">
<tr>
<td><div align="center"><a href="http://www.25175.com">powered by 25175</a> </div></td>
</tr>
</table>
</body>
</html>
<%else
Response.Redirect "20050130_loginagine.asp"
end if%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -