ASP Application_OnStart และเหตุการณ์ Application_OnEnd
โปรแกรมที่สมบูรณ์วัตถุอ้างอิง เหตุการณ์ Application_OnStart
เหตุการณ์ที่เกิดขึ้นก่อนที่จะ Application_OnStart เซสชั่นใหม่จะถูกสร้างขึ้นครั้งแรก (เมื่อโปรแกรมประยุกต์วัตถุมีการอ้างอิงครั้งแรก)
เหตุการณ์นี้ถูกวางไว้ในแฟ้ม Global.asa
หมายเหตุ: เมื่ออ้างอิงเซสชันส่งคำขอหรือการตอบสนองวัตถุสคริปต์เหตุการณ์ Application_OnStart โยนข้อผิดพลาด
เหตุการณ์ Application_OnEnd
เหตุการณ์ที่เกิดขึ้น Application_OnEnd ในตอนท้ายของการประยุกต์ใช้ (เมื่อเว็บเซิร์ฟเวอร์จะลดลง)
เหตุการณ์นี้ถูกวางไว้ในแฟ้ม 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>
โปรแกรมที่สมบูรณ์วัตถุอ้างอิง