求教：如何实现访问人数的统计？？ - 编程论坛

#2

gaofangtao2005-08-05 00:25

看看这个可以吗？
<script language="vbscript" RunAt="server">
Sub Application_OnStart
Application("LogCount")=0
End Sub

Sub Session_OnStart
Application.Lock
Application("LogCount")=Application("LogCount")+1
Application.UnLock
End Sub

Sub Session_OnEnd
Application.Lock
Application("LogCount")=Application("LogCount")-1
Application.UnLock
End Sub

Sub Application_OnEnd

End Sub
</script>
以上代码存成Global.asa文件，放在网站根目录下

调用时只需写上
当前在线：<%=Application("LogCount")%>人
即可

#3

zdeq20002005-08-05 23:01

明天试试看,先谢啦

#4

奇迹网络2005-08-09 16:23

我试了怎么不行啊？

#5

yuyujia2005-08-09 19:55

要把Global.asa文件放在根目录下！