溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

ASP中Global.asa文件的示例分析

發(fā)布時(shí)間:2021-09-15 18:45:55 來(lái)源:億速云 閱讀:117 作者:小新 欄目:編程語(yǔ)言

小編給大家分享一下ASP中Global.asa文件的示例分析,希望大家閱讀完這篇文章之后都有所收獲,下面讓我們一起去探討吧!

Global.asa 文件是一個(gè)可選的文件,它可包含可被 ASP 應(yīng)用程序中每個(gè)頁(yè)面訪問(wèn)的對(duì)象、變量以及方法的聲明。

Global.asa 文件

Global.asa 文件是一個(gè)可選的文件,它可包含可被 ASP 應(yīng)用程序中每個(gè)頁(yè)面訪問(wèn)的對(duì)象、變量以及方法的聲明。所有合法的瀏覽器腳本都能在 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)和結(jié)束時(shí)做什么事情。完成這項(xiàng)任務(wù)的代碼被放置在事件操作器中。Global.asa 文件能包含四種類型的事件:

Application_OnStart - 此事件會(huì)在首位用戶從 ASP 應(yīng)用程序調(diào)用第一個(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)的事件為 20 分鐘)內(nèi)如果沒(méi)有頁(yè)面被請(qǐng)求,session 就會(huì)結(jié)束。

Application_OnEnd - 此事件會(huì)在最后一位用戶結(jié)束其 session 之后發(fā)生。典型的情況是,此事件會(huì)在 Web 服務(wù)器停止時(shí)發(fā)生。此子程序用于在應(yīng)用程序停止后清除設(shè)置,比如刪除記錄或者向文本文件寫信息。

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>

注釋:由于無(wú)法使用 ASP 的腳本分隔符 (<% 和 %>) 在 Global.asa 文件中插入腳本,我們需使用 HTML 的 <script> 元素。

<object> 聲明

可通過(guò)使用 <object> 標(biāo)簽在 Global.asa 文件中創(chuàng)建帶有 session 或者 application 作用域的對(duì)象。

注釋:<object> 標(biāo)簽應(yīng)位于 <script> 標(biāo)簽之外。

語(yǔ)法:

<object runat="server" scope="scope" id="id"
{progid="progID"|classid="classID"}>
....
</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ì)象指定唯一的 id。ProgID 或 ClassID 必需被指定。

實(shí)例

第一個(gè)實(shí)例創(chuàng)建了一個(gè)名為 "MyAd" 且使用 ProgID 參數(shù)的 session 作用域?qū)ο螅?/p>

<object runat="server" scope="session" id="MyAd" progid="MSWC.AdRotator">
</object>

第二個(gè)實(shí)例創(chuàng)建了名為 "MyConnection" 且使用 ClassID 參數(shù)的

<object runat="server" scope="application" id="MyConnection"classid="Clsid:8AD3067A-B3FC-11CF-A560-00A0C9081C21">
</object>

在此 Global.asa 文件中聲明的這些對(duì)象可被應(yīng)用程序中的任何腳本使用。

GLOBAL.ASA:

<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ò)誤。假如您的站點(diǎn)的應(yīng)用程序依賴于已在類型庫(kù)中聲明過(guò)數(shù)據(jù)類型的 COM 對(duì)象,您可以在 Global.asa 中對(duì)類型庫(kù)進(jìn)行聲明。

語(yǔ)法:

<!--METADATA TYPE="TypeLib"
file="filename"
uuid="typelibraryuuid"
version="versionnumber"
lcid="localeid"
-->

參數(shù)            描述

file            規(guī)定指向類型庫(kù)的絕對(duì)路徑。參數(shù) file 或者 uuid,兩者缺一不可。

uuid          規(guī)定了針對(duì)類型庫(kù)的唯一的標(biāo)識(shí)符。參數(shù) file 或者 uuid,兩者缺一不可。

version     可選。用于選擇版本。假如沒(méi)有找到指定的版本,將使用最接近的版本。

lcid           可選。用于類型庫(kù)的地區(qū)標(biāo)識(shí)符。

錯(cuò)誤值

服務(wù)器會(huì)返回以下的錯(cuò)誤消息之一:

錯(cuò)誤        代碼        描述

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 標(biāo)簽可位于 Global.asa 文件中的任何位置(在 <script> 標(biāo)簽的內(nèi)外均可)。不過(guò),我們還是推薦將 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 常用于對(duì)變量進(jìn)行初始化。

下面的例子展示如何檢測(cè)訪問(wèn)者首次到達(dá)站點(diǎn)的確切時(shí)間。時(shí)間存儲(chǔ)在名為 "started" 的 Session 對(duì)象中,并且 "started" 變量的值可被應(yīng)用程序中的任何 ASP 頁(yè)面訪問(wèn):

<script language="vbscript" runat="server">
sub Session_OnStart
Session("started")=now()
end sub
</script>

Global.asa 也可用于控制頁(yè)面訪問(wèn)。

下面的例子展示如何把每位新的訪問(wèn)者重定向到另一個(gè)頁(yè)面,在這個(gè)例子中會(huì)定向到 "newpage.asp" 這個(gè)頁(yè)面:

<script language="vbscript" runat="server">
sub Session_OnStart
Response.Redirect("newpage.asp")
end sub
</script>

我們還可以在 Global.asa 中包含函數(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ù)組:

<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 實(shí)例

在這個(gè)例子中,我們要?jiǎng)?chuàng)建一個(gè)可計(jì)算當(dāng)前訪客的 Global.asa 文件。

Application_OnStart 設(shè)置當(dāng)服務(wù)器啟動(dòng)時(shí),Application 變量 "visitors" 的值為 0。

每當(dāng)有新用戶訪問(wèn)時(shí),Session_OnStart 子例程就會(huì)給變量 "visitors" 加 1。

每當(dāng) Session_OnEnd 子例程被觸發(fā)時(shí),此子例程就會(huì)從變量 "visitors" 減 1。

Global.asa 文件:

<script language="vbscript" runat="server">
Sub Application_OnStart
Application("visitors")=0
End Sub
Sub Session_OnStartApplication.LockApplication("visitors")=Application("visitors")+1Application.UnLockEnd SubSub Session_OnEndApplication.LockApplication("visitors")=Application("visitors")-1Application.UnLockEnd Sub</script>
此 ASP 文件會(huì)顯示當(dāng)

前用戶的數(shù)目:

<html>
<head>
</head>
<body>
<p>There are <%response.write(Application("visitors"))%> online now!</p>
</body>
</html>

看完了這篇文章,相信你對(duì)“ASP中Global.asa文件的示例分析”有了一定的了解,如果想了解更多相關(guān)知識(shí),歡迎關(guān)注億速云行業(yè)資訊頻道,感謝各位的閱讀!

向AI問(wèn)一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI