Global.asa编程完全参考手册(2)

' Replace the value given to startPage below 
　' with the virtual path to your application's 
　' start page. 

　startPage = "/MyApp/StartHere.asp" 
　currentPage = Request.ServerVariables("SCRIPT_NAME") 

　' Do a case-insensitive compare, and if they 
　' don't match, send the user to the start page. 
　if strcomp(currentPage,startPage,1) then　　Response.Redirect(startPage)　end ifEnd Sub</SCRIPT> 
上述示例只能在支持 cookie 的浏览器中运行。因为不支持 cookie 的浏览器不能返回 SessionID cookie，所以，每当用户请 
求 Web 页时，服务器都会创建一个新会话。这样，对于每个请求，服务器都将处理 Session_OnStart 脚本并将用户重定向到启 
动页中。如果您要使用下面的脚本，建议您在启动页上放一个通知，告诉用户该站点要求支持 cookie 的浏览器。 

注释 
请注意，在 Redirect 方法之后的任何 Session_OnStart 事件脚本都不会执行。因此，应该在您的事件脚本的最后再调用 
Redirect 方法。其演示如下例所示。 

<SCRIPT LANGUAGE=VBScript RUNAT=Server> 
Sub Session_OnStart 
　 ' Session initialization script 
　 Response.Redirect "http:/server/app/StartHere.asp" 
End sub 
</SCRIPT> 
在上面的例子中，Redirect 方法在执行会话初始化脚本期间隐藏所有显示给客户的文字。 

2.Session_OnEnd 
Session_OnEnd 事件在会话被放弃或超时发生。在服务器内建对象中，只有 Application、Server 和 Session 对象可用。 

语法 
<SCRIPT LANGUAGE=ScriptLanguage RUNAT=Server> Sub Session_OnEnd. . . End Sub 

</SCRIPT> 

参数 
ScriptLanguage 
指定用于编写事件脚本的脚本编写语言。可以是任一支持脚本编写的语言，例如 VBScript 或 JScript。如果有多个事件使用同 
一种脚本编写语言，则可以将其组织在一组 <SCRIPT> 标记下。 
注释 
在 Session_OnEnd 脚本中不能调用 MapPath 方法。 




<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 声明 

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 
现场

 

标识，用于类型库。如果找不到所需的现场，将返回错误。该参数是可选项。