Möchte gerne einen kleinen Explorer der automatisch eine Bewertung vornimmt. Als beispiel siehe unten.
Document.Forms(3).rating.Value = \"5\"
Bestätigen, kommt aber immer eine Fehlermeldung
Private Sub Form_Load()
WebBrowser1.Navigate \"http://www.pilots24.com/galerie/details.php?image_id=190\"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
With WebBrowser1
.Document.Forms(3).rating.Value = \"5\"
.Document.Forms(3).submit
End With
End Sub
Kommt diese Fehlermeldung
Document.Forms(3).rating.Value = \"5\"
Bestätigen, kommt aber immer eine Fehlermeldung
Private Sub Form_Load()
WebBrowser1.Navigate \"http://www.pilots24.com/galerie/details.php?image_id=190\"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
With WebBrowser1
.Document.Forms(3).rating.Value = \"5\"
.Document.Forms(3).submit
End With
End Sub
Kommt diese Fehlermeldung