VBS бежит
Set oShell = CreateObject("WScript.Shell")
' Run the command dir in a hidden window without waiting for it to finish
oShell.Run "dir", 0, false
' Run the command dir in a visible window and wait for it to finish
oShell.Run "dir", 1, true
garzj