global.asa
script LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("ActiveUsers") = 0
' 從0開始計起.不過你可以把它設得更多哦,這樣即使沒人在線,人家一來你網站還會看到有900多人在線呢.
End Sub
Sub Session_OnStart
Session.Timeout = 20
' 把Session超時設為30分鐘——這是噱頭之關鍵所在,你想設多少就設多少.
Session("Start") = Now
' Session 開始時間
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>
[1]
您可能感興趣的文章:- 不用Global.asa也能實現統計在線人數嗎？
- 被動式統計網站在線人數
- asp論壇在線人數統計研究
- 也談php網站在線人數統計
- javascript 傳統事件模型構造的事件監聽器實現代碼
- c#顯示當前在線人數示例
- 封裝了一個支持匿名函數的Javascript事件監聽器
- php+memcache實現的網站在線人數統計代碼
- PHP+jquery實時顯示網站在線人數的方法
- jsp利用application統計在線人數的方法
- php實現統計網站在線人數的方法
- ASP.NET中使用Application對象實現簡單在線人數統計功能
- php使用Session和文件統計在線人數
- 淺析JAVA中過濾器、監聽器、攔截器的區別
- 利用java監聽器實現在線人數統計
