教程
Global.asa 文件是一个可选的文件,它可包含可被ASP应用程序中每个页面访问的对象、变量以及方法的声明。
Global.asa 文件
Global.asa文件是一个可选的文件,它可包含可被ASP应用程序中每个页面访问的对象、变量以及方法的声明。所有合法的浏览器脚本都能在Global.asa中使用。
Global.asa 文件可包含下列内容:
- Application事件
- Session事件
- <object>声明
- TypeLibrary声明
- #include命令
注释:Global.asa 文件须存放于ASP应用程序的根目录中,且每个应用程序只能有一个Global.asa文件。
Global.asa中的事件
在Global.asa中,我们可以告知application和session对象在启动和结束时做什么事情。完成此项任务的代码被放置在事件操作器中。Global.asa文件能包含四种类型的事件:
此事件会在首位用户从ASP应用程序调用第一个页面时发生。此事件会在web服务器重起或者Global.asa文件被编辑之后发生。"Session_OnStart"事件会在此事件发生之后立即发生。
Session_OnStart - 此事件会在每当新用户请求他或她的在ASP应用程序中的首个页面时发生。
Session_OnEnd - 此事件会在每当用户结束session时发生。在规定的时间(默认的事件为20分钟)内如果没有页面被请求,session就会结束。
此事件会在最后一位拥有结束其session之后发生。典型的情况是,此事件会在Web服务器停止时发生。此子程序用于在应用程序停止后清除设置,比如删除记录或者向文本文件写信息。
Global.asa文件可能类似这样:
<script language="vbscript" runat="server">sub Application_OnStart 'some codeend subsub Application_OnEnd 'some codeend subsub Session_OnStart 'some codeend subsub Session_OnEnd 'some codeend sub</script>
注释:由于无法使用ASP的脚本分隔符(<% and %>)在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>
You could reference the object "MyAd" from any page in the ASP application:
某个.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 | 可选。Optional. 用于类型库的地区标识符。 |
错误值
服务器会返回以下的错误消息之一:
错误 | 代码 | 描述 |
---|---|---|
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_OnStartSession("started")=now()end sub</script>
Global.asa也可用于控制页面访问。
下面的例子展示如何把每位新的访问者重定向到另一个页面,在这个例子中会定向到"newpage.asp"这个页面:
<script language="vbscript" runat="server">sub Session_OnStartResponse.Redirect("newpage.asp")end sub</script>
我们还可以在Global.asa中引用函数。
在下面的例子中,当Web服务器启动时,Application_OnStart子例程也会启动。随后,Application_OnStart子例程会调用另一个名为"getcustomers"的子例程。"getcustomers"子例程会打开一个数据库,然后从"customers"表中取回一个记录集。此记录集会赋值给一个数组,在不查询数据库的情况下,这个数组可被任意的ASP页面访问:
<script language="vbscript" runat="server">sub Application_OnStartgetcustomersend subsub 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.GetRowsrs.Closeconn.Closeend 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_OnStartApplication("visitors")=0End SubSub Session_OnStartApplication.LockApplication("visitors")=Application("visitors")+1Application.UnLockEnd SubSub Session_OnEndApplication.LockApplication("visitors")=Application("visitors")-1Application.UnLockEnd Sub</script>
此ASP文件会显示当前用户的数目:
<html><head></head><body><p>There are <%response.write(Application("visitors"))%>online now!</p></body></html>