📄 user_login.asp
字号:
<!--#include file="connsf.asp" -->
<!--#include file="md5.inc" -->
<!--#include file="checkstr.asp" -->
<%
user=Trim(Request.Form("user"))
user=checkstr(user)
pass=Trim(Request.Form("pass"))
if user<>"" and pass<>"" then
pass1=ucase(md5(pass))
str="select 用户类别 from user_teacher where 用户名='"&user&"' and 密码='"&pass1&"'"
set rs=conn.execute(str)
if not rs.eof then
session("user")=user
session("pass")=pass
if rs("用户类别")="管理员" then response.redirect("admin_list.asp")
if rs("用户类别")="一般用户" then response.redirect("list.asp")
end if
rs.close
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>登录网上传文系统</title>
<style type="text/css">
<!--
.unnamed1 {
border: 1px solid #660066;
}
.unnamed2 {
font-size: 12px;
}
.inputbox {
font-size: 12px;
color: #000000;
background-color: #dff3ff;
padding: 2px;
height: 20px;
border: 1px solid #000000;
}
.inputtext {
font-size: 12px;
color: #000000;
background-color: #FFFFFF;
border: 1px solid #000000;
}
-->
</style>
</head>
<body oncontextmenu="return false">
<p> </p><table width="680" border="0" align="center" cellpadding="0" cellspacing="0" class="unnamed1">
<tr>
<td><img src="images/index.jpg" width="680" height="230"></td>
</tr>
<tr>
<td height="50"><form name="form1" method="post" action="">
<div align="center" class="unnamed2">用户名：
<input name="user" type="text" class="inputtext" id="user" size="16">
用户密码：
<input name="pass" type="password" class="inputtext" id="pass" size="16">
<input name="Submit" type="submit" class="inputbox" value=" 登录 ">
<input name="Submit2" type="reset" class="inputbox" value=" 重填 ">
</div>
</form></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -