Wscript.Arguments

Dim args, arg1
Set args = WScript.Arguments
If args.Count <> 1 Then Wscript.Quit
arg1 = args.Item(0)

Select Case UCase(arg1)
Case «VALUE1»
Case Else
Wscript.Echo «Error parsing parameter (» & arg1 & «)»
End Select

Tags:
This site is protected by WP-CopyRightPro