请教Global.asa文件怎么使用？

 1<script language="VBScript" runat="Server">   
 2Sub Application_OnStart()   
 3Application("Counter") = 0   
 4End Sub   
 5  
 6Sub Session_OnStart()   
 7Application.Lock   
 8Application("Counter") = Application("Counter") + 1   
 9Application.UnLock   
10End Sub   
11  
12Sub Session_OnEnd()   
13Application.Lock   
14Application("Counter") = Application("Counter") - 1   
15Application.UnLock   
16End Sub   
17</script>

 1<object> 声明TypeLibrary 声明   
 2如果包含的脚本没有用 <script> 标记封装，或定义的对象没有会话或应用程序作用域，则服务器将返回错误。服务器会忽略已标   
 3记的但未被应用程序或会话事件使用的脚本以及文件中的 HTML 语句。可以用任何支持脚本的语言编写 Global.asa 文件中包含的脚本。如果多个事件使用同一种脚本语言，就可以将它们组织在一组   
 4<SCRIPT> 标记中。当用户保存对 Global.asa 文件所做的更改时，在重新编译 Global.asa 文件之前，服务器会结束处理当前应用程序的所有请   
 5求。在此期间，服务器拒绝其他请求并返回一个错误消息，说明正在重启动应用程序，不能处理请求。当用户当前的所有请求处理完之后，服务器对每个会话调用 Session_OnEnd 事件，删除所有活动会话，并调用   
 6Application_OnEnd 事件关闭应用程序，然后编译 Global.asa 文件。接下来，用户的请求将启动应用程序并创建新的会话，触   
 7发 Application_OnStart 和 Session_OnStart 事件。但是，保存 Global.asa 文件中所包含的文件的更改并不能使服务器重新编译 Global.asa。为了让服务器识别包含文件的改动，   
 8必须再保存一下 Global.asa 文件。在 Global.asa 文件中声明的过程只能从一个或多个与 Application_OnStart、Application_OnEnd、Session_OnStart 和   
 9Session_OnEnd 事件相关的脚本中调用。在基于 ASP 的应用程序中的 ASP 页中，它们是不可用的。要在应用程序之间共享过程，可在单独的文件中声明这些过程，然后使用服务器端的包含 (SSI) 语句将该文件包含在调用该过程   
10的 ASP 页中。通常，包含文件的扩展名应为 .inc。   
11基于 ASP 的应用程序由在其根目录及其子目录中所有文件组成。应用程序在用户首次打开应用程序中的某一 Web 页时启动，在服   
12务器关闭时终止。应用程序有两个事件，即 Application_OnStart 事件和 Application_OnEnd 事件。用户可以在 Global.asa 文件中为这些事件指定脚本。当应用程序启动时，服务器在 Global.asa 文件中查找并处理   
13Application_OnStart 事件脚本。当应用程序终止时，服务器处理 Application_OnEnd 事件脚本。   
141.Application_OnStart   
15Application_OnStart 事件在首次创建新的会话（即 Session_OnStart 事件）之前发生。只有 Application 和 Server 内建   
16对象是可用的。在 Application_OnStart 事件脚本中引用 Session、Request 或 Response 对象将导致错误。语法   
17<SCRIPT LANGUAGE=ScriptLanguage RUNAT=Server> Sub Application_OnStart. . . End Sub</script>   
18参数   
19ScriptLanguage   
20指定用于编写事件脚本的脚本语言。它可以是任何支持脚本编写的语言，例如 VB Script 或 JScript。如果多个事件使用同一种   
21脚本语言，就可以将它们组织在一个 <script> 标记下。2.Application_OnEnd   
22Application_OnEnd 事件在应用程序退出时于 Session_OnEnd 事件之后发生，只有 Application 和 Server 内建对象可用。语法   
23<SCRIPT LANGUAGE=ScriptLanguage RUNAT=Server> Sub Application_OnEnd. . . End Sub</script>   
24参数   
25ScriptLanguage   
26指定用于编写事件脚本的脚本编写语言。可以是任何一种支持脚本的语言，例如 VBScript 或 JScript。如果有多个事件使用同   
27一种脚本编写语言，就可以将它们组织在一组 <script> 标记下。   
28注释   
29不能在 Application_OnEnd 脚本中调用 MapPath 方法。   
30当没有会话的用户在打开应用程序中的 Web 页时，Web 服务器会自动创建会话。当超时或服务器调用 Abandon 方法时，服务器   
31将终止该会话。会话有两个事件，即 Session_OnStart 事件和 Session_OnEnd 事件。可以在全局文件 Global.asa 中为这两个事件指定脚本。当会话开始时，服务器在 Global.asa 文件中查找并处理   
32Session_OnStart 事件脚本。该脚本将在处理用户请求的 Web 页之前处理。在会话结束时，服务器将处理 Session_OnEnd 事件   
33脚本。1.Session_OnStart   
34Session_OnStart 事件在服务器创建新会话时发生。服务器在执行请求的页之前先处理该脚本。Session_OnStart 事件是设置会   
35话期变量的最佳时机，因为在访问任何页之前都会先设置它们。所有内建对象 (Application、ObjectContext、Request、   
36Response、Server 和 Session) 都可以在 Session_OnStart 事件脚本中使用和引用。语法   
37<SCRIPT LANGUAGE=ScriptLanguage RUNAT=Server> Sub Session_OnStart. . .End Sub</script>   
38参数   
39ScriptLanguage   
40指定用于编写事件脚本的脚本编写语言。可以是任何一种支持脚本的语言，例如 VBScript 或 JScript。如果有多个事件使用同   
41一种脚本编写语言，就可以将它们组织在一组 <script> 标记下。   
42示例   
43尽管在 Session_OnStart 事件包含 Redirect 或 End 方法调用的情况下 Session 对象仍会保持，然而服务器将停止处理   
44Global.asa 文件并触发 Session_OnStart 事件的文件中的脚本。举一个例子，为了确保用户在打开某个特定的 Web 页时始终启动一个会话，就可以在 Session_OnStart 事件中调用 Redirect   
45方法。当用户进入应用程序时，服务器将为用户创建一个会话并处理 Session_OnStart 事件脚本。您可以将脚本包含在该事件中   
46以便检查用户打开的页是不是启动页，如果不是，就指示用户调用 Response.Redirect 方法启动网页。其演示如下例所示。<SCRIPT RUNAT=Server Language=VBScript>   
47Sub Session_OnStart   
48' Make sure that new users start on the correct   
49' page of the ASP application.' Replace the value given to startPage below   
50' with the virtual path to your application's   
51' start page.   
52startPage = "/MyApp/StartHere.asp"   
53currentPage = Request.ServerVariables("SCRIPT_NAME")   
54' Do a case-insensitive compare, and if they   
55' don't match, send the user to the start page.   
56if strcomp(currentPage,startPage,1) then Response.Redirect(startPage) end ifEnd Sub</script>   
57上述示例只能在支持 cookie 的浏览器中运行。因为不支持 cookie 的浏览器不能返回 SessionID cookie，所以，每当用户请   
58求 Web 页时，服务器都会创建一个新会话。这样，对于每个请求，服务器都将处理 Session_OnStart 脚本并将用户重定向到启   
59动页中。如果您要使用下面的脚本，建议您在启动页上放一个通知，告诉用户该站点要求支持 cookie 的浏览器。注释   
60请注意，在 Redirect 方法之后的任何 Session_OnStart 事件脚本都不会执行。因此，应该在您的事件脚本的最后再调用   
61Redirect 方法。其演示如下例所示。<script language="VBScript" runat="Server">   
62Sub Session_OnStart   
63' Session initialization script   
64Response.Redirect "http:/server/app/StartHere.asp"   
65End sub   
66</script>   
67在上面的例子中，Redirect 方法在执行会话初始化脚本期间隐藏所有显示给客户的文字。</object>