global.asax

来自「深入浅出ASP.NET程序设计-源代码 书籍语言： 简体中文 」· ASAX 代码 · 共 17 行

<Script Language="VB" Runat="Server">
Sub Application_OnStart(Obj As Object, E As EventArgs)
    Application("MSG") = "执行Application_OnStart程序<BR>"
End Sub
Sub Application_OnEnd(Obj As Object, E As EventArgs)
    ' 结束Application
End Sub
Sub Session_OnStart(Obj As Object, E As EventArgs)
    Response.Write(Application("MSG"))
    Application("MSG") = ""		' 清除Application变量
    Response.Write("执行Session_OnStart程序<BR>")
End Sub
Sub Session_OnEnd(Obj As Object, E As EventArgs)
    Application("MSG") = "执行Session_OnEnd程序<BR>"
End Sub
</Script>