做了个登陆界面,现在出现的问题是怎么判断是否是管理员,
下面是登陆验证代码
<%
a=request.Form("zhanghao")
b=request.Form("password")
set con=server.CreateObject("adodb.connection")
con.open"DSN=hao"
set rs=con.execute("select * from yonghu where user='"&a&"' and password='"&b&"'" )
if not rs.eof then
response.Write("登陆成功")
else
response.Write("登陆失败")
end if
%>
现在要求管理员与非管理员的登陆,而且还要Session记录用户,请问怎么做,
数据库那边我已经添加了一个字段,管理员是1,非管理员是0,怎么比较
我是初学者,给为高手支个招
<%
a=request.Form("zhanghao")
b=request.Form("password")
set con=server.CreateObject("adodb.connection")
con.open"DSN=hao"
set rs=con.execute("select * from yonghu where user='"&a&"' and password='"&b&"'" )
if not rs.eof then
If Rs("g")=1 Then
Session("Admin")=Rs("User") '用Session("Admin")记录下管理员的姓名
response.Write "登陆成功"&Session("Admin")
Elseif Rs("g")=0 Then
Session("User")=Rs("User") '用Session("User")记录下一般用户的姓名
response.Write "登陆成功"&Session("User")
End if
else
response.Write("登陆失败")
end if
%>
set rs=con.execute("select * from yonghu where user='"&a&"' and password='"&b&"'" )
你这句话是返回 1 行记录 里面包含了,是否是管理员的表示列
那么你把标识列给取出来判断下 就行了
<%
a=request.Form("zhanghao")
b=request.Form("password")
set con=server.CreateObject("adodb.connection")
con.open"DSN=hao"
set rs=con.execute("select * from yonghu where user='"&a&"' and password='"&b&"'" )
if not rs.eof then
if rs(“管理员字段")=="1“ then
abc="管理员"
esle
abc="非管理员"
end if
session["uname"]=rs("用户名字段")
response.Write(abc&"登陆成功")
else
response.Write("登陆失败")
end if
%>