; Example showing how to obtain command line arguments

Dim Args, ArgList

Args = WScript.Arguments

For i =0 to Args.Count - 1

   ArgList = ArgList &i &":"&Args(i) & chr(13)

Next

MsgBox "No. of arguments: " & Args.Count & chr(13) & ArgList