当前位置： 移动技术网 > IT编程>脚本编程>VBScript > 15分钟提醒一次，珍惜时间啊

15分钟提醒一次，珍惜时间啊

2017年12月12日  | 移动技术网IT编程  | 我要评论

什么样的钉子最可怕,趣味英语,五十度灰电影完整版bt

15分钟提醒一次，珍惜时间啊
保存为.vbs
复制代码 代码如下:

today=date()
years=datepart("yyyy",today)-1981-1
days=datepart("y",today)+25
if datepart("m",today)=12 then
 if datepart("d",today)>=9 then
 msgbox "ok"
 years=years+1
 days=datepart("d",date)-9
 end if
end if 
msgbox "at ^"& years & "c!"&days&"d^ space-time!",4096+64,"移动技术网提示"
set wshshell=createobject("wscript.shell")
do
wscript.sleep 900000
getstr=msgbox("15分钟过去了!",4097,"......!")
if getstr=vbcancel then 
wshshell.popup "bye-bye!",2,"......!" 
wscript.quit
end if
loop

您可能感兴趣的文章:

如对本文有疑问，请在下面进行留言讨论，广大热心网友会与你互动！！ 点击进行留言回复

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网