naja aber trotzdem danke
habs auch mal bei ner anderen seite versucht nur es kommen immer i-welche errors
Code:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("http://portal.earthlost.de/index.phtml?msg=Nicht%20eingeloggt!")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Document.All("user").SetAttribute("value", TextBox1.Text)
WebBrowser1.Document.All("Pwd").SetAttribute("value", TextBox2.Text)
WebBrowser1.Document.GetElementById("einloggen").InvokeMember("click")
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim code As String = WebBrowser1.Document.All(1).OuterHtml
If code.Contains("Falsches Passwort oder Login ist fehlgeschlagen. Bitte erneut versuchen!") Then
Label2.Text = " Login Fehlgeschlagen. Falsche Account Daten "
WebBrowser1.Navigate("http://portal.earthlost.de/index.phtml?msg=Nicht%20eingeloggt!")
Else
Label2.Text = " Login Erfolgreich. Daten sind korrekt"
WebBrowser1.Navigate("http://portal.earthlost.de/index.phtml?msg=Nicht%20eingeloggt!")
End If
TextBox1.Text = ""
TextBox2.Text = ""
Timer1.Stop()
End Sub
End Class
Das ist meine code
da öffnet sich dann immer ein Fenster mit :
"System.NullReferenceException wurde nicht behandelt"
machs aber genau so wie in dem Tut