Scripting: Programm starten

Mit folgender Funktion können beliebige Kommandozeilen (z.B. ein Programmstart) analog zum Windows Menüpunkt „Start > Ausführen“ per Scripting ausgeführt werden:

'---------------------------------------------------
Sub CommandExecute(sCommandline)
'---------------------------------------------------
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run sCommandline, 1, True
End Sub


IDKBAD000848 KBAD000848