Dim shell, fileToExecute

fileToExecute = "sleep.exe"

Set shell = WScript.CreateObject("WScript.Shell")

Sub RunThis()

 'WScript.Echo "Executing: " & fileToExecute
 shell.Run fileToExecute

End Sub

RunThis()

Set shell = Nothing