Windows API VisualBasic Script

Sub task()
    Dim myTaskID As Long
    myTaskID = Shell("c:\w.exe")
End Sub