用户检查登录的问题

[复制链接]

$星辰

电梯直达

1^#

发表于 2009-9-15 00:32:26 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

数据库是这样设计的.name.pwd,qx.分别对应用户名,密码和权限
我的想法是这样的.通过登录页面login.asp,提交给chklogin.asp检查,若是权限=1.跳转到admin.asp管理页面.权限=0,跳入普通会员user页面.
代码该如何写呢? 如何加入权限检查语句


<%
username=request.form("name")
password=request.Form("pwd")
if username="" then
response.redirect "index.asp"
end if
if password="" then
response.redirect "index.asp"
end if
dim sql,rs,password1
sql="select pwd from yonghu where username='"&name&"'"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
password1=rs("pwd")
if password1=password then
session("adminok")=ok
response.redirect "admin.asp"
else
response.redirect "user.asp"
end if
rs.close

收藏0