學學習網 手機版

學學習網

學習路徑: 學習首頁 > web開發 > ASP >

WEB開發 之 ASP Global.asa 文件

設置字體:
----------------------------------
WEB開發 之 ASP Global.asa 文件
 
Global.asa 文件是一個可選的文件,它可包含可被 ASP 應用程序中每個頁面訪問的對象、變量以及方法的聲明。
 
Global.asa 文件
 
Global.asa 文件是一個可選的文件,它可包含可被 ASP 應用程序中每個頁面訪問的對象、變量以及方法的聲明。所有合法的瀏覽器腳本都能在 Global.asa 中使用。
 
Global.asa 文件可包含下列內容:
 
1.Application 事件
2.Session 事件
3.<object> 聲明
4.TypeLibrary 聲明
5.#include 指令
 
注釋:Global.asa 文件須存放于 ASP 應用程序的根目錄中,且每個應用程序只能有一個 Global.asa 文件。
 
Global.asa 中的事件
 
在 Global.asa 中,我們可以告知 application 和 session 對象在啟動和結束時做什么事情。完成這項任務的代碼被放置在事件操作器中。Global.asa 文件能包含四種類型的事件:
 
Application_OnStart - 此事件會在首位用戶從 ASP 應用程序調用第一個頁面時發生。此事件會在 web 服務器重起或者 Global.asa 文件被編輯之后發生。"Session_OnStart" 事件會在此事件發生之后立即發生。
 
Session_OnStart - 此事件會在每當新用戶請求他或她的在 ASP 應用程序中的首個頁面時發生。
 
Session_OnEnd - 此事件會在每當用戶結束 session 時發生。在規定的時間(默認的事件為 20 分鐘)內如果沒有頁面被請求,session 就會結束。
 
Application_OnEnd - 此事件會在最后一位用戶結束其 session 之后發生。典型的情況是,此事件會在 Web 服務器停止時發生。此子程序用于在應用程序停止后清除設置,比如刪除記錄或者向文本文件寫信息。
 
Global.asa 文件可能類似這樣:
 
<script language="vbscript" runat="server">
 
sub Application_OnStart
  'some code
end sub
 
sub Application_OnEnd
  'some code
end sub
 
sub Session_OnStart
  'some code
end sub
 
sub Session_OnEnd
  'some code
end sub
 
</script>
 
注釋:由于無法使用 ASP 的腳本分隔符 (<% 和 %>) 在 Global.asa 文件中插入腳本,我們需使用 HTML 的 <script> 元素。
 
<object> 聲明
 
可通過使用 <object> 標簽在 Global.asa 文件中創建帶有 session 或者 application 作用域的對象。
 
注釋:<object> 標簽應位于 <script> 標簽之外。
 
語法:
 
<object runat="server" scope="scope" id="id"
{progid="progID"|classid="classID"}>
....
</object>
 
參數 描述
scope 設置對象的作用域(作用范圍)(Session 或者 Application)。
id 為對象指定一個唯一的 id。
ProgID 與 ClassID 關聯的 id。ProgID 的格式是:[Vendor.]Component[.Version]。 ProgID 或 ClassID 必需被指定。
ClassID 為 COM 類對象指定唯一的 id。 ProgID 或 ClassID 必需被指定。
 
實例
 
第一個實例創建了一個名為 "MyAd" 且使用 ProgID 參數的 session 作用域對象:
 
<object runat="server" scope="session" id="MyAd" progid="MSWC.AdRotator">
</object>
 
第二個實例創建了名為 "MyConnection" 且使用 ClassID 參數的
 
<object runat="server" scope="application" id="MyConnection"
classid="Clsid:8AD3067A-B3FC-11CF-A560-00A0C9081C21">
</object>
 
在此 Global.asa 文件中聲明的這些對象可被應用程序中的任何腳本使用。
 
GLOBAL.ASA:
 
<object runat="server" scope="session" id="MyAd" progid="MSWC.AdRotator">
</object>
 
您可以從 ASP 應用程序中的任意頁面引用此 "MyAd" 對象:
 
某個 .ASP 文件:
 
<%=MyAd.GetAdvertisement("/banners/adrot.txt")%> 
 
TypeLibrary 聲明
 
TypeLibrary (類型庫)是一個容器,其中裝有對應于 COM 對象的 DLL 文件。通過在 Global.asa 中包含對 TypeLibrary 的調用,可以訪問 COM 對象的常量,同時 ASP 代碼也能更好地報告錯誤。假如您的站點的應用程序依賴于已在類型庫中聲明過數據類型的 COM 對象,您可以在 Global.asa 中對類型庫進行聲明。
 
語法:
 
<!--METADATA TYPE="TypeLib"
file="filename"
uuid="typelibraryuuid"
version="versionnumber"
lcid="localeid"
-->
 
參數 描述
file 規定指向類型庫的絕對路徑。參數 file 或者 uuid,兩者缺一不可。
uuid 規定了針對類型庫的唯一的標識符。參數 file 或者 uuid,兩者缺一不可。
version 可選。用于選擇版本。假如沒有找到指定的版本,將使用最接近的版本。
lcid 可選。用于類型庫的地區標識符。
 
錯誤值
 
服務器會返回以下的錯誤消息之一:
 
錯誤 代碼 描述
ASP 0222 Invalid type library specification
ASP 0223 Type library not found
ASP 0224 Type library cannot be loaded
ASP 0225 Type library cannot be wrapped
 
注釋:METADATA 標簽可位于 Global.asa 文件中的任何位置(在 <script> 標簽的內外均可)。不過,我們還是推薦將 METADATA 標簽放置于 Global.asa 文件的頂部。
 
限定
 
關于可以在 Global.asa 文件中引用的內容的限定:
 
你無法顯示 Global.asa 文件中的文本。此文件無法顯示信息。
 
你只能在 Application_OnStart 和 Application_OnEnd 子例程中使用 Server 和 Application 對象。在 Session_OnEnd 子例程中,你可以使用 Server、Application 和 Session 對象。在 Session_OnStart 子例程中,你可使用任何內建的對象。
 
如何使用子例程
 
Global.asa 常用于對變量進行初始化。
 
下面的例子展示如何檢測訪問者首次到達站點的確切時間。時間存儲在名為 "started" 的 Session 對象中,并且 "started" 變量的值可被應用程序中的任何 ASP 頁面訪問:
 
<script language="vbscript" runat="server">
sub Session_OnStart
Session("started")=now()
end sub
</script>
 
Global.asa 也可用于控制頁面訪問。
 
下面的例子展示如何把每位新的訪問者重定向到另一個頁面,在這個例子中會定向到 "newpage.asp" 這個頁面:
 
<script language="vbscript" runat="server">
sub Session_OnStart
Response.Redirect("newpage.asp")
end sub
</script>
 
我們還可以在 Global.asa 中包含函數。
 
在下面的例子中,當 Web 服務器啟動時,Application_OnStart 子例程也會啟動。隨后,Application_OnStart 子例程會調用另一個名為 "getcustomers" 的子例程。"getcustomers" 子例程會打開一個數據庫,然后從 "customers" 表中取回一個記錄集。此記錄集會賦值給一個數組,在不查詢數據庫的情況下,任何 ASP 頁面都能夠訪問這個數組:
 
<script language="vbscript" runat="server">
 
sub Application_OnStart
getcustomers
end sub
 
sub getcustomers 
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"
set rs=conn.execute("select name from customers")
Application("customers")=rs.GetRows
rs.Close
conn.Close
end sub
 
</script>
 
Global.asa 實例
 
在這個例子中,我們要創建一個可計算當前訪客的 Global.asa 文件。
 
Application_OnStart 設置當服務器啟動時,Application 變量 "visitors" 的值為 0。
 
每當有新用戶訪問時,Session_OnStart 子例程就會給變量 "visitors" 加 1。
 
每當 Session_OnEnd 子例程被觸發時,此子例程就會從變量 "visitors" 減 1。
 
Global.asa 文件:
 
<script language="vbscript" runat="server">
 
Sub Application_OnStart
Application("visitors")=0
End Sub
 
Sub Session_OnStart
Application.Lock
Application("visitors")=Application("visitors")+1
Application.UnLock
End Sub
 
Sub Session_OnEnd
Application.Lock
Application("visitors")=Application("visitors")-1
Application.UnLock
End Sub
 
</script>
 
此 ASP 文件會顯示當前用戶的數目:
 
<html>
<head>
</head>
<body>
<p>There are <%response.write(Application("visitors"))%> online now!</p>
</body>
</html>
 
----------------------------------
課程列表
重點難點
贊助鏈接
倾国妲己官网