引数の取得

Set arg = WScript.Arguments
For i=0 to arg.Count - 1
   WScript.Echo arg(i)
Next