我想在网站加个计数器asp代码,谁可以跟我一个代码?谢谢

来源:百度知道 编辑:UC知道 时间:2024/06/06 20:59:49
我想在网站加个计数器asp代码,谁可以跟我一个代码?谢谢

根目录下面建立一个global.asa文件,如下所示:
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart
Application("ActiveUsers") = 0
End Sub

Sub Session_OnStart
Session.Timeout = 5
Session("Start") = Now
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") + 1
Application.UnLock
End Sub

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

</SCRIPT>

如果你要计算在线人数,就按上面的方法,如果你计算点击数,就把
Application("ActiveUsers") = Application("ActiveUsers") - 1去掉

在你要显示的页面加上这个代码
(当前在线<%=Application("ActiveUsers")%>人)