浅淡如何用ASP实现在线人数统计

答案：                浅淡如何用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://old.zzzyk.com/article/Article/″＆″http://xxxx.com.cn/pic″＆″/″＆disp(i)＆″.gif〉″ 

　　response.write ″document.write(′　″＆images(i)＆″ ′);″ 

　　next ％〉 

    若那位大虾有更好的方法， 也顺便告诉我一下：fz_chenjl@163.net. OK? 

上一个：用COM和ASP创建动态Word文档(转)
下一个：对中英文字符串的长度的一点小解