All pastes #2068714 Raw Edit

Something

public text v1 · immutable
#2068714 ·published 2011-05-25 00:47 UTC
rendered paste body
If WScript.Arguments.Count < 4 Then

			'argument #5 is missing, ask for it :

			theValue5 = InputBox ("where do you want to go today ?", Wscript.ScriptName)
		Else
		
			theValue5 = WScript.Arguments.Item(5)
		End If
	wscript.echo "you have entered : " & wscript.arguments.item(0)


Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run (wscript.arguments.item(0))