vbs定時提醒

多喝水

最近女朋友上火，工作比較忙。忙的在電腦前連口水都不記得喝。我只能做一個每隔半小時就提醒她該喝水的腳本

set WshShell = WScript.CreateObject("WScript.Shell") 
msgbox "親愛的，在忙也要記得照顧好自己",4096,"LoveYou"
alerttitle = "定時提醒"
alerttext = "親愛的，在忙也要喝口水，放松一下"
for i = 0 to 20    '次數(shù)
    WScript.Sleep(1000*60*30)    '每隔30分鐘 
    msgbox alerttext,4096,alerttitle 
next
  • 新建一個文本，將后綴名改成.vbs，然后拷貝上面腳本內(nèi)容復制到文件中，雙擊運行

女朋友被提醒弄煩了，想要關掉但是不會弄怎么辦？
有啟動腳本就得有關閉腳本

dim WSHshell
set WSHshell = wscript.createobject("wscript.shell") 
WSHshell.run ("taskkill /f /im wscript.exe")
  • 和上面的操作一樣，雙擊后腳本就結(jié)束了
?著作權歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成，瀏覽時請結(jié)合常識與多方信息審慎甄別。
平臺聲明：文章內(nèi)容（如有圖片或視頻亦包括在內(nèi)）由作者上傳并發(fā)布，文章內(nèi)容僅代表作者本人觀點，簡書系信息發(fā)布平臺，僅提供信息存儲服務。

相關閱讀更多精彩內(nèi)容

友情鏈接更多精彩內(nèi)容