Failproof Warten, für den IE zu laden

Versuchen Sie dieses, es hat mir geholfen, zu lösen ähnliches problem mit dem IE einmal:

Set oIE = CreateObject("InternetExplorer.application")
oIE.Visible = True
oIE.navigate ("http://technopedia.com")
Do While oIE.ReadyState = 4: WScript.Sleep 100: Loop
Do While oIE.ReadyState <> 4: WScript.Sleep 100: Loop
' example ref to DOM
MsgBox oIE.Document.GetElementsByTagName("div").Length

UPD: Drilldown IE Ereignisse, die ich gefunden, dass IE_DocumentComplete ist das Letzte Ereignis, bevor die Seite ist eigentlich fertig. So gibt es eine weitere Methode, um zu erkennen, Wann eine web-Seite geladen ist (beachten Sie, dass Sie angeben, die genaue Ziel-URL, die abweichen kann von der Ziel-URL z.B. im Fall der Weiterleitung):

option explicit
dim ie, targurl, desturl, completed

set ie = wscript.createobject("internetexplorer.application", "ie_")
ie.visible = true

targurl = "http://technopedia.com/"
desturl = "http://technopedia.com/"

' targurl = "http://tumblr.com/"
' desturl = "https://www.tumblr.com/" ' redirection if you are not login
' desturl = "https://www.tumblr.com/dashboard" ' redirection if you are login

completed = false
ie.navigate targurl
do until completed
    wscript.sleep 100
loop
' your code here
msgbox ie.document.getelementsbytagname("*").length
ie.quit

sub ie_documentcomplete(byval pdisp, byval url)
    if url = desturl then completed = true
end sub

InformationsquelleAutor omegastripes

versuchen, dieses Skript auf der oberen, kann dies Ihr problem lösen.

{ 
    $myWindowsID = [System.Security.Principal.WindowsIdentity]::GetCurrent();
    $myWindowsPrincipal = New-Object System.Security.Principal.WindowsPrincipal($myWindowsID);
    $adminRole = [System.Security.Principal.WindowsBuiltInRole]::Administrator;

    if ($myWindowsPrincipal.IsInRole($adminRole)) {
        $Host.UI.RawUI.WindowTitle = $myInvocation.MyCommand.Definition + "(Elevated)";
        Clear-Host;
    }
    else {
        $newProcess = New-Object System.Diagnostics.ProcessStartInfo "PowerShell";
        $newProcess.Arguments = "& '" + $script:MyInvocation.MyCommand.Path + "'"
        $newProcess.Verb = "runas";
        [System.Diagnostics.Process]::Start($newProcess);
        Exit;
    }
}

Erklärung:

Powershell ist nicht, dass einige Rechte, wenn Sie ausführen, Skript aus dem normalen Modus
so ist es auch nicht Lesen DH status richtig
und das ist, warum DOM wird nicht geladen
so, script nicht gefunden parameter

InformationsquelleAutor aditya_rahatekar

So, durch das suchen diese Antwort, ich hatte noch Probleme mit dem IE Wartezeit für die Seite vollständig zu laden. In der Hoffnung, dass diese Lösung helfen wird, andere, hier ist was ich getan habe:

Dim i As Integer
Dim j As Integer
Dim tagnames As Integer

While ie.Busy
    DoEvents
Wend
While ie.ReadyState <> 4
    DoEvents
Wend

i = 0
j = 0
While (i <> 5)
    i = 0
    tagnames = ie.document.getelementsbytagname("*").Length
    For j = 1 To 5
        Sleep (50)
        If tagnames = ie.document.getelementsbytagname("*").Length Then
            b = b + 1
        End If
    Next j
Wend

Im Grunde, was das tut, ist warten, für 5 50ms Intervalle für die Anzahl der tagnames geladen gedrosselt.
Natürlich, dies ist einstellbar, je nachdem, was Sie wollen, aber das funktionierte für meine Anwendung.

InformationsquelleAutor Poozy101