Asp.net Global.asax 事件的介绍

Global.asax 文件，有时候叫做 ASP.NET 应用程序文件，提供了一种在一个中心位置响应应用程序级或模块级事件的方法。你可以使用这个文件实现应用程序安全性以及其它一些任务。下面让我们详细看一下如何在应用程序开发工作中使用这个文件。

概述
Global.asax 位于应用程序根目录下。虽然 Visual Studio .NET 会自动插入这个文件到所有的 ASP.NET 项目中，但是它实际上是一个可选文件。删除它不会出问题——当然是在你没有使用它的情况下。.asax 文件扩展名指出它是一个应用程序文件，而不是一个使用 aspx 的 ASP.NET 文件。

Global.asax 文件被配置为任何（通过 URL 的）直接 HTTP 请求都被自动拒绝，所以用户不能下载或查看其内容。ASP.NET 页面框架能够自动识别出对Global.asax 文件所做的任何更改。在 Global.asax 被更改后ASP.NET 页面框架会重新启动应用程序，包括关闭所有的浏览器会话，去除所有状态信息，并重新启动应用程序域。
编程
Global.asax 文件继承自HttpApplication 类，它维护一个HttpApplication 对象池，并在需要时将对象池中的对象分配给应用程序。Global.asax 文件包含以下事件：
· Application_Init：在应用程序被实例化或第一次被调用时，该事件被触发。对于所有的HttpApplication 对象实例，它都会被调用。
· Application_Disposed：在应用程序被销毁之前触发。这是清除以前所用资源的理想位置。
· Application_Error：当应用程序中遇到一个未处理的异常时，该事件被触发。
· Application_Start：在HttpApplication 类的第一个实例被创建时，该事件被触发。它允许你创建可以由所有HttpApplication 实例访问的对象。
· Application_End：在HttpApplication 类的最后一个实例被销毁时，该事件被触发。在一个应用程序的生命周期内它只被触发一次。
· Application_BeginRequest：在接收到一个应用程序请求时触发。对于一个请求来说，它是第一个被触发的事件，请求一般是用户输入的一个页面请求（URL）。
· Application_EndRequest：针对应用程序请求的最后一个事件。
· Application_PreRequestHandlerExecute：在 ASP.NET 页面框架开始执行诸如页面或 Web 服务之类的事件处理程序之前，该事件被触发。
· Application_PostRequestHandlerExecute：在 ASP.NET 页面框架结束执行一个事件处理程序时，该事件被触发。
· Applcation_PreSendRequestHeaders：在 ASP.NET 页面框架发送 HTTP 头给请求客户（浏览器）时，该事件被触发。
· Application_PreSendContent：在 ASP.NET 页面框架发送内容给请求客户（浏览器）时，该事件被触发。
· Application_AcquireRequestState：在 ASP.NET 页面框架得到与当前请求相关的当前状态（Session 状态）时，该事件被触发。
· Application_ReleaseRequestState：在 ASP.NET 页面框架执行完所有的事件处理程序时，该事件被触发。这将导致所有的状态模块保存它们当前的状态数据。
· Application_ResolveRequestCache：在 ASP.NET 页面框架完成一个授权请求时，该事件被触发。它允许缓存模块从缓存中为请求提供服务，从而绕过事件处理程序的执行。
· Application_UpdateRequestCache：在 ASP.NET 页面框架完成事件处理程序的执行时，该事件被触发，从而使缓存模块存储响应数据，以供响应后续的请求时使用。
· Application_AuthenticateRequest：在安全模块建立起当前用户的有效的身份时，该事件被触发。在这个时候，用户的凭据将会被验证。
· Application_AuthorizeRequest：当安全模块确认一个用户可以访问资源之后，该事件被触发。
· Session_Start：在一个新用户访问应用程序 Web 站点时，该事件被触发。
· Session_End：在一个用户的会话超时、结束或他们离开应用程序 Web 站点时，该事件被触发。
这个事件列表看起来好像多得吓人，但是在不同环境下这些事件可能会非常有用。

-------------------------例子----------------------------------------

Imports System.Web.SessionState
Imports XXX.Core

''' <summary>
''' アプリケーショングローバルクラス
''' </summary>
''' <remarks></remarks>
Public Class Global_asax
    Inherits System.Web.HttpApplication

#Region "定数"
    Private Const PAGE_ERROR_MESSAGE As String = "~/SystemError.aspx"
#End Region

#Region "プライベートメソッド"
    ''' <summary>
    ''' Application_Start
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)

        AppEnv.ServerPath = Server.MapPath("~/")
        AppEnv.LoadConfigFile()

        MessageMaster.ServerPath = Server.MapPath("~/")
        MessageMaster.LoadConfigFile()

        SystemSetting.LoadConfigFile()

    End Sub

    ''' <summary>
    ''' Session_Start
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks>セッションの開始時に呼び出されます。</remarks>
    Protected Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)

    End Sub

    ''' <summary>
    ''' Application_BeginRequest
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks>各要求の開始時に呼び出されます。</remarks>
    Protected Sub Application_BeginRequest(ByVal sender As Object, ByVal e As EventArgs)

    End Sub

    ''' <summary>
    ''' Application_AuthenticateRequest
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks>使用の認証時に呼び出されます。</remarks>
    Protected Sub Application_AuthenticateRequest(ByVal sender As Object, ByVal e As EventArgs)

    End Sub

    ''' <summary>
    ''' Application_Error
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub Application_Error(ByVal sender As Object, ByVal e As EventArgs)

        Dim ex As Exception = Server.GetLastError()

        '404 Not Foundの場合には例外ログは出力しない
        If (TypeOf (ex) Is HttpException) AndAlso _
           (CType(ex, HttpException).GetHttpCode() = 404) Then
            Return
        End If

        'ViewStateエラーの場合には例外ログは出力しない
        If (TypeOf (ex) Is HttpException) AndAlso _
           (TypeOf (ex.InnerException) Is ViewStateException) Then
            Return
        End If

        Dim url As String = Context.Request.Path
        Dim logWriter As XXXSystemErrorLogWriter = Log.GetSystemErrorLogWriter(Log.LogSource.WebApplication)
        logWriter.WriteLog(ex, "集約エラーハンドラー(Globa.asax / Application_Error)", String.Format("URL = {0} ", url))

        Response.Redirect(PAGE_ERROR_MESSAGE)

    End Sub

    ''' <summary>
    ''' Session_End
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)

        Session.RemoveAll()

    End Sub

    ''' <summary>
    ''' Application_End
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks>アプリケーションの終了時に呼び出されます。</remarks>
    Protected Sub Application_End(ByVal sender As Object, ByVal e As EventArgs)

    End Sub
#End Region

End Class