如何实时获知多少人在线？

在线人数统计是很多网站早期都会遇到的一个小需求，特别是在ASP时代，用global.asa配合Session事件来实现，堪称经典。下面这段代码来自一个实际项目，虽然看起来简单，但里面有几个关键点值得注意——比如Application对象的锁定机制，以及Session超时设置对计数准确性的影响。

我们先看global.asa文件，它定义了应用启动、会话开始和会话结束时的行为。代码中用到了VBScript，运行在服务器端。

再来看看调用页面count.asp，它只负责读出当前在线人数并显示出来。这里的提示语可以自由发挥，比如示例中写了一句带点诗意的文案。

<%
    response.write "这会儿有" & Application("WhosOn") & "人正在随风起舞流连忘返呢!"
%>

整体逻辑其实很清晰：应用启动时初始化计数器为0，每个新用户进入时加1，用户会话超时或退出时减1。但有几个细节需要留意：Session.Timeout设为了3分钟，这意味着用户如果3分钟内没有新的请求，就会被系统自动踢出，计数才会减少。实际使用时可以根据业务场景调整这个值，比如新闻类网站可以设短一些，而办公系统则可能需要更长。

另外，Application.Lock和Application.UnLock这对组合是必须的，否则在高并发下计数器会出现竞态条件，导致数据不准。这是ASP多用户环境下的一个基本保护机制，也是这段代码的精髓所在。

总的来说，这个示例虽然简单，却涵盖了ASP应用状态管理、会话生命周期和并发控制几个核心概念。对于刚接触ASP的开发者来说，是一个很好的入门案例。