ASP Global.asa 参考(3)

四、Object

<OBJECT> 声明用户可以在 global.asa 文件中通过使用扩展的 <OBJECT> 标记创建带有会话或应用程序作用域的对象。该标记是自包含的，且
在任何 <SCRIPT> 标记之外。在 Global.asa 文件中声明的对象在服务器处理调用该对象之前是不会创建的。这样就只会创建必需的对象，从而节约了资源。
服务器对带有应用程序作用域参数创建的对象不调用 OnStartPage 和 OnEndPage 方法。语法
<OBJECT RUNAT=Server SCOPE=Scope ID=Identifier {PROGID="progID"|CLASSID="ClassID"}>. . .
</OBJECT> 参数Scope 指定对象的作用域。在 Global.asa 文件中，Scope 将被设置为 Session 或 Application。
Identifier 指定对象实例的名称。ProgID
与类标识相关的标识。无论 ProgID 还是 ClassID 都必须在 <OBJECT> 中指定。ProgID 的格式为 [Vendor.]Component
[.Version]。ClassID 指定 COM 类对象的唯一标识。 无论 ProgID 还是 ClassID 都必须在 <OBJECT> 中指定。 示例
下面的第一个示例使用 ProgID 参数创建一个对象，其会话作用域名为 MyConnection。第二个示例使用 ClassID 参数。
<OBJECT RUNAT=Server SCOPE=Session ID=MyConnection PROGID="ADODB.Connection">
REM Object Script</OBJECT>
<OBJECT RUNAT=Server SCOPE=Session ID=MyConnection CLASSID="Clsid:8AD3067A-B3FC-11CF-A560-00A0C9081C21">
REM Object Script</OBJECT> 注释
在 Global.asa 文件中声明的对象可被应用程序中的任何脚本使用。例如，在声明了下列对象的情况下。---GLOBAL.ASA---
<OBJECT RUNAT=Server SCOPE=Session ID=MyAd PROGID="MSWC.AdRotator"></OBJECT>
可以从应用程序中的任何一页引用 MyAd 对象：---SOME.ASP---
<%= MyAd.GetAdvertisement("/ads/adrot.txt") %>

五、TypeLibrary

TypeLibrary 声明ActiveX 组件常常要描述类型库中该组件支持的常量。类型库是一个文件，其中包含有关 ActiveX 组件所支持的对象和类型的信
息。如果用户的 Web 应用程序依赖于已在类型库中声明了类型的 ActiveX 对象，就可以在 Global.asa 文件中声明其类型。这
样做以后，就可以在应用程序范围内从任何脚本引用已在类型库中声明了的数据类型。有关在 ASP 中使用常量的详细信息，请参阅“使用变量和常量”。 语法
<!--METADATA TYPE="TypeLib"FILE="file"UUID="typelibraryuuid"
VERSION="majorversionnumber.minorversionnumber"LCID="localeid"-->参数file
类型库的绝对路径。如果提供了该参数和 typelibraryuuid 参数，则 file 将用于标识类型库。file 参数和
typelibraryuuid 参数都是必选项。typelibraryuuid
类型库统一的唯一标识。file 参数和 typelibraryuuid 参数都是必选项。majorversionnumber
用于选择版本。如果找不到所需的版本，将返回错误。该参数是可选项。minorversionnumber
用于选择版本。如果找不到所需的版本，将返回错误。该参数是可选项。localeid 现场标识，用于类型库。如果找不到所需的现场，将返回错误。该参数是可选项。
错误信息服务器可返回下列错误消息。错误 说明 ASP 0222 指定的类型库无效。METADATA 标记包含无效的类型库指定。
ASP 0223 找不到类型库。METADATA 包含的类型库指定与注册表项不符。
ASP 0224 类型库无法加载。ASP 无法加载 METADATA 标记中指定的类型库。
ASP 0225 类型库不能重叠。ASP 无法从在 METADATA 标记中指定的类型库中创建 Type Library Wrapper 对象。 注释
最好将 METADATA 标记写在 Global.asa 文件的开始位置。但是，无论是内部和外部 SCRIPT 标记，都可以出现在 Global.asa
文件中的任何位置。通过将类型库的名称加在该常量的前面，可以避免对常量的不明确引用。例如，ADODB.adErrItemNotFound 会比
adErrItemNotFound 更明确。
如果使用 Microsoft Visual InterDev 创建 global.asa 文件，则 METADATA 标记将包含可选的 STARTSPAN 和 ENDSPAN 关
键字。而 IIS 则会忽略这两个关键字。示例
下面示例中的 MyComponent 是用 Visual Basic 5.0 编写的。MyComponent 使用下列语句定义常量 MyError。
Public Const MyError = "You are not using MyComponent correctly."
类型库包含在 mycomponent.lib 中，该文件安装在下面的目录中。C:/MyComponent
下面的 METADATA 标记包含在 MyApp 应用程序的 global.asa 文件中。该示例使用可选的 STARTSPAN 和 ENDSPAN 标记。而
IIS 则不需要这两个标记。<!--METADATA TYPE="TypeLib"FILE="MyComponent.lib"-->
现在，MyApp 应用程序中的任何 ASP 都包含如下脚本：<% Dim MyVar
Set MyVar = Server.CreateObject("MyComponent.MyClass")
Currentreturn = MyVar.MyMethod If Currentreturn = False
Response.Write(MyError) End If%>