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 変数が未定義です。「WSHシェル」。

目標は、この vbs でファイルをチェックすることです。ファイルが存在する場合は終了します。ファイルが見つからない場合は、引数を指定してインストーラーを実行し、ファイルを作成します。

どんな助けでも素晴らしいでしょう。

ありがとう、

Answer 1

「Option Explicit」を使用する場合は、必要に応じて、すべての変数を (再) 薄暗くする必要があります。したがって、WshShell を Dim ステートメントに追加します。