Das System kann die angegebene Datei nicht finden. (Ausnahme von HRESULT: 0x80070002)
VB.NET-Quellcode
- Imports System.IO
- Imports System.Data
- Imports System.Text
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- WebBrowser1.Navigate("http://***.de/login")
- Do
- Application.DoEvents()
- Loop While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete Or WebBrowser1.IsBusy
- WebBrowser1.Document.GetElementById("username1").SetAttribute("value", TextBox1.Text)
- WebBrowser1.Document.GetElementById("password1").SetAttribute("value", TextBox2.Text)
- WebBrowser1.Document.GetElementById("submit").InvokeMember("click")
- If WebBrowser1.DocumentText = "Ihre Login Daten sind korrekt." Then
- Else
- MsgBox("Login falsch")
- End If
- End Sub
- End Class