vbs實(shí)現(xiàn)的定時提醒你休息的腳本
更新時間:2008年06月18日 12:15:26 作者:
天天坐在電腦前的朋友要每隔一段時間活動一下,不然身體會變得越來越差。下成的vbs腳本可以每隔一段時間來提醒你。
復(fù)制代碼 代碼如下:
set WshShell = WScript.CreateObject("WScript.Shell")
'對話框標(biāo)題
alerttitle = "定時提醒"
'提醒內(nèi)容,vbnewline為換行符
alerttext = vbnewline & vbnewline & "休息一下,活動一下胳膊,脖子,腰部。" & vbnewline & vbnewline & vbnewline & "生命在于運(yùn)動"& vbnewline & vbnewline & vbnewline
for i = 1 to 12 '12為提醒的次數(shù)
WScript.Sleep(1000*60*45) '每45分鐘提醒一次
msgbox alerttext,4096,alerttitle
next
將上面代碼存為:定時提醒.vbs ,然后雙擊遠(yuǎn)行,進(jìn)程中會有一個wscript.exe的進(jìn)程,結(jié)束后他就不會提醒了。
相關(guān)文章
VBS教程:VBscript屬性-FirstIndex 屬性
VBS教程:VBscript屬性-FirstIndex 屬性...2006-11-11vbs實(shí)現(xiàn)的圖片自適應(yīng)表格,目前最佳解決方案!
用vbs實(shí)現(xiàn)的圖片自適應(yīng)代碼2008-06-06