vb6 - WScript.Shell 错误“对象 '~' 的方法 '~' 失败”

Question

public sub Main()

Set objShell = CreateObject("WScript.Shell")
strCommand = "C:/Program Files/s/schedule.exe"
objShell.Run strCommand, vbHide, True
Unload Me

end sub

它应该运行 schedule.exe 隐藏....但程序崩溃

Runtime error '-2147024894 (80070002)' :
method '~' of object '~' failed

基本上我需要 schedule.exe 静默运行而不会中断用户。

Answer 1

您不需要使用 WScript：只需使用带有 vbHide 参数的Shell函数。

Shell "C:\Program Files\s\schedule.exe", vbHide

Answer 2

如果您有对Windows Script Host Object Model您的引用，则会收到以下更具描述性的错误消息：

Automation error
The system cannot find the file specified. 

如果可执行文件名包含如下空格，这可能会提示您必须引用可执行文件名：

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