Bin von ner Batch Datei abgekommen. Soweit so gut...
Programm soll 3 Fenster öffnen.
2 mit je 2 auf dem rechten 2. Bildschirm und 1 Fenster auf dem Hauptbildschirm.
Funktioniert soweit ganz gut nur der Loginbutton am Ende lässt sich nicht betätigen und die Fenster sind nicht angeordnet.
Kann da noch jemand helfen?
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True
objIE.Navigate2 "http://www.dgap.de/"
objIE.Navigate2 "http://www.boerse.de/", 2048
Do While objIE.Busy
Loop
Set objIE = Nothing
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True
objIE.Navigate2 "http://www.finanznachrichten.de/nachrichten/uebersicht.htm"
objIE.Navigate2 "http://www.finanzen.net/unternehmen/", 2048
Do While objIE.Busy
Loop
Dim IE
Set IE = WScript.CreateObject("InternetExplorer.Application")
Do While IE.Busy
Loop
IE.Visible = 1
IE.Navigate "https://www.flatex.de/kunden-login/"
Do While IE.ReadyState <> 4
Loop
Dim e
Dim i1
Set e = IE.Document.getElementsByName("tx_portal2webfilialesso_pi1[uname_app]")
For i1 = 0 To e.length - 1
e(i1).value = "KUNDE"
Next
Set e = IE.Document.getElementsByName("tx_portal2webfilialesso_pi1[password_app]")
For i1 = 0 To e.length - 1
e(i1).value = "PASSWORD"
Next
'Set Helem = IE.document.getElementByID("webfiliale_login")
'Helem.Click webfiliale_Login