http://www.aspxheute.com/artikel/20020705.htm
Na ok, hat jetzt nicht speziell damit zu tun, aber der die Frage ist bei mir
hier aufgetaucht:
Bei mir ist Me.Request.IsAuthenticated immer True, was ich ja an den
geschützten Seiten mit ner if-Abfrage machen soll oder? Das was ich an dem
SourceCode verändert habe ist nur, dass ich meine Abfrage auf nen SQL-Server
mache und nicht Oledb, der Rest ist aus dem Artikel übernommen.
(Btw. Me.Request.IsAuthenticated funktioniert bei mir in anderen Projekten
super, wo ich noch die einzelnen Benutzer einzeln in der web.config auflisten
konnte)
das ist auf meiner geschützten Seite:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
If Me.Request.IsAuthenticated Then
Label1.Text = "hallo"
Else
Dim strURL As String
strURL = "login.aspx"
Me.Response.Redirect(strURL)
End If
End Sub
und das auf der Login:
If Page.IsValid Then
Dim strDbConnString As String =
ConfigurationSettings.AppSettings("LoginDb")
Dim con As SqlConnection = New SqlConnection(strDbConnString)
con.Open()
Dim cmd As SqlCommand = New SqlCommand
cmd.CommandText = "SELECT COUNT(*) FROM TB1 WHERE [EMAIL PROTECTED]
AND [EMAIL PROTECTED]"
cmd.Parameters.Add("@ParamUpn", UserName.Text)
cmd.Parameters.Add("@ParamPwd", UserPass.Text)
cmd.Connection = con
Dim nUsersMatched As Integer = 0
Dim oResult As Object = cmd.ExecuteScalar
If Not (oResult Is Nothing) Then
nUsersMatched = CType(oResult, Integer)
End If
cmd.Dispose()
con.Close()
If Not (0 = nUsersMatched) Then
FormsAuthentication.RedirectFromLoginPage(UserName.Text, True)
Else
Msg.Text = "Invalid Credentials: Please try again"
End If
End If
wo liegt nun mein Fehler -.-?
Gruß
André
_______________________________________________
Asp.net Mailingliste, Postings senden an:
Asp.net@glengamoi.com
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/asp.net
