Jo Servus
Vb.net :
Code:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("http://www.ohost.de/index.php")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Document.GetElementById("username").InnerText = TextBox1.Text
WebBrowser1.Document.GetElementById("password").InnerText = TextBox2.Text
WebBrowser1.Document.GetElementById("login").InvokeMember("click")
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If WebBrowser1.DocumentText.Contains("Abmelden") Then
Label1.Text = "Login war Erfolgreich"
Else
Label1.Text = "Login war nicht Erfolgreich"
End If
Timer1.Stop()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Hier GoTo Befehl
End Sub
End Class
Hier das ist mein Code und am ende also wenn ich button 2 drücke dass das programm dann von vorne startet aber es funktioniert nicht entweder es kommt nicht definiert ooder iwas anderes
lg Southpark