世界征服者3 技能:有什么更好的方法处理ASP页面的权限问题?

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/05 10:04:56
我是这样做,
建个用户表,加个权限字段limit[当然包括高级和普通],内容可以这样写:|admin|public|
写一个函数,可以这样写:

Function CheckUser(LimitName)
打开数据库操作.
Dim Sql
Sql="select limit from [用户表] where Userid="& session("Userid") &""
rs.open sql,conn,3,1
If rs.eof then
response.write("<script>alert('对不起,权限未分配');</script>")
response.end()
else
if instr(rs("limit"),"|"& limitname &"|")>0 then
exit function
else
response.write("<script>alert('对不起,你没有权限');</script>")
response.end()
end if
end if
End Function

写完后,比如admin.asp这个页面要用到超级权限,就在顶部加个代码:
<%
CheckUser("admin")
%>
如有的面面要用到普通权限,就这样写:
<%
CheckUser("public")
%>