Hallo Zusammen,
Ich versuche gerade mich auf einer website (test) einzuloggen und erhalte stets den Fehler 424 Objekt erforderlich.
Wer kann mir hier weiterhelfen
Sub test1()
Set IEApp = CreateObject("InternetExplorer.Application")
IEApp.Visible = True
IEApp.navigate "http://193.84.28.179/bergrettung/login.asp"
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.Busy = False
Set IEDocument = IEApp.document
Do: Loop Until IEDocument.readyState <> 4
IEDocument.getElementById("Nachname").Value = "Mustermann"
IEDocument.getElementById("Passwort").Value = "12345"
IEDocument.getElementById("OK").Click
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.Busy = False
Set IEDocument = IEApp.document
Do: Loop Until IEDocument.readyState <> 4
End Sub
Vielen Dank im Voraus.
Andreas
|