VBScript writes a script that reminds you to rest regularly.

Do you also forget to drink water and rest when you are busy at work? Want to write a gadget to remind yourself that there are many similar small desktop clock reminder software, the implementation is also very simple, the following is a few minutes to write with VBScript, prompt content written casually, want to customize, change it, new text copy the following code to save, suffix changed to .VBS double-click can be used.

Option expliciton error resume nextdim interval,delayTime,WshShell,idim context,Timeinterval = inputbox ("Please enter the reminder interval (in / minute):", "enter:", 30) if interval= "or IsNull (interval) then interval=30end ifdelayTime=interval*60000 set WshShell = WScript.CreateObject (" WScript.Shell ") context = vbnewline &" you have been working continuously "& interval&" minutes "& vbnewline &" take a break, move your arms, stretch your legs. " & vbnewline & vbnewline' reminders 12for I = 1 to 12 WScript.Sleep (delayTime) Time=Hour (now) & ": & Minute (now) &": & Second (now) if I