Re: Sleep until any keystroke

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

Dim StartTime, EndTime, input

StartTime = Time
EndTime = DateAdd("s", 2, Time)

Do Until StartTime=EndTime

WScript.echo "press enter"
do while not wscript.StdIn.AtEndofLine
input=input & wscript.StdIn.ReadLine
Loop
wscript.quit
Loop

Where and how should i add wscript.quit after the timer has been run?

On 23 май, 12:37, Jeffery Hicks <jhi...@xxxxxxxxxx> wrote:
vdjat...@xxxxxxxxx wrote:
Hi Jeffery,

Thanks for the help.
This is not exactly what i need. The script should be running timer
(wscript.sleep) for some 10 minutes and the any keystroke would break
the sleep and
it will start another command.

Best regards,
Vitali.

On 22 , 17:25, Jeffery Hicks <jhi...@xxxxxxxxxx> wrote:
vdjat...@xxxxxxxxx wrote:
Hi,
Could you please help me to write a script which makes wscript.sleep
until any keystroke.
This is my attempt:
Dim Input
Input = Input & WScript.StdIn.Read(1)
If input is TRUE then
wscript.quit
Else wscript.sleep 5000
End If
You need a loop like this:

Dim x
WScript.echo "Enter some text and press Enter twice:"

do while not wscript.StdIn.AtEndofLine
x=x & wscript.StdIn.ReadLine
Loop

WScript.echo "You entered " & x
wscript.quit

--
Jeffery Hicks
SAPIEN Technologies - Scripting, Simplified.www.SAPIEN.com
VBScript & Windows PowerShell Training -www.ScriptingTraining.com/classes.asp
Windows PowerShell? -www.SAPIENPress.com/powershell.asp

blog:http://blog.SAPIEN.com
blog:http://jdhitsolutions.blogspot.com

In that case you can't use Wscript.Sleep What you might do is use
DateAdd to calculate a future time, how long you want to wait and create
an outer loop that runs until the current time matches the target time.
Within the loop, insert the Do While stdin example. Add a line to jump
to quit after the loop.

--
Jeffery Hicks
SAPIEN Technologies - Scripting, Simplified.www.SAPIEN.com
VBScript & Windows PowerShell Training -www.ScriptingTraining.com/classes.asp
Windows PowerShell? -www.SAPIENPress.com/powershell.asp

blog:http://blog.SAPIEN.com
blog:http://jdhitsolutions.blogspot.com


.

Relevant Pages

  • Re: Sleep until any keystroke
    ... Could you please help me to write a script which makes wscript.sleep ... VBScript & Windows PowerShell Training -www.ScriptingTraining.com/classes.asp ... Within the loop, insert the Do While stdin example. ...
    (microsoft.public.scripting.vbscript)
  • Re: Schedule Task - Please Explain
    ... I am currently using Windows Scheduled Task, ... VBScript & Windows PowerShell Training - ... blog: http://jdhitsolutions.blogspot.com ... I cleaned up my old code and posted it in my script library at ...
    (microsoft.public.scripting.wsh)
  • Re: Can get LDAP to work in WorkGrp
    ... Windows Script Host ... Microsoft PowerShell MVP ... Coming Soon: Windows PowerShell: TFM 2nd Ed. ...
    (microsoft.public.scripting.vbscript)
  • Re: Damn you, FEDEX! or Nikon D40 lost in Springfield, MO blackhole.
    ... the 2 mp Mavica he had been using with a Nikon D40. ... After shopping around, he got me to order one for him. ... The shipper had it insured, but from what I have read it could take weeks to sort this crap out. ... You may get your insurance from FedEx and a couple weeks later they find it and deliver it. ...
    (alt.photography)
  • Re: Counting Files
    ... maybee i didnt made my self clear - i want to put this into a VB Script. ... Now the script stops if the files isnt there ... ... VBScript & Windows PowerShell Training - ... blog: http://jdhitsolutions.blogspot.com ...
    (microsoft.public.windows.server.scripting)