Dim cookieName As String cookieName = FormsAuthentication.FormsCookieName Dim authCookie As HttpCookie authCookie = Context.Request.Cookies(cookieName) If (authCookie Is Nothing) Then ' There is no authentication cookie. Return End If Dim authTicket As FormsAuthenticationTicket authTicket = Nothing Try authTicket = FormsAuthentication.Decrypt(authCookie.Value) Catch ex As Exception ' Log exception details (omitted for simplicity) Return End Try Dim roles(2) As String roles(0) = "One" roles(1) = "Two" Dim id As FormsIdentity id = New FormsIdentity(authTicket) Dim principal As GenericPrincipal principal = New GenericPrincipal(id, roles) ' Attach the new principal object to the current HttpContext object Context.User = principal End Sub Sub Application_Error(ByVal sender As Object, ByVal e As EventArgs) Response.Write("Error encountered.") End Sub
资源
Global.asax 文件是 ASP.NET 应用程序的中心点。它提供无数的事件来处理不同的应用程序级任务,比如用户身份验证、应用程序启动以及处理用户会话等。你应该熟悉这个可选文件,这样就可以构建出健壮的ASP.NET 应用程序。