public sub Main()
Set objShell = CreateObject("WScript.Shell")
strCommand = "C:/Program Files/s/schedule.exe"
objShell.Run strCommand, vbHide, True
Unload Me
end sub
it's supposed to run schedule.exe hidden....but program crashes with
Runtime error '-2147024894 (8开发者_开发技巧0070002)' :
method '~' of object '~' failed
basically i need schedule.exe to run silently without interrupting the user.
If you had a reference to Windows Script Host Object Model
you would get this more descriptive error message:
Automation error
The system cannot find the file specified.
This might clue you that you had to quote the executable filename if it contains spaces like this:
Public Sub Main()
Dim objShell As Object ' WshShell
Dim strCommand As String
Set objShell = CreateObject("WScript.Shell")
strCommand = "C:/Program Files/7-zip/7z.exe"
objShell.Run """" & strCommand & """", vbHide, True ' WshHide
End Sub
You don't need to use WScript: just use the Shell function with the vbHide argument.
Shell "C:\Program Files\s\schedule.exe", vbHide
精彩评论