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检查文件。如果文件存在则结束。如果找不到该文件,请运行带参数的安装程序,然后创建该文件。
任何帮助都会很棒。
谢谢,
答案 0 :(得分:2)
如果您使用“Option Explicit” - 您应该 - 所有变量必须(Re)Dim-ed。所以将WshShell添加到Dim语句中。