在线通宵等~asp浏览网页权限代码~

在线通宵等~asp浏览网页权限代码~

'假设session("mem")=1

<%if session("mem")=1 then

response.write "-AAA-"

else

response.write ""

end if

%>

我了解你的心情哈哈我也是这么过来的。看在这份上。分少也没关系了！我现在已经忘记了 不过我把我以前写的网站的那个登陆验证页发给你看看吧！ 我是不用conn.asp的，所以自己酌情删减一些吧！

<%

set conn=server.createobject("adodb.connection")

conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("#mysjdk.mdb")

set rs=server.createobject("adodb.recordset")

str="select * from fpcwodeyonghu where yonghu='" & request.form("user") &"' and mima='" & request.form("pass") & "'"

rs.open str,conn,1,2,1

if not rs.bof and not rs.eof then

session.Timeout = 180

session("yanzheng") = ("ok") '帐号密码对得上,通过验证.

session("user") = trim(request.form("user")) '保存当前用户名

session("pass") = trim(request.form("pass")) '保存当前用户密码

rs.close

set rs=nothing

conn.close

set conn=nothing

response.redirect "index.asp" '登陆成功返回首页.

else

rs.close

set rs=nothing

conn.close

set conn=nothing

response.redirect "index.asp" '账号密码错误返回首页.

end if

%>

session("user") = trim(request.form("user")) '保存当前用户名

session("pass") = trim(request.form("pass")) '保存当前用户密码

这两句对你没用吧?

我的session("user")是用来在首页这样的:

欢迎您的登陆,session("user")!

而session("pass")是将当前密码保存下来万一用户要修改密码时读取原密码的.

哎今天心情不好极了,我们有缘啊随便宣泄一下呵呵因为我在翻几十页后的0点问题回复的. 哈哈儿女私情了的! 和你说哦我是初中生哈哈你相信不? 其实我从来不这么对别人说的.不过今天特殊我心情很特别,随便找个人就想说话了. 现在的学生都是这样,早恋的大把不过我不是只是某些原因啊 真想快毕业了就好了 就差半年了!!

上面的是登陆验证页,另外提醒一下.在要加权限的网页里.最好这样写(我拿我的做例子)这个是需要加权限的网页:

if session("yanzheng") = ("ok") then

else

response.redirect "error.htm"

end if

加在需要加权限的网页的最上面!这段意思是如果已经登陆了的就没事发生继续显示,否则就跳转到错误页面error.htm 所以这段一定要放需要加权限的网页的最上面.

error.htm就这么写:

您没有足够权限阅读本文!

哈哈其实我也是用些方便些的方法而已.至于真正的企业大网站是怎么处理这一类错误的,我也不太清楚.没学过做那种网站.

有事在这里留话或者pm我吧 qq不留了因为在知道留qq太可怕了以前就是这样所以现在不学这个了也很多人问我东西正烦谅解.