网页人数统计代码

*global.asa文件:


当有一个会话发生时（用户浏览网页，向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事件相应地放一条减少在线人数的语句，令计数值减一。

这样，这个文件就改为如下



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

＊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)=""

response.write "document.write('"&images(I)&"');"

next

%>

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



这个页面需要服务器的ASP语言支持,请详细参考自己的服务器情况.

最简单了


将上面这段另存为 global.asa 放在你网站根目录下。

调用时： 当前在线<%=application("zzzonline")%>人

使用cnzz，网页链接，安全、可靠、公正、第三方的网站流量统计分析系统。登陆之后，可以下载统计代码放到网站中。