APP资源网_中文资源在线官网_А天堂中文官网_中文在线APP资源下载网

暗黑3身份验证失败身份证未通过验证解决办法

在ASP应用中验证用户身份5

人气:1引自:APP资源下载网

五、会话终止 当ASP会话结束时会运行global.asa中的Session_OnEnd方法,可以在这里删除 保存在Application("Users")数组中由于超时而被终止会话的用户。记录用户是由 于什么原因(超时还是显式退出)终止会话往往很有用处,下面的代码通过更新Users 表的TimedOut字段实现该功能: sub Session_OnEnd dim AppUsers dim aUser dim I dim j dim conn dim supportsCookies dim foundUser on error resume next supportsCookies=Session("SupportsCookies") Application.Lock AppUsers = Application("Users") foundUser = false for I = 0 to ubound(AppUsers) set aUser = AppUsers(I) if supportsCookies then if aUser("SessionID") = Session.SessionID then foundUser = true end if elseif dateAdd("n", Session.timeout, aUser("LastActivity")) < now() then foundUser = true end if if foundUser then set conn = server.createObject("ADODB.Connection") conn.ConnectionString=Session("ConnectionString") conn.ConnectionTimeout=Session("ConnectionTimeout") conn.mode=Session("Mode") conn.open conn.execute UPDATE Users SET TimedOut=1 WHERE Users.Signon='" & aUser("Signon") & '" conn.close set conn=nothing set aUser=nothing set AppUsers(I) = nothing for j = I to ubound(AppUsers) - 1 set AppUsers(j) = AppUsers(j + 1) next if ubound(AppUsers) > 0 then redim preserve AppUsers(ubound(AppUsers) - 1) else AppUsers = Array() end if exit for end if next Application("Users") = AppUsers Application.UnLock end sub

专题文集:软件资讯 windows
引用标题:《暗黑3身份验证失败身份证未通过验证解决办法》
来源地址:https://www.xjanfang.cn/news/tpart-2626.html