愚かな私。FormsAuthentication.RedirectFromLoginPage コマンドの Cookie パラメータを True に設定しました。つまり、認証 Cookie は 50 年間保持されます。私が望んでいたのは、ブラウザーが閉じられたときに Cookie が消えるようにすることでした。cookie パラメータが False に設定されている場合、これは簡単に実行できます。誰かが興味を持っているなら、これが私のコードです...
Imports System.Web
Imports System.Web.Security
Imports System.Collections.Specialized
Imports System.Security.Principal
Imports System.Threading
Imports System.Web.UI
Public Class AuthModule
Implements IHttpModule
Public Sub Dispose() Implements System.Web.IHttpModule.Dispose
End Sub
Public Sub Init(ByVal app As System.Web.HttpApplication) Implements System.Web.IHttpModule.Init
AddHandler app.PreRequestHandlerExecute, New EventHandler(AddressOf OnPreRequestHandlerExecute)
End Sub
Public Sub OnPreRequestHandlerExecute(ByVal sender As Object, _
ByVal e As EventArgs)
' Check to see if the alternate page has been accessed
If HttpContext.Current.Request.Url.ToString.ToUpper.EndsWith("AUTOLOGIN.ASPX") Then
' Alternate page has been accessed, so log in using predetermined account
' Retrieve the user name and password
Dim userName As String = "user"
Dim userPassword As String = "password"
' Build the user id
Dim roles As String() = Nothing
Dim webIdentity As New GenericIdentity(userName, "Form")
Dim principal As New GenericPrincipal(webIdentity, roles)
' Specify the user
HttpContext.Current.User = principal
Thread.CurrentPrincipal = principal
' Redirect from the login page to the start page
' Note, this is the line I initially had incorrect. That is, I had the
' second parameter set to True, which will persist the authentication cookie.
' Setting the second parameter to False will cause the authentication cookie
' to go away when the browser is closed. Yeah!
FormsAuthentication.RedirectFromLoginPage(HttpContext.Current.User.Identity.Name.ToString, False)
End If
End Sub
End Class