VBScript 如果那么，尝试使用参数运行 exe

Question

Option Explicit 

Dim oFSO, oTxtFile

Set oFSO = CreateObject("Scripting.FileSystemObject") 

If oFSO.FileExists("c:\users\Installed.txt")  Then
  WScript.Quit
Else 
  Set WshShell = CreateObject("WScript.Shell")
  WshShell.Exec("\\1.1.1.1\software\1.exe -s /s -a ns=1.5.3.2")   

  Set oTxtFile = oFSO.CreateTextFile("c:\users\Installed.txt") 
End If

我的代码在上面。我在运行 vbs 时遇到错误。第 13 行 char 1 变量未定义。 “WSHShell”。

目标是让此 vbs 检查文件。如果文件存在则结束。如果找不到该文件，请运行带参数的安装程序，然后创建该文件。

任何帮助都会很棒。

谢谢

Answer 1

如果您使用“Option Explicit”(正如您应该的那样)，所有变量都必须被(重新)调暗。因此，将 WshShell 添加到您的 Dim 语句中。