快捷導航

使用ASP記錄在線用戶的數(shù)量的代碼

更新時間：2007年11月23日 12:39:10 作者：

網(wǎng)絡(luò)的訪問量是每一個做網(wǎng)站的網(wǎng)友們都非常關(guān)心的問題。如何得知有多少個人正在訪問你的網(wǎng)站呢？如何將每天的訪問量記錄下來？下面就是一個解決方案。
　　當有用戶開始訪問網(wǎng)站時，服務(wù)器端的Global.asa將會被訪問。將會給用戶開啟一個Session?？梢越o每一個用戶設(shè)置自己的個人用戶信息。這里就不多進行解釋了。在Global.asa中有當Application啟動和Session啟動時的消息響應(yīng)函數(shù)?？梢郧萌肴缦碌拇a。

復制代碼代碼如下:

< SCRIPT LANGUAGE="VBScript" RUNAT="Server" >   
　Sub Application_OnStart   
　　　' 當服務(wù)器開啟時，設(shè)置用戶數(shù)為0   
　Application("Users") = 0   
　End Sub   
　Sub Session_OnStart   
　Session.Timeout = 20   
　　　' 當開始一個Session時用戶數(shù)加1   
　Application.Lock   
　Application("Users") = Application("Users") + 1   
　Application.UnLock   
　End Sub   
　Sub Session_OnEnd   
　　　' 當結(jié)束一個Session時用戶計數(shù)器減1   
　Application.Lock   
　Application("Users") = Application("Users") - 1   
　Application.UnLock   
　End Sub   
　< /SCRIPT >  

　　在網(wǎng)站運行時，Application變量 Application("Users")將一直記錄網(wǎng)站的在線人數(shù)?？梢栽谌魏我粋€網(wǎng)頁中使用寫出在線用戶的數(shù)量。至于記錄，則可以使用很多的方法。如果是記錄到文件中，可以使用Scripting.FileSystemObject物件進行處理。如果記錄到數(shù)據(jù)庫中，則可以使用ADO等等。這里就不一一介紹了。