Global.asa文件：理解ASP应用中的Session与Application管理
如果你曾深入ASP开发，一定会碰到一个特殊的文件——Global.asa。它负责管理ASP应用中最核心的两个对象：Application和Session。简单来说，.asa是Active Server Application的缩写，但它绝不仅仅是一个后缀名那么简单。
这个文件在项目中是可选的，但它提供了一个独特的功能入口：开发者可以在里面编写事件脚本，并声明具有会话或应用程序作用域的对象。有一点需要明确，Global.asa里的内容并非呈现给用户看的，它更像是一个后台的“指挥中心”，专门用来存储事件信息和那些需要被全局使用的对象。当然，它必须放在应用程序的根目录下，而且一个应用有且只能有一个Global.asa文件。
这里有个常见的误解需要澄清：不少人误以为它能当作通用函数库来使用。其实，Global.asa的职责非常明确，它主要用于创建对象的引用，以及捕获Application和Session对象的启动与结束事件。
那么，这个文件何时会被触发呢？它主要基于会话级别的事件被访问，通常在以下三种场景下被调用：
- Application_OnStart 或 Application_OnEnd 事件被触发时。
- Session_OnStart 或 Session_OnEnd 事件被触发时。
- 当引用了在Global.asa中被实例化的对象（Object）时。
先来看看它的标准文件格式：
一、Session_OnStart事件的应用
让我们从一个控制用户进入页面的简单例子开始，直观感受它的作用。
1、Global.asa（放置于虚拟目录根目录）
调试一下你就会发现，只要用户首次访问该目录下的任何页面，都会被强制跳转到指定的首页。这个“强制进入某页”的功能，在需要引导流量或确保首页曝光时非常实用。
理解了基本机制，我们可以更进一步。下面这个“在线人数统计”的例子，能更好地展示Session_OnStart和Session_OnEnd是如何协同工作的。
二、Session_OnEnd事件的协作
2、Global.asa（放置于虚拟目录根目录）
3、online.asp
<%
if request.querystring("logout")="true" then
session.Abandon()
response.end
end if
%>
当前共有<%=Application("OnLine")%>在线
退出
你会发现，online.asp页面里只是简单地引用了Application(“OnLine”)来显示数值。那么这个数值从何而来？奥秘全在Global.asa里。你可以本地多开几个浏览器窗口测试，通过点击“退出”链接或直接关闭窗口，观察在线人数的变化，就能体会到两个事件触发的不同时机。
三、处理直接关闭窗口的难题
上面的例子暴露出一个问题：点击“退出”链接和直接关闭浏览器窗口，效果截然不同。由于Session存在超时机制，直接关窗并不会立即触发Session_OnEnd事件。这该怎么办？
思路其实很直接。网页关闭时会触发onunload事件，如果能通过这个事件来执行Session注销，问题不就解决了？基于这个想法，我们修改一下online.asp：
<%
if request.querystring("logout")="true" then
session.Abandon()
response.end
end if
%>
当前共有<%=Application("OnLine")%>在线
退出
原理是，当页面卸载时，会打开一个名为exit.asp的新页面。我们只需要在exit.asp中执行Session.Abandon()即可。
exit.asp
<%session.Abandon()%>
这里加了一段Script脚本，目的是在执行完Session注销后，立即关闭这个自动弹出的窗口。这样一来，一个相对完善的在线统计功能就基本成型了。
四、深入研究：区分注册用户与访客
举一反三，你可能会问：如何只统计注册用户的在线人数，而不是所有访客？这就需要对逻辑进行更精细的控制。请看下面这组文件：
5、Global.asa（放置于虚拟目录根目录）
注意，这个Global.asa里的Session_OnStart事件块是空的。为什么？因为任何用户访问服务器（无论是否登录）都会触发OnStart事件。而我们只想统计登录用户，所以不能在OnStart里直接给计数器加1。
反过来，任何会话结束（包括未登录的访客）都会触发OnEnd事件。因此，我们在Session_OnEnd事件里加了一个if判断，只有检测到是已登录用户（通过session.contents(“pass”)）的会话结束时，才将在线人数减1。
这里有个关键细节：在OnEnd事件里，不能直接使用Session对象（如session(“pass”)），但可以通过Session对象的集合（如session.contents(“pass”)）来调用session变量。这一点必须留意。
6、login.asp
<%
if request.querystring("logout")="true" then
session.Abandon()
end if
submitname=request.form("submit")
if submitname="submit" then
name=request.form("name")
pwd=request.form("pwd")
if name="cnbruce" and pwd="cnrose" then
session("name")=name
session("pass")=true
else
response.write "Error Name Or Pwd.Back"
response.end
end if
application.lock
application("online")=application("online")+1
application.unlock
%>
当前注册会员<%=application("online")%>人。
退出
<%else%>
