我們都知道,.asa是文件后綴名。是Active Server Application的首字母縮寫。
它其實是一個可選文件,程序編寫者可以在該文件中指定事件腳本,并聲明具有會話和應用程序作用域的對象。該文件的內容不是用來給用戶顯示的,而是用來存儲事件信息和由應用程序全局使用的對象。該文件必須存放在應用程序的根目錄內。每個應用程序只能有一個Global.asa文件。
關于Global.asa文件最常見的錯誤概念是它能為一般的使用的函數和子程序用作書庫。Global.asa文件僅能用于創建對象的引用和俘獲啟動,以及結束Application對象和Session對象。
Global.asa文件主要基于會話級事件被訪問,在以下三種情況下被調用:
當Application_OnStart或Application_OnEnd事件被觸發。 當Session_OnStart或Session_OnEnd事件被觸發。 當引用一個在Global.asa文件里被實例化的對象(Object)。Global.asa的標準文件格式如下:
<SCRIPT LANGUAGE="VBScript" RUNAT="Server"> Sub Application_OnStart 'Application_OnStart 當任何客戶首次訪問該應用程序的首頁時運行 End Sub Sub Session_OnStart 'Session_OnStart 當客戶首次運行 ASP 應用程序中的任何一個頁面時運行 End Sub Sub Session_OnEnd 'Session_OnEnd 當一個客戶的會話超時或退出應用程序時運行 End Sub Sub Application_OnEnd 'Application_OnEnd 當該站點的 WEB 服務器關閉時運行 End Sub </SCRIPT>
一、Session_onStart
先看一個控制用戶進入頁面的代碼:
1、Global.asa(放在被調試的虛擬目錄的根目錄下面)
<SCRIPT LANGUAGE="VBScript" RUNAT="Server"> Sub Session_OnStart '只要是用戶第一次登錄本站,則會跳轉到首頁 response.redirect(//www.49028c.com) End Sub </SCRIPT>
然后調試當前虛擬目錄下的任何文件,你會發現所有頁面都跳轉向http://www.webjx.com/<
通過此“強制進入某頁”的例子,可以想象當首頁需要被關注的時候是非常有必要的。
下面就以一個“在線人數”的例子來繼續觀察Session_OnStart和Session_OnEnd事件
二、Session_onEnd
2、Global.asa(放在被調試的虛擬目錄的根目錄下面)
<SCRIPT LANGUAGE=VBScript RUNAT=Server> Sub Application_onStart '初始值為0 Application("OnLine") = 0 End Sub Sub Session_onStart '一個用戶訪問進行記數加1 Application.Lock Application("OnLine") = Application("OnLine") + 1 Application.Unlock End Sub Sub Session_OnEnd '一個用戶進程的結束,記數減1 (P.S.如果沒有該事件程序,則執行的就是頁面訪問程序了。) Application.Lock Application("OnLine") = Application("OnLine") - 1 Application.Unlock End Sub </SCRIPT>
3、online.asp
<% if request.querystring("logout")="true" then session.Abandon() response.end end if %> 當前共有<%=Application("OnLine")%>在線 <a href="online.asp?logout=true">退出</a>
新聞熱點
疑難解答