Hallo,
Ich bin noch ein zimlicher anfänger, ich kenne zwar die meisten probleme bzw weiß sie zu beheben. Aber jetzt habe ich ein Problem.
Ich habe mir via google einen Sourcecode rausgesucht, was es mir ermöglicht. Mich extern jenes Browser über das Tool einzuloggen.
bzw.
- Login / Password (in php - 127.0.0.1)
- im tool httpwebrequest
Nun sollte eigentlich funktionieren, local bzw über den Browser kann ich mich einloggen (Da ich nur mit PHP Arbeite) etwas neueres Gebiet ..
Aber er liefert nichts zurück bzw "login Fehlgeschlagen" lass ich mir mal nen wert in der textbox ausgeben ist es "true" und das verstehe ich nicht.
Sourcecode
Grüße
Ich bin noch ein zimlicher anfänger, ich kenne zwar die meisten probleme bzw weiß sie zu beheben. Aber jetzt habe ich ein Problem.
Ich habe mir via google einen Sourcecode rausgesucht, was es mir ermöglicht. Mich extern jenes Browser über das Tool einzuloggen.
bzw.
- Login / Password (in php - 127.0.0.1)
- im tool httpwebrequest
Nun sollte eigentlich funktionieren, local bzw über den Browser kann ich mich einloggen (Da ich nur mit PHP Arbeite) etwas neueres Gebiet ..
Aber er liefert nichts zurück bzw "login Fehlgeschlagen" lass ich mir mal nen wert in der textbox ausgeben ist es "true" und das verstehe ich nicht.
Sourcecode
VB.NET-Quellcode
- With New Http
- '//hier wird der Seitenquelltext gespeichert
- Dim html As String = String.Empty
- '//Login ausführen
- Dim username As String = TextBox1.Text
- Dim password As String = TextBox2.Text
- html = .GetResponse("http://127.0.0.1/test/index.php", "username=" & username & "passwort=" & password)
- '//Hauptseite aufrufen
- html = .GetResponse("http://127.0.0.1/test/")
- '//prüfen, ob Login erfolgreich war
- If html.Contains("Login Erfolgreich") Then
- '//eingeloggt
- Form2.Show()
- Else
- '//nicht eingeloggt
- MsgBox("Achtung da du dich mit Falschen login daten eingeloggt hast, kann es Passieren das es nach mehrfachen login versuchen zu einer Sperrung kommen kann.", MsgBoxStyle.Critical, "Login Fehlgeschlagen")
- End If
- End With
Grüße