浅淡如何用ASP实现在线人数统计
(jaklin 2000.8.17)
我发现这几天问此问题的人挺多的。就此我想说说我个的用法, 请各位大虾指教。
在线人数是指一个时段内的访客人数统计,时间的长短是由设计者设定的。
在这个时段内,各个不同IP访问本站点的总数,就是当前的线上人数。在ASP中,一般是使用Session对象来实现统计,实现代码如下:
1. 在Golobal.asa文件中:
〈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_OnStart
application(″online″)=0
End Sub
sub Application_OnEnd
application(″online″)=0
End Sub
〈/SCRIPT〉
2. Online.asp 文件内容
〈% 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://www.163design.net/a/q/″&″http://xxxx.com.cn/pic″&″/″&disp(i)&″.gif〉″
response.write ″document.write(′ ″&images(i)&″ ′);″
next %〉
若那位大虾有更好的方法, 也顺便告诉我一下:fz_chenjl@163.net. OK?