リファレンス、WshArguments オブジェクト

まんま

Set objArgs = WScript.Arguments
For I = 0 to objArgs.Count - 1
   WScript.Echo objArgs(I)
Next

For Each x in WScript.Arguments
  WScript.Echo x
Next