ASP Application_OnStart 和 Application_OnEnd 事件

Application_OnStart 事件
Application_OnStart 事件發生在第一個新的會話創建之前 (當 Application 對象第一次被引用時)。
此事件放置在 Global.asa 檔中。
注意:在 Application_OnStart 事件腳本中引用 Session、Request 或者 Response 對象會引發錯誤。
Application_OnEnd 事件
Application_OnEnd 事件發生在應用程式結束時 (當 web 伺服器停止運行時)。
此事件放置在 Global.asa 檔中。
注意:MapPath 方法無法用於 Application_OnEnd 代碼中。
語法
<script language="vbscript" runat="server">
Sub Application_OnStart
. . .
End Sub
Sub Application_OnEnd
. . .
End Sub
</script>
Sub Application_OnStart
. . .
End Sub
Sub Application_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>
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>
<head>
</head>
<body>
<p>
There are <%response.write(Application("visitors"))%>
online now!
</p>
</body>
</html>
