Advertisement
Guest User

Untitled

a guest
Dec 29th, 2014
162
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.64 KB | None | 0 0
  1. Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLogin.Click
  2.  
  3. FormsAuthentication.SetAuthCookie(Me.txtUsername.Text.Trim(), chkRemember.Checked)
  4. Dim returnUrl As String = String.Empty
  5.  
  6. If Request.QueryString("ReturnUrl") Is Nothing Then
  7. returnUrl = "Dashboard.aspx"
  8.  
  9. Else
  10. returnUrl = Request.QueryString("ReturnUrl")
  11.  
  12. End If
  13. Response.Redirect(returnUrl)
  14.  
  15.  
  16. End Sub
  17.  
  18. Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
  19. FormsAuthentication.SignOut()
  20. FormsAuthentication.RedirectToLoginPage()
  21. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement