vbscript aktivieren ein Fenster öffnen

Ich bin erstellen eines Makros in VBScript, die Kopien von Informationen aus einem geöffneten Internet Explorer-Anwendung und fügt es in eine andere Anwendung. Was ich NICHT will ist, ständig wieder zu öffnen, ein Fenster, als der Benutzer bereits über das gewünschte Fenster geöffnet, soll das makro kopiert die Informationen aus diesem Fenster öffnen. Hier ist was ich habe, so weit:

Dim objIE
Dim strMyInfo

Set objIE = CreateObject("InternetExplorer.Application")

with objIE
    .visible = true
    .navigate ("http://msdn.microsoft.com/en-us/library/wffts6k3%28v=vs.84%29.aspx")
end with
do until objIE.readyState = 4
    wscript.sleep 100
loop

strMyInfo = objIE.document.getElementByID("CodeSnippetContainerCode_b459fc9d-ea49-4d19-8658-1b22d4fff615").value

Derzeit, wie ich es habe, der code oben wird ein neues Fenster geöffnet, jedes mal, wenn es lief. Wenn der Benutzer das Fenster bereits geöffnet ist, gibt es einen Weg, um den Fokus auf dieses Fenster eher als Eröffnung eines neuen?

InformationsquelleAutor Lou | 2013-11-11
  1. 0

    Können Sie zu einer bereits Laufenden Internet-Explorer-Instanz wie folgt:

    For Each wnd In CreateObject("Shell.Application").Windows
  If InStr(1, wnd.FullName, "iexplore.exe", vbTextCompare) > 0 Then
    Set objIE = wnd
    Exit For
  End If
Next

    Dem obigen code legen, um den ersten Internet Explorer-Fenster/tab, auf die es trifft. Wenn Sie mehr als ein öffnen, müssen Sie prüfen, Sie für einige Besonderheit.

    InformationsquelleAutor Ansgar Wiechers
Schreibe einen Kommentar