VBScript如果那时,尝试使用参数运行exe

时间:2013-03-21 14:49:28

标签: vbscript if-statement

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检查文件。如果文件存在则结束。如果找不到该文件,请运行带参数的安装程序,然后创建该文件。

任何帮助都会很棒。

谢谢,

1 个答案:

答案 0 :(得分:2)

如果您使用“Option Explicit” - 您应该 - 所有变量必须(Re)Dim-ed。所以将WshShell添加到Dim语句中。