这个问题我的办法是，用户有个活跃时间间隔问题。超过这个活跃时间间隔的则可以认为是离线，后者可以登陆 ，如果无后者登陆，但并不是说前者就需要重新登陆了。因为他的session还在的。只能是这个时间设置的越小越精确，也是不能做到绝对的。
代码贴出来给楼主参考下。

Function CheckOnline()	DIM IP,rsPrv,Sql,PrvDbState	PrvDbState = False	If DBSTATE = False Then		DbOpen()		PrvDbState = True	End If	Set rsPrv=Server.CreateObject("ADODB.Recordset")	If Session("UserName") = "" then		Sql="select * from [Online] where SessionID='"& Session.Sessionid &"'"		rsPrv.Open Sql,Conn,1,3		If rsPrv.Eof then			rsPrv.AddNew			rsPrv("SessionID") = Session.SessionID			rsPrv("GroupChargeLv") = -1			rsPrv("LastActTime") = Now()			rsPrv("UserIP") = GetIP			rsPrv("OnLineTime") = 0			rsPrv("UserWhere") = Request.ServerVariables("HTTP_REFERER")		Else			rsPrv("UserWhere") = Request.ServerVariables("HTTP_REFERER")			rsPrv("OnLineTime") = rsPrv("OnLineTime") + DateDiff("n",rsPrv("LastActTime"),Now())			rsPrv("LastActTime") = Now()		End If		rsPrv.Update		rsPrv.Close()		'response.Write "notlogin"	Else		'response.Write "logined"		Sql="select * from [Online] where UserName='"& Session("UserName") &"'"		rsPrv.Open sql,Conn,1,3		If rsPrv.Eof then			rsPrv.AddNew			rsPrv("SessionID") = Session.SessionID			rsPrv("UserName") = Session("UserName")			rsPrv("GroupChargeLv") = Session("GroupChargeLv")			rsPrv("LastActTime") = Now()			rsPrv("OnLineTime") = 0			rsPrv("UserIP")= GetIP			rsPrv("UserWhere") = Request.ServerVariables("HTTP_REFERER")		Else			If rsPrv("SessionID") <> Session.SessionID And Application("LoginSet")(1) = False Then				InfoTo "LoginOut.asp","该帐户已在其他地方登陆，网站设置1个ID只能有1个登陆n你可以稍候尝试登陆。"				Response.End()			End If			rsPrv("UserWhere") = Request.ServerVariables("HTTP_REFERER")			rsPrv("OnLineTime") = rsPrv("OnLineTime") + DateDiff("n",rsPrv("LastActTime"),Now())			rsPrv("LastActTime")=Now() 		End If		rsPrv.Update		rsPrv.Close()	End If	Set rsPrv = Nothing		If DateDiff("s",Application("OnLineLastDelete"),Now()) > Int(Application("DELETEONLINEDIFF")) Then		Application.Lock()			Application("OnLineLastDelete") = now		Application.UnLock()		Conn.ExeCute("delete from [Online] where datedIff('s',LastActTime,Now())>"&	Int(Application("CHECKONLINEDIFF") &"")) '删除x秒没有活动的访客	End If		If PrvDbState = True Then DbClose()	End Function

魔客吧温馨提示：如果您正在寻找网站后台模板，那么到魔客吧的 后台模板 频道看看吧，说不定有你喜欢的哦！

分享到 更多 <script type="text/javascript" id="bdshell_js"></script><script type="text/javascript">document.getElementById("bdshell_js").src = "http://share.baidu.com/static/js/shell_v2.js?cdnversion=" + new Date().getHours();</script> 本文地址：http://www.moke8.com/article-19420-1.html
文章标题：如何限制同一用户名同时登陆 收藏邀请 最新分享资源

响应式建筑建材水泥网站dede模板

dedecms模板 by moke

响应式货运物流网站dedecms模板

dedecms模板 by moke

生态农业酷站HTML模版

div+css模板 by hexipeng

智能家居网站+手机端织梦模板

dedecms模板 by moke

最新评论

评论

相关分类

• PHP编程
• ASP编程
• NET编程
• JSP编程
• MSSQL教程
• MYSQL教程

精品推荐

精华 中英双语响应式电子企业织梦模板

dedecms模板 by moke

极品资源

极品 高端建筑装饰带手机版十配色织梦模板

dedecms模板 by moke

原创模板

魔币 多配色创意metro风格企业

下载排行

• 01响应式网站网络设计公司织梦
• 02响应式货运物流网站dedecms模
• 03智能家居网站+手机端织梦模板
• 04响应式建筑建材水泥网站dede
• 05生态农业酷站HTML模版

资源分类

企业网站模板 企业网站源码 个人网站模板 个人网页模板 手机wap网站 门户网站模板 商业源码 淘宝客程序 html5网站 网站后台模板 html网页模板 学校网站模板 <script type="text/javascript">var cookieLogin = Ajax("TEXT");cookieLogin.get("connect.php?mod=check&op=cookie", function() {});</script><script type="text/javascript">_attachEvent(window, 'load', getForbiddenFormula, document);function getForbiddenFormula() {var toGetForbiddenFormulaFIds = function () {ajaxget('plugin.php?id=cloudsearch&formhash=16487be0');};var a = document.body.getElementsByTagName('a');for(var i = 0;i < a.length;i++){if(a[i].getAttribute('sc')) {a[i].setAttribute('mid', hash(a[i].href));a[i].onmousedown = function() {toGetForbiddenFormulaFIds();};}}var btn = document.body.getElementsByTagName('button');for(var i = 0;i < btn.length;i++){if(btn[i].getAttribute('sc')) {btn[i].setAttribute('mid', hash(btn[i].id));btn[i].onmousedown = function() {toGetForbiddenFormulaFIds();};}}}</script>

联系我们 | 关于我们 | 招商加盟 | 版权声明 | 帮助中心 | 广告服务 | 网站地图

欢迎浏览魔客吧提供的 如何限制同一用户名同时登陆 信息，若本站中的信息侵犯了您的权益，请与本站管理员联系

Copyright @ 2010-2015 魔客吧 版权所有 蜀ICP备09014119号 川公网安备51050202000165号  <script type="text/javascript" src="http://tcss.qq.com/ping.js?v=1VERHASH" charset="utf-8"></script><script type="text/javascript" reload="1">pgvMain({"discuzParams":{"r2":"5238379","ui":0,"rt":"portal","pn":1,"qq":"000"},"extraParams":""});</script>

积分 0, 距离下一级还需 积分 <script type="text/javascript">_attachEvent(window, 'scroll', function(){showTopLink();});</script><script>(function(){ var bp = document.createElement('script'); var curProtocol = window.location.protocol.split(':')[0]; if (curProtocol === 'https'){ bp.src = 'https://zz.bdstatic.com/linksubmit/push.js'; } else{ bp.src = 'http://push.zhanzhang.baidu.com/push.js'; } var s = document.getElementsByTagName("script")[0]; s.parentNode.insertBefore(bp, s);})();</script> <script type="text/javascript"> var tipsinfo = '5238379|X2.5|0.6||0||0|7|1505358008|81a5d9744b8b8cee0be5509220853d84|2'; </script> <script src="http://discuz.gtimg.cn/cloud/scripts/discuz_tips.js?v=1" type="text/javascript" charset="UTF-8"></script>