Still that sentence: just learning VBS and find it interesting
Recently I've been playing computer like crazy, always forgetting to pay attention to rest, so I made this
Something that prompts and shuts down after an hour
The prompt is in English. My English is bad, please give me more advice.
Put it under the startup items
[ Last edited by 523066680 on 2008-12-19 at 13:38 ]
Recently I've been playing computer like crazy, always forgetting to pay attention to rest, so I made this
Something that prompts and shuts down after an hour
The prompt is in English. My English is bad, please give me more advice.
wscript.sleep 3600000
set w=createobject("wscript.shell")
w.popup "Hey!" & vbcrlf _
& "You are run out of 1 hours," & vbcrlf _
& "I will close windows," & vbcrlf _
& "you are also have 60 seconds to finsh your work!",5,"Hey!",4096
wscript.sleep 15000
w.popup "Only 40 minutes.",2,"Hey!",4096
wscript.sleep 18000
w.popup "Only 20 minutes.",2,"Hey!",4096
wscript.sleep 18000
w.run "cmd /c shutdown -s -t 00",vbhide
wscript.quit
'"C:\Documents and Settings\All Users\「开始」菜单\程序\启动"
Put it under the startup items
[ Last edited by 523066680 on 2008-12-19 at 13:38 ]
