L
liuqingying2
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么我的 Session_End事件没有执行?请看我的原码
Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
Application("user_sessions") = 0
End Sub
Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)
Application.Lock()
Application("user_sessions") = Application("user_sessions") - 1
Application.UnLock()
End Sub
Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)
Application.Lock()
Application("user_sessions") = Application("user_sessions") + 1
Application.UnLock()
End Sub
Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
Application("user_sessions") = 0
End Sub
Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)
Application.Lock()
Application("user_sessions") = Application("user_sessions") - 1
Application.UnLock()
End Sub
Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)
Application.Lock()
Application("user_sessions") = Application("user_sessions") + 1
Application.UnLock()
End Sub