在浏览网页的时侯，常常可以看见一些“当前网站上的人数是ｘｘｘ人”的在线人数同计。如何用asp来做一个呢？首先，分析一下它的做法，一般来说，这些线上人数统计都是指一个时段内的访客人数统计。比如（5分钟内，10分钟内）而这个时间的长短，是由设计者设定的。

　　在这个时段内同计各个不同ｉｐ的访客总数，就可以得出当前的线上人数了，但这里有一个精确问题需要解决，至于用什么办法来精确地统计，那就是各人不同的做法了，比如可以用自动提交的页面，隔一段时间读取cookies等等，而在asp中，有一个更好的技巧，就是使用session对象来统计，这里介绍一下gobal.asa这个文件，这是一个很重要的一个文件，请看看它的结构。

＜script language="vbscript" runat="server"＞ sub session_onstart end sub sub session_onend end sub sub application_onstard end sub sub application_onend end sub＜/script＞

　　当有一个会话发生时（用户浏览网页，向web服务器发出请求）那么，如果自服务器启动后第一个用户的话，就会同时发生application_onstard和session_onstart这两个事件，之后，再有别的用户发出请求的话，就只发生session_onstart这个事件，而session的生存期是多长，是可以设定的，session.timeout=x（分钟）

　　好了，有了这个很好用的方法，我们就能准确地统计出在线人数了，而人数总计是用一个application变量来保存，当在第一个会话开始时，在application_onstard事件中放置一条清空计数器的语句application("online")=0，然后，在session_onstart事件中，放置一条增加在线人数的语句application("online")=application("online")+1，而在session_onend事件相应地放一条减少在线人数的语句，令计数值减一。
这样，这个文件就改为如下

＜script language="vbscript" runat="server"＞ sub session_onstart application("online")=application("online")+1 end sub sub session_onend application("online")=application("online")-1 end sub sub application_onstard application("online")=0 end sub sub application_onend application("online")=0 end sub＜/script＞

　　接下来编一个显示图形数字的程序，把在线人数显示在指定的页面上。这样就能得出在人数了

*online.asp ＜% @language="vbscript" %＞ ＜% tmp=application("online") tmp=cstr(tmp) dim disp(20) dim images(20) dbbits=len(tmp) for i= 1 to dbbits disp(i)=left(right(tmp,i),i-(i-1)) next for i=dbbits to 1 step -1 images(i)="＜img src="&"http://xxxx.com.cn/pic"&"/"&disp(i)&".gif＞" response.write "document.write("&images(i)&");" next %＞

　　上面的程序很简单，这里不作分析了，请大家自己阅读一下。在调用在线统计的页面上用一句script语句引用online.asp文件，以显示图形统计器。

＜script language="javascript" src="http://xxxx.com.cn/online.asp"＞＜/script＞

　　现在可以了，记住要点，你必须把gobal.asa放在正确的web应用程序根目录上，而最好单独为这个统计新建一个web应用程序，不要与其它别的程序混乱了，不然得出的数据是不准确的，而把这个程序修改为多用户的在线统计也很简单。这样就可以提供在线统计服务了，如何实现请又大家去思考一下吧....

文章整理：站长天空 网址：http://www.z6688.com/
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!