欢迎来到天天文库
浏览记录
ID:10363507
大小:53.50 KB
页数:3页
时间:2018-07-06
《用asp程序实现网站在线人数统计》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、用ASP程序实现网站在线人数统计>>教育资源库在浏览网页的时侯,常常可以看见一些“当前网站上的人数是XXX人”的在线人数同计。如何用ASP来做一个呢?首先,分析一下它的做法,一般来说,这些线上人数统计都是指一个时段内的访客人数统计。比如(5分钟内,10分钟内)而这个时间的长短,是由设计者设定的。 在这个时段内同计各个不同IP的访客总数,就可以得出当前的线上人数了,但这里有一个精确问题需要解决,至于用什么办法来精确地统计,那就是各人不同的做法了,比如可以用自动提交的页面,隔一段时间读取COOKIES等等,而在ASP中,有一个更好的技巧
2、,就是使用session对象来统计,这里介绍一下gobal.asa这个文件,这是一个很重要的一个文件,请看看它的结构。<SCRIPTLANGUAGE="VBScript"RUNAT="Server">SubSession_OnStartEndSubSubSession_OnEndEndSubsubApplication_OnStardEndSubsubApplication_OnEndEndSub</SCRIPT> 当有一个会话发生时(用户浏览网页,向eout=X(分钟) 好了,有了这个很好用的方法,我们就能准确地统计出在线人数了
3、,而人数总计是用一个application变量来保存,当在第一个会话开始时,在Application_OnStard事件中放置一条清空计数器的语句application("online")=0,然后,在Session_OnStart事件中,放置一条增加在线人数的语句application("online")=application("online")+1,而在Session_OnEnd事件相应地放一条减少在线人数的语句,令计数值减一。 这样,这个文件就改为如下<SCRIPTLANGUAGE="VBScript"RUNAT="Serv
4、er">SubSession_OnStartapplication("online")=application("online")+1EndSubSubSession_OnEndapplication("online")=application("online")-1EndSubsubApplication_OnStardapplication("online")=0EndSubsubApplication_OnEndapplication("online")=0EndSub</SCRIPT> 接下来编一个显示图形数字的程序,把在线
5、人数显示在指定的页面上。这样就能得出在人数了*online.asp<%language="vbscript"%><%tmp=application("online")tmp=Cstr(tmp)dimdisp(20)dimimages(20)dbbits=len(tmp)forI=1todbbitsdisp(I)=left(right(tmp,I),I-(I-1))nextforI=dbbitsto1step-1images(I)="<imgsrc=""pic""/"disp(I)".gif>"response.ent.p;images
6、(I)");"next%> 上面的程序很简单,这里不作分析了,请大家自己阅读一下。在调用在线统计的页面上用一句script语句引用online.asp文件,以显示图形统计器。<scriptlanguage="JavaScript"src="online.asp"></script> 现在可以了,记住要点,你必须把gobal.asa放在正确的web应用程序根目录上,而最好单独为这个统计新建一个web应用程序,不要与其它别的程序混乱了,不然得出的数据是不准确的,而把这个程序修改为多用户的在线统计也很简单。这样就可以提供在线统计服务了,
7、如何实现请又大家去思考一下吧....>>>>这篇文章来自..,。
此文档下载收益归作者所有