















解决思路:
维护一online表,查看有登陆,就不允许再次登陆,以sessionid作为唯一标识符号,也可以产生一个GUID发到COOKIE中,以区分不同的CLIENT,再佐以JS,可以达到更好的效果,比如离开后自动离线
解决代码:

在表里增加一个字段online,字段类型为"是/否"或1,0.
当用户登录时,online设置为在线状态(true),下线时设置为离线状态(false).
建立global.asa在根目录下.利用session_onEnd事件,设置离线状态.
<script language="vbscript" runat="server">
sub Application_OnStart
Application("online") = 0
set Application("cn") = Server.CreateObject("ADODB.Connection")
Application("db") = Server.MapPath("bbs/note/note.mdb")
Application("cn").Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Application("db")
end sub
sub Application_OnEnd
Application("onlinde") = 0
end sub
sub Session_OnStart
end sub
sub Session_OnEnd
if Session("pass") then
Application("online") = Application("online") - 1
Application("cn").execute("update user_info set online = false where UID = "&session("UID"))
end if
end Sub
</script>
此内容由惯性聚合(RSS阅读器)自动聚合整理,仅供阅读参考。 原文来自 — 版权归原作者所有。