RosettaCodeData/Task/Sleep/VBScript/sleep.vbscript
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

4 lines
202 B
Text

iSeconds=InputBox("Enter a time in seconds to sleep: ","Sleep Example for RosettaCode.org")
WScript.Echo "Sleeping..."
WScript.Sleep iSeconds*1000 'Sleep is done in Milli-Seconds
WScript.Echo "Awake!"