网站在线人数、访问统计
哪位提供一下网站在线人数、访问统计方面的代码,我之前用Global.asa做的好想没用,请说明的详细一点
Global.asa:
<script language="VBScript" runat="Server">
Sub Application_onStart
Application("Count")=0
Application("Online")=0
end sub
Sub session_onStart
session.Timeout=5 //这里是设定会话结束时间(5分钟)
Application.Lock
Application("Count") = Cint(Application("Count")) + 1 //访问次数加1
Application("Online") = Cint(Application("Online")) + 1 //在线人数加1
Application.UnLock
end sub
Sub session_OnEnd
Application.Lock
Application("Online") = Cint(Application("Online")) - 1 //会话结束时在线人数减1
Application.UnLock
end sub
</script>
a.asp:
总访问人数:<%response.Write(application("Count"))%>人
当前在线:<%response.Write(application("Online"))%>人
把这上面的2个文件放在网站的根目录下,会不起效果吗?我这里测试了可以,关键点扩展名asa文件一定要放在根目录,否则不起作用,按理说a.asp位置无所未,但是因为初次测试的时候调用的是自己,可能会因为没有任何操作,而导致没有效果,所以测试的时候建议你把他们都放根目录下,至于精确度,当然这么点代码的人数统计精确度不高,好的精确的代码比较多,你可以上网查资料,然后自己试着去改改!