分享
 
 
 

利用ASP显示当前在线人数

王朝asp·作者佚名  2006-12-16
窄屏简体版  字體: |||超大  

眼下,作网站已成为一种时尚,各式各样的网站如雨后春笋般冒了出来。有用CGI制作的,有用ASP制作的,还有用PHP制作的,不一而足。有一些网站则能统计出当前的在线人数,如:“目前有32人在线”。那么,用ASP制作的网站怎样显示当前的在线人数呢?

当用ASP制作的网页都存放与WWW服务器的基点目录并且WWW服务器启动之后,每当有对ASP文件的HTTP请求时,服务器都会去读取基点目录下的Global.asa文件。为了统计网站的在线人数,我们可以在Global.asa文件中包含如下代码:

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart

' 当服务器开启时,设置用户计数器为0

Application("ActiveUsers") = 0

End Sub

Sub Session_OnStart

' 设置Session对象的有效时间为20分钟(也可以更长,但是越长对服务器的资源' 占用越多,因为服务器不接受少于20分钟的有效时间,所以设置少于20分钟的'有效时间是无效的)

Session.Timeout = 20

' 当开始一个Session时用户计数器加1

Application.Lock

Application("ActiveUsers") = Application("ActiveUsers") + 1

Application.UnLock

End Sub

Sub Session_OnEnd

' 当结束一个Session时用户计数器减1

Application.Lock

Application("ActiveUsers") = Application("ActiveUsers") - 1

Application.UnLock

End Sub

</SCRIPT>

这样,网站的在线人数就被统计出来了,我们可以利用如下一个ASP页面(js.asp)将它显示出来: jsh.asp:

<%@ Language=VBScript %>

<HTML>

<HEAD>

<TITLE>统计在线人数</TITLE>

</HEAD>

<BODY>

<B><FONT COLOR="#CC0000">当前在线<%= Application("ActiveUsers") %>人</FONT></B>

</BODY>

</HTML>

以上代码是我在Win NT(IIS 4.0)下调试并通过了的。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有