1 用户登陆页面
截图如下:
图 3.1.1 用户
登陆
代码:
<link
href="style.css" type="text/css" rel="stylesheet">
<!--#include file="conn.asp"-->
<% if request("login")<>"" then
if request("usertype")<>"" then '用户类型不空,核实数据真实
If Request("usertype")="user" Then
sql = "select * from u where name='"&request("name")&"' and
pwd='"&request("pwd")&"'"
Else
sql = "SELECT * FROM admin WHERE name='"&Request("name")&"' and
pwd='"&Request("pwd")&"'"
End If
Set rs=db.execute(sql)
If not rs.EOF Or Not rs.BOF Then '输入数据存在
If Request("usertype")="user" Then
If rs("lock") Then
response.Write"<script>alert(' 您 已 被 锁 定
了!');window.location.href='login.asp'</script>"
else
Session("usertype")="user"
Session("userid")=rs("id")
Session("name")=rs("name")
Response.Redirect("index.asp")
end if
Else
Session("usertype")="admin"
Session("adminid")=rs("id")
Session("name")=rs("name")
Response.Redirect("index.asp")
评论0
最新资源