We have our windows forms login set up and working good, well it works at
least, just now we need a logout button, so when you click on it, the user
will be logged out of the authentication, how would we do this? this is how
we are doing the login form
==[web config changes]=====
<authenticati on mode="Forms">
<forms loginUrl="/WebClient/SecurePages/logon.aspx" name="RSMNEmail "
timeout="20" path="/"></forms>
</authentication>
<!-- AUTHORIZATION
This section sets the authorization policies of the application. You can
allow or deny access
to application resources by user or role. Wildcards: "*" mean everyone, "?"
means anonymous
(unauthenticate d) users.
-->
<authorizatio n>
<deny users="?" />
<allow users="*" />
<!-- Allow all users -->
<!-- <allow users="[comma separated list of users]"
roles="[comma separated list of roles]"/>
<deny users="[comma separated list of users]"
roles="[comma separated list of roles]"/>
-->
</authorization>
=[ login form script]=======
Imports System.Web.Secu rity
Imports System.Security
Public Class Logon
Inherits System.Web.UI.P age
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub InitializeCompo nent()
End Sub
Protected WithEvents txtUserName As System.Web.UI.W ebControls.Text Box
Protected WithEvents txtPassword As System.Web.UI.W ebControls.Text Box
Protected WithEvents lblInvalid As System.Web.UI.W ebControls.Labe l
Protected WithEvents btnLogin As System.Web.UI.W ebControls.Butt on
Protected WithEvents hlnkApplyUser As System.Web.UI.W ebControls.Hype rLink
'NOTE: The following placeholder declaration is required by the Web Form
Designer.
'Do not delete or move it.
Private designerPlaceho lderDeclaration As System.Object
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeCompo nent()
End Sub
#End Region
Private Sub btnLogin_Click( ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles btnLogin.Click
If txtUserName.Tex t <> "" And txtPassword.Tex t <> "" Then
If database.msgCon nection.State = ConnectionState .Closed Then
database.msgCon nection.Open()
End If
Dim cmdCheckUser As New SqlClient.SqlCo mmand("RSMN_Che ckPassword",
database.msgCon nection)
cmdCheckUser.Co mmandType = CommandType.Sto redProcedure
cmdCheckUser.Pa rameters.Add("@ userName", SqlDbType.VarCh ar).Value =
txtUserName.Tex t
cmdCheckUser.Pa rameters.Add("@ Password", SqlDbType.VarCh ar).Value =
txtPassword.Tex t
' check login credentials against SQL Users's database for messaging system
If DirectCast(cmdC heckUser.Execut eScalar, Boolean) = True Then
Dim loginAuthCookie As FormsAuthentica tionTicket = New
FormsAuthentica tionTicket(1, txtUserName.Tex t, DateTime.Now,
DateTime.Now.Ad dMinutes(20), False, "WebUser")
Dim encryptedTicket As String = FormsAuthentica tion.Encrypt(lo ginAuthCookie)
Dim authCookie As HttpCookie = New
HttpCookie(Form sAuthentication .FormsCookieNam e, encryptedTicket )
Response.Cookie s.Add(authCooki e)
Response.Redire ct("Inbox.aspx" , True)
Else
lblInvalid.Visi ble = True
End If
If database.msgCon nection.State = ConnectionState .Open Then
database.msgCon nection.Close()
End If
Else
lblInvalid.Visi ble = True
End If
End Sub
End Class
now on the main page after they logon there is a button that says logoff,
when they click on it we want them loged out of the system and redirected to
the logon page, how to do this? thanks
