Dim Arg
on error resume next
Arg = WScript.Arguments(0)
wscript.sleep Arg