网络编程

asp实现一个统计当前在线用户的解决方案
网络编程 2025/6/8 佚名
3 2
一个统计当前在线用户的解决方案

在做一个在线交流的网站时，有个问题很令我头疼，就是关于实时统计在线用户的问题，客户要求：统计当前在线人数、游客人数、会员人数、在线用户列表，包括游客、会员和管理员（如果是游客，则自动生成游客的ID，如果是会员，则显示会员姓名）。因为它要求有实时性，则首先我将用global.asa解决的想法pass掉。

问题的关键是如何判断用户已经离开，和当用户离开时如何执行一个文件或一个函数。

经过和网上一些朋友的探讨，终于解决了这个问题。

解决的原理为：编写一个通用页面，所谓的通用页面，就是应用里的每个页面都包含这个页面，例如：header.asp，在这个页面里，用XMLHTTP写一段代码，这段代码的作用是每隔10秒或20秒就向服务器发送一个请求，目的是更新当前用户的在线时间并删除在线时间超过一定时间的用户，使数据库中的在线用户记录保持一定的实时性。

主要实现方法为：

新建一数据库，字段名称分别为：id（字符）,name（字符）,user（数字）tt（日期）,admin（权限代码，0-普通用户，1-管理员）

表名：online

header.asp ↓

============================================================

<%

... ...

if session("s_in")<>1 and session("s_name")="" then '如果用户是第一次登陆

rs.open "select * from online",conn,3,3
rs.addnew
rs("id")=session.sessionID
rs("name")="游客" & session.sessionID
rs("user")=0 '0表示用户未登陆，是游客身份
rs("tt")=now
rs.update
rs.close
session("s_in")=1 '设置用户的资料已经存入数据库，表示已经在线
end if

if session("s_name")<>"" then '如果用户已经通过登录框登录
rs.open "select * from online where id='" & session.sessionID & "'",conn,3,3
rs("name")=session("s_name")
rs("admin")=session("s_admin") '将用户的姓名更新为会员名称
rs("user")=1 '表示用户已经登陆，是会员身份
rs("tt")=now '将当前系统时间设置为用户的登陆时间
rs.update
rs.close
end if

... ...

%>

... ...

<head>

... ...

<script language=javascript>
function Test()
{
var xmlhttp = new ActiveXObject("MSXML2.XMLHTTP");
xmlhttp.open("POST","onceonline.asp",false); // 向onceonline.asp发送更新请求
xmlhttp.setRequestHeader("CONTENT-TYPE","application/x-www-form-urlencoded");
xmlhttp.send();
}
setInterval("Test();",10); // 10秒钟发送一次更新请求
</script>

... ...

</head>

... ...

==========================================================

onceonline.asp

<%
rs.open "select tt from online where id='" & session.sessionID & "'",conn,3,3
rs("tt")=now() '更新当前在线用户的在线时间
rs.update
rs.close

rs.open "delete from online where datediff('s',tt,now())>60",conn,3,1 '删除超时用户
%>

==============================================================

这样，基本保证了数据库中用户列表的实时性，误差取决于更新时间和删除时间的差值大小和服务器的处理速度，建议不要将删除超时用户的时间间隔取的过于小，那样有可能会导致在线用户0人的失误。

本方案在WIN2000+SQL Server2000上调试通过，由于本方案对系统要求比较大，期待其他朋友拿出更好的方案，一起解决这个问题！
标签：
asp,统计,在线用户
免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！ 如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com
白云城资源网 Copyright www.dyhadc.com
www.dyhadc.com 白云城资源网
129,905影音资源
244,626技术资源
111,817软件资源
578,645站长资源

《魔兽世界》大逃杀！60人新游玩模式《强袭风暴》3月21日上线

暴雪近日发布了《魔兽世界》10.2.6 更新内容，新游玩模式《强袭风暴》即将于3月21 日在亚服上线，届时玩家将前往阿拉希高地展开一场 60 人大逃杀对战。

艾泽拉斯的冒险者已经征服了艾泽拉斯的大地及遥远的彼岸。他们在对抗世界上最致命的敌人时展现出过人的手腕，并且成功阻止终结宇宙等级的威胁。当他们在为即将于《魔兽世界》资料片《地心之战》中来袭的萨拉塔斯势力做战斗准备时，他们还需要在熟悉的阿拉希高地面对一个全新的敌人──那就是彼此。在《巨龙崛起》10.2.6 更新的《强袭风暴》中，玩家将会进入一个全新的海盗主题大逃杀式限时活动，其中包含极高的风险和史诗级的奖励。

《强袭风暴》不是普通的战场，作为一个独立于主游戏之外的活动，玩家可以用大逃杀的风格来体验《魔兽世界》，不分职业、不分装备（除了你在赛局中捡到的），光是技巧和战略的强弱之分就能决定出谁才是能坚持到最后的赢家。本次活动将会开放单人和双人模式，玩家在加入海盗主题的预赛大厅区域前，可以从强袭风暴角色画面新增好友。游玩游戏将可以累计名望轨迹，《巨龙崛起》和《魔兽世界：巫妖王之怒 经典版》的玩家都可以获得奖励。

更新日志

友情链接

杰晶网络 DDR爱好者之家 南强小屋 黑松山资源网 白云城资源网 更多链接
白云城资源网 Copyright www.dyhadc.com