Session_OnStart 事件在服务器创建新会话时发生。
此事件放置在 Global.asa 文件中。
Session_OnEnd 事件在会话结束时发生。 (会话被放弃或超时的时候).
此事件放置在 Global.asa 文件中。
注释:MapPath 方法不能用在 Session_OnEnd 代码中。
<script language="vbscript" runat="server"> Sub Session_OnStart . . . End Sub Sub Session_OnEnd . . . End Sub </script>
Global.asa:
<script language="vbscript" runat="server"> Sub Application_OnEnd() Application("totvisitors")=Application("visitors") End Sub Sub Application_OnStart Application("visitors")=0 End Sub Sub Session_OnStart Application.Lock Application("visitors")=Application("visitors")+1 Application.UnLock End Sub Sub Session_OnEnd Application.Lock Application("visitors")=Application("visitors")-1 Application.UnLock End Sub </script>
在 ASP 文件中显示当前的访客数:
<html> <head> </head> <body> <p> There are <%response.write(Application("visitors"))%> online now! </p> </body> </html>