定时提醒你休息的脚本

set WshShell = WScript.CreateObject("WScript.Shell")
'对话框标题
alerttitle = "定时提醒"
'提醒内容,vbnewline为换行符
for i = 1 to 20 '20为提醒的次数
WScript.Sleep(1000*60*45) '每45分钟提醒一次

alerttext = vbnewline & vbnewline &"当前日期:"&Date&vbnewline & vbnewline &"当前时间:"&Time &vbnewline & vbnewline & "工作辛苦！" & vbnewline & vbnewline &"休息一下，活动一下胳膊，脖子，腰部！" & vbnewline & vbnewline & vbnewline & "生命在于运动！"& vbnewline & vbnewline& vbnewline

msgbox alerttext,4096,alerttitle
next

*现代人工作辛苦,常常忘记休息!复制以上内容到记事本,保存扩展名为.vbs双击运行就可以定时提醒休息啦!当然如果需要每天都行动提醒,那么就把这个vbs加到启动项吧!