In einem VBS-Script (WSH, Microsoft Windows) ein Meldungsfenster anzeigen

Für ein länger laufendes VBS-Script (Windows Scripting Host) zur Datensicherung wollte ich gerne eine Dialogbox anzeigen, die signalisiert, dass die Daten(rück)sicherung noch läuft. Mir ist jedoch kein Weg bekannt, Dialogboxen in einfacher Weise anzusprechen, abgesehen von WScript.Echo, InputBox und MsgBox.

Ein Kollege hat im Internet folgenden Code gefunden, mit dem sich mittels des Internet-Explorers eine entsprechende Meldung darstellen und wieder entfernen lässt:

' Objekt für Internet-Explorer-Sitzung erstellen Set oIE = WScript.CreateObject("InternetExplorer.Application", "oIE_")

' Ein paar Parameter setzen oIE.Navigate ("about:blank")

oIE.ToolBar = 0

oIE.StatusBar = 0

oIE.Width=400

oIE.Height = 200

oIE.Left = 600

oIE.Top = 400

' Warten, bis der Internet-Explorer "betriebsbereit" ist

Do While (oIE.Busy)

    Wscript.Sleep 200

Loop

' Fenster Anzeigen

oIE.Visible = 1

' Text in Fenster schreiben

oIE.Document.Writeln "<title>:..-.:HGSC Backup:.-..:</title>"

oIE.Document.Writeln "<H2><center>Sicherung des Benutzerprofils</center></H2>" oIE.Document.Writeln "<H3><center>" & Benutzerprofil & "</center></H3>"

<Hier kommt der weitere Programmcode>

' Meldung entfernen/Internet-Explorer-Sitzung schliessen

oIE.Quit

Mittels HTML-Anweisungen lässt sich die Meldung bei Bedarf vermutlich auch noch grafisch ansprechend gestalten.