ASP Global.asa
Global.asa 文件
Global.asa 文件是一個(gè)可選的文件，它可包含被 ASP 應(yīng)用程序中每個(gè)頁(yè)面訪問(wèn)的對(duì)象、變量和方法的聲明。
所有合法的瀏覽器腳本（JavaScript、VBScript、JScript、PerlScript 等等）都能在 Global.asa 中使用。
Global.asa 文件只能包含下列內(nèi)容：
Application 事件
Session 事件
<object> 聲明
TypeLibrary 聲明
#include 指令
注釋：Global.asa 文件必須存放在 ASP 應(yīng)用程序的根目錄中，而且每個(gè)應(yīng)用程序只能有一個(gè) Global.asa 文件。
Global.asa 中的事件
在 Global.asa 中，您可以告訴 application 和 session 對(duì)象當(dāng) application/session 開(kāi)始時(shí)做什么，當(dāng) application/session 結(jié)束時(shí)做什么。完成這項(xiàng)任務(wù)的代碼被放置在事件句柄中。Global.asa 文件能包含四種類型的事件：
Application_OnStart - 此事件會(huì)在第一個(gè)用戶調(diào)用 ASP 應(yīng)用程序的第一個(gè)頁(yè)面時(shí)發(fā)生。此事件會(huì)在 Web 服務(wù)器重啟或者 Global.asa 文件被編輯之后發(fā)生。"Session_OnStart" 事件會(huì)在此事件發(fā)生之后立即發(fā)生。Session_OnStart - 此事件會(huì)在每當(dāng)新用戶請(qǐng)求他（她）在 ASP 應(yīng)用程序中的第一個(gè)頁(yè)面時(shí)發(fā)生。
Session_OnEnd - 此事件會(huì)在每當(dāng)用戶結(jié)束 session 時(shí)發(fā)生。在規(guī)定的時(shí)間（默認(rèn)的時(shí)間為 20 分鐘）內(nèi)如果用戶沒(méi)有請(qǐng)求任何頁(yè)面，用戶 session 就會(huì)結(jié)束。
Application_OnEnd - 此事件會(huì)在最后一個(gè)用戶結(jié)束其 session 之后發(fā)生。典型的情況是，此事件會(huì)在 Web 服務(wù)器停止時(shí)發(fā)生。這個(gè)子程序用于在應(yīng)用程序停止后清除設(shè)置，比如刪除記錄或者向文本文件中寫(xiě)入信息。
一個(gè) Global.asa 文件可能如下所示：
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>
注釋：由于我們無(wú)法在 Global.asa 文件中使用 ASP 的腳本分隔符 (<% 和 %>) 插入腳本，我們需要把子例程放置在 HTML 的 <script> 元素內(nèi)部。
<object> 聲明
可通過(guò)使用 <object> 標(biāo)簽在 Global.asa 文件中創(chuàng)建帶有 session 或者 application 作用域的對(duì)象。
注釋：<object> 標(biāo)簽應(yīng)位于 <script> 標(biāo)簽外部！
語(yǔ)法
....
</object>
| 參數(shù) | 描述 |
|---|---|
| scope | 設(shè)置對(duì)象（Session 或 Application）的作用域。 |
| id | 為對(duì)象指定一個(gè)唯一的 id。 |
| ProgID | 與 ClassID 關(guān)聯(lián)的 id。ProgID 的格式是：[Vendor.]Component[.Version]。 ProgID 或 ClassID 必需被指定。 |
| ClassID | 為 COM 類對(duì)象指定一個(gè)唯一的 id。 ProgID 或 ClassID 必需被指定。 |
實(shí)例
第一個(gè)實(shí)例通過(guò)使用 ProgID 參數(shù)創(chuàng)建了一個(gè)名為 "MyAd" 的 session 作用域?qū)ο螅?/p>
</object>
第二個(gè)實(shí)例通過(guò)使用 ClassID 參數(shù)創(chuàng)建了一個(gè)名為 "MyConnection" 的 application 作用域?qū)ο螅?/p>
classid="Clsid:8AD3067A-B3FC-11CF-A560-00A0C9081C21">
</object>
在 Global.asa 文件中聲明的對(duì)象可被應(yīng)用程序中的任何腳本使用：
<object runat="server" scope="session" id="MyAd" progid="MSWC.AdRotator">
</object>
您可以從 ASP 應(yīng)用程序中的任意頁(yè)面引用 "MyAd" 對(duì)象：
某個(gè) .ASP 文件：
<%=MyAd.GetAdvertisement("/banners/adrot.txt")%>
TypeLibrary 聲明
TypeLibrary（類型庫(kù)）是一個(gè)容器，其中裝有對(duì)應(yīng)于 COM 對(duì)象的 DLL 文件。通過(guò)在 Global.asa 文件中包含對(duì) TypeLibrary 的調(diào)用，可以訪問(wèn) COM 對(duì)象的常量，同時(shí) ASP 代碼也能更好地報(bào)告錯(cuò)誤。如果您的 Web 應(yīng)用程序依賴于已在類型庫(kù)中聲明的數(shù)據(jù)類型的 COM 對(duì)象，您可以在 Global.asa 中對(duì)類型庫(kù)進(jìn)行聲明。
語(yǔ)法
file="filename" uuid="id" version="number" lcid="localeid"
-->
| 參數(shù) | 描述 |
|---|---|
| file | 規(guī)定指向類型庫(kù)的絕對(duì)路徑。 file 參數(shù)或者 uuid 參數(shù)，兩者缺一不可。 |
| uuid | 規(guī)定了類型庫(kù)的唯一的標(biāo)識(shí)符。 file 參數(shù)或者 uuid 參數(shù)，兩者缺一不可。 |
| version | 可選。用于選擇版本。如果沒(méi)有找到需要的版本，將使用最接近的版本。 |
| lcid | 可選。用于類型庫(kù)的地區(qū)標(biāo)識(shí)符。 |
錯(cuò)誤值
服務(wù)器會(huì)返回以下的錯(cuò)誤消息之一：
| 錯(cuò)誤代碼 | 描述 |
|---|---|
| ASP 0222 | 無(wú)效的類型庫(kù)規(guī)范 |
| ASP 0223 | 沒(méi)有找到類型庫(kù) |
| ASP 0224 | 無(wú)法加載類型庫(kù) |
| ASP 0225 | 無(wú)法包裝類型庫(kù) |
注釋：METADATA 標(biāo)簽可出現(xiàn)在 Global.asa 文件中的任何位置（在 <script> 標(biāo)簽的內(nèi)外皆可）。然而，我們還是推薦將 METADATA 標(biāo)簽放置于 Global.asa 文件的頂部。
限定
關(guān)于可以在 Global.asa 文件中引用的內(nèi)容的限定：
您無(wú)法顯示 Global.asa 文件中的文本。此文件無(wú)法顯示信息。
您只能在 Application_OnStart 和 Application_OnEnd 子例程中使用 Server 和 Application 對(duì)象。在 Session_OnEnd 子例程中，您可以使用 Server、Application 和 Session 對(duì)象。在 Session_OnStart 子例程中，您可以使用任何內(nèi)建的對(duì)象。
如何使用子例程
Global.asa 常用于初始化變量。
下面的實(shí)例演示了如何檢測(cè)訪客首次到達(dá) Web 站點(diǎn)的確切時(shí)間。時(shí)間存儲(chǔ)在名為 "started" 的 Session 對(duì)象中，并且 "started" 變量的值可被應(yīng)用程序中的任何 ASP 頁(yè)面訪問(wèn)：
sub Session_OnStart
Session("started")=now()
end sub
</script>
Global.asa 也可用于控制頁(yè)面訪問(wèn)。
下面的實(shí)例演示了如何把每個(gè)新的訪客重定向到另一個(gè)頁(yè)面，在這個(gè)例子中會(huì)定向到一個(gè)名為 "newpage.asp" 的頁(yè)面：
sub Session_OnStart
Response.Redirect("newpage.asp")
end sub
</script>
您可以在 Global.asa 文件中包含函數(shù)。
在下面的實(shí)例中，當(dāng) Web 服務(wù)器啟動(dòng)時(shí)，Application_OnStart 子例程也會(huì)啟動(dòng)。然后，Application_OnStart 子例程會(huì)調(diào)用另一個(gè)名為 "getcustomers" 的子例程。"getcustomers" 子例程會(huì)打開(kāi)一個(gè)數(shù)據(jù)庫(kù)，然后從 "customers" 表中取回一個(gè)記錄集。此記錄集會(huì)賦值給一個(gè)數(shù)組，在不查詢數(shù)據(jù)庫(kù)的情況下，任何 ASP 頁(yè)面都能夠訪問(wèn)這個(gè)數(shù)組：
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 實(shí)例
在這個(gè)實(shí)例中，我們將創(chuàng)建一個(gè)計(jì)算當(dāng)前訪客數(shù)量的 Global.asa 文件。
當(dāng)服務(wù)器啟動(dòng)時(shí)，Application_OnStart 設(shè)置 Application 變量 "visitors" 的值為 0。
每當(dāng)有新的訪客來(lái)訪時(shí)，Session_OnStart 子例程就會(huì)給變量 "visitors" 加 1。
每當(dāng) Session_OnEnd 子例程被觸發(fā)時(shí)，該子例程就會(huì)從變量 "visitors" 減 1。
Global.asa 文件：
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 文件中，顯示當(dāng)前訪客的數(shù)量：
<html>
<head>
</head>
<body>
<p>There are <%response.write(Application("visitors"))%> online now!</p>
</body>
</html>