Vbscript für das automatische website-login testen
Ich versuche zu laufen ein vbscript das folgende:
- Starten Sie IE und Last-website.
- Anmeldung auf der website.
- Überprüft, ob der login war erfolgreich, oder nicht.
Nun hab ich das Skript, das sich mit Teil 1 und 2. Seine Teil 3, D. H. verify login Erfolg, dass ich bin stecken mit. Wie mache ich das?
Hier ist der code, den ich aus irgendeinem forum:
Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = 1
IE.navigate "https://my.website.com"
Do While (IE.Busy)
WScript.Sleep 10
Loop
Set Helem = IE.document.getElementByID("formUsername")
Helem.Value = "username" ' change this to yours
Set Helem = IE.document.getElementByID("formPassword")
Helem.Value = "password" ' change this to yours
Set Helem = IE.document.Forms(0)
Helem.Submit
Du musst angemeldet sein, um einen Kommentar abzugeben.
Der beste Weg, um zu überprüfen, login Erfolg auf diesem hohen Niveau ist wahrscheinlich auf die Suche nach einem element in der HTML, die erscheint nur wenn Sie angemeldet sind. Falls vorhanden, übernehmen Sie eingeloggt sind, wenn Sie nicht versuchen, zu navigieren und sich erneut anmelden.
Hier ist ein sehr einfaches Beispiel mit Len() prüfen, ob ein element text enthält, vorhanden ist. Sie können komplizierter sein, wenn Sie wollen und Dinge tun, wie stellen Sie sicher, dass die Informationen, die Sie sehen, entspricht dem, was Sie sehen, wenn du angemeldet warst.
Können Sie die gleichen Funktionen, die Sie oben verwendet, um zu greifen Elemente und dann vergleichen alle Ihre Mitglieder.
Gibt es ein paar Dinge, die Sie tun können,
If inStr(IE.Document.body.innertext, "Please sign in.") then 'Do error checking here MsgBox("element does exist") else MsgBox("element does not exist") End If