VBA kann InternetExplorer Instanz nicht automatisch beenden!?

[Jedimaster]

Hallo zusammen!

Ich erzeuge per VBA eine InternetExplorer-Instanz mittels:

Set Browser = CreateObject("InternetExplorer.Application")

Browser.Silent = True

Browser.Navigate "http://localhost/myform.htm"

Do While Browser.Busy Or Browser.ReadyState <> READYSTATE_COMPLETE
        DoEvents
Loop
     
Browser.Document.forms(0).feld1.Value = wert1
Browser.Document.forms(0).feld2.Value = wert2
Browser.Document.forms(0).submitbutton.Click
        
Do While Browser.Busy Or Browser.ReadyState <> READYSTATE_COMPLETE
        DoEvents
Loop

Browser.Quit

Durch Absenden des Formulars werde ich automatisch auf eine andere Seite weitergeleitet. Wenn dann mittels Browser.Quit geschlossen werden soll, bekomme ich folgenden Dialog:

The webpage you are viewing is trying to close the window.
Do you want to close this window?

YES NO

Bis hierhin läuft mein Skript perfekt durch, nur dann stopt der Automatismus leider und verlangt eine Interaktion vom User. Das Skript möchte ich aber automatisch laufen lassen..

Hat jemand eine Idee, wie ich diesen Modal-Dialog unterdrücken bzw. automatisch bestätigen kann?


VIele Grüße,
JM

 

[Nirraven]

hm... kann ich nicht genau sagen, aber klappt vielleicht Application.DisplayAlerts = false ?

 

[Jedimaster]

klappt leider nicht, hab ich nämlich schon drin.. nur hier nicht mit abgedruckt.

Das unterdrückt ja aber leider auch nur Meldungen von der VBA Engine - das störende Popup wird aber vom IE produziert.