*global.asa檔案:<SCRIPT LANGUAGE="VBScript" RUNAT="Server">Sub Session_OnStartEnd SubSub Session_OnEndEnd Subsub Application_OnStardEnd Subsub Application_OnEndEnd Sub</SCRIPT>當有一個會話發生時(使用者瀏覽網頁,向Web伺服器發出請求)那麼,如果自伺服器啟動後第一個使用者的話,就會同時發生Application_OnStard和Session_OnStart這兩個事件,之後,再有別的使用者發出請求的話,就只發生Session_OnStart這個事件,而session的生存期是多長,是可以設定的,Session.timeout=X(分鐘)好了,有了這個很好用的方法,我們就能準確地統計出線上人數了,而人數總計是用一個application變數來儲存,當在第一個會話開始時,在Application_OnStard事件中放置一條清空計數器的語句application("online")=0,然後,在Session_OnStart事件中,放置一條增加線上人數的語句application("online")=application("online") 1,而在Session_OnEnd事件相應地放一條減少線上人數的語句,令計數值減一。
*global.asa檔案:<SCRIPT LANGUAGE="VBScript" RUNAT="Server">Sub Session_OnStartEnd SubSub Session_OnEndEnd Subsub Application_OnStardEnd Subsub Application_OnEndEnd Sub</SCRIPT>當有一個會話發生時(使用者瀏覽網頁,向Web伺服器發出請求)那麼,如果自伺服器啟動後第一個使用者的話,就會同時發生Application_OnStard和Session_OnStart這兩個事件,之後,再有別的使用者發出請求的話,就只發生Session_OnStart這個事件,而session的生存期是多長,是可以設定的,Session.timeout=X(分鐘)好了,有了這個很好用的方法,我們就能準確地統計出線上人數了,而人數總計是用一個application變數來儲存,當在第一個會話開始時,在Application_OnStard事件中放置一條清空計數器的語句application("online")=0,然後,在Session_OnStart事件中,放置一條增加線上人數的語句application("online")=application("online") 1,而在Session_OnEnd事件相應地放一條減少線上人數的語句,令計數值減一。