vbscript - 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” - 正如您应该使用的那样 - 所有变量都必须是 (Re)Dim-ed。因此，将 WshShell 添加到您的 Dim 语句中。