set objArgs = WScript.Arguments
WScript.Echo "Cakowita liczba argumentw: " & WScript.Arguments.Count
for each strArg in objArgs
    WScript.Echo strArg
next
