用asp+access登陆表单问题

用asp+access登陆表单问题

<%
username=replace(replace(request("admin_username"),"'",""),"=","")
password=replace(replace(request("admin_password"),"'",""),"=","")
if username="" or password="" then
response.write("")
response.End()
end if
set rs = server.CreateObject("adodb.recordset")
sql="select * from web_admin where username='"&username&"'"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
response.Write("账号密码错误,请重新输入。非管理员请不要捣乱，谢谢！")
response.End()
else
if rs("password")<>password then
response.Write("账号密码错误,请重新输入。非管理员请不要捣乱，谢谢！")
response.End()
else
session("baihao")="baihao"
response.Redirect("index.asp")
response.End()
end if
end if
rs.close
set rs = nothing
%>

需要设置权限的话，用session变量，根据你获得的老师学生选项的值，
设置session变量的值，然后在一些功能页面检查session变量的值，来判断可以使用那些功能
如：
前台老师学生选择代码：

学生
老师

检查页面代码：
if request("quanxian")="学生" then
session("quanxian")=1
else if request("quanxian")="老师" then
session("quanxian")=2
end if

user在SQL语句中是保留字，改为 select * from [user]
rs.("user") 改成rs("user")
request.("f_user")该成request("f_user")
还有，去看看安全方面的资料吧，你这样写的程序很危险

前面的检查代码都有人写了
需要设置权限的话，用session变量，根据你获得的老师学生选项的值，
设置session变量的值，然后在一些功能页面检查session变量的值，来判断可以使用那些功能
如：
前台老师学生选择代码：

学生
老师

检查页面代码：
if request("quanxian")="学生" then
session("quanxian")=1
else if request("quanxian")="老师" then
session("quanxian")=2
end if

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息