Pause in Skript einfügen geht leider nicht

gelöstFrage VB for Applications Entwicklung

Hallo,

ich habe ein kleines Visual basic Programm unter Studio 2008 gemacht. Es ruft eine .exe im Hintergrund auf und soll einfach nach 5 Minuten ungefähr sagen "Jetzt alles fertig".

Ich habe vor mittels Wscript mit einfachen Windowsboardmittlen den eigenen PC 500 x anpingen zu lassen und danach die alles fertig Message auszugeben.

Das sieht so aus:

Start.Run("ping /n 500 localhost >nul")
MsgBox("Fertig")

Was mich halt jetzt nur verwundert die Fertig Ausgabe kommt sofort und nicht etwa nach 5 Minuten wenn 500x gepingt wurde. Weiß jemand was ich falsch tat?

danke sehr!

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 152364

Url: https://administrator.de/forum/pause-in-skript-einfuegen-geht-leider-nicht-152364.html

Ausgedruckt am: 19.04.2025 um 10:04 Uhr

5 Kommentare

Neuester Kommentar

Hallo,

Versuche mach statt Start.Run
dieses:

Set myCommand = CreateObject("Wscript.Shell")  
myCommand.Run "ping /n 500 localhost", 0, true  

Gruß
Snow

Danke Snow,

genau das was ich suchte. Für was steht da eig. die 0 ?

Hallo HansWurstAugust!

Um eine Pause in ein VBScript zu bekommen genügt

CreateObject("WScript.Shell").Sleep 5000

mir Angabe der Zeit in ms (im Beispiel oben daher nur mal 5 Sekunden) ...

Grüße
bastla

Parameter: Command

----

Parameter: Sichtbarkeit

0: Fenster so versteckt, daß es nicht einmal in der Taskleiste erscheint. Die Anwendung erscheint nur im Taskmanager (Strg+Alt+Entf) und kann auch nur von dort beendet werden, falls sie hängt oder mit einer Meldungsbox auf ein OK des Benutzers wartet.