Я хочу создать программу автоматического входа для этого веб-сайта, используя VB.net
и Internet Explorer
в качестве браузера. Я могу написать имя пользователя и пароль в нужных полях, но я не могу нажать кнопку «Войти». Вот мой код:
Public Class Form1
Dim appIE As Object ' InternetExplorer.Application
Dim UserN As Object ' MSHTML.IHTMLElement
Dim PW As Object ' MSHTML.IHTMLElement
Dim Element As Object ' HTMLButtonElement
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
appIE = CreateObject("InternetExplorer.Application")
With appIE
.Navigate("www.bwin.it")
.Visible = True
End With
Do While appIE.Busy
Loop
UserN = appIE.Document.getElementsByName("ctl03$ctl12$loginview$baw_template$logincontrol$edtUsername")
If Not UserN Is Nothing Then
UserN(0).Value = "11111"
End If
PW = appIE.Document.getElementsByName("ctl03$ctl12$loginview$baw_template$logincontrol$edtPasswordDummy")
If Not PW Is Nothing Then
PW(0).Value = "aaaaaaaa"
End If
End Sub
End Class
Я пробовал разные способы, но я еще не получил его. Что мне не хватает?