兰州市公安局主要领导:有趣的定时提醒VBS代码

来源:百度文库 编辑:偶看新闻 时间:2024/04/28 04:23:22
有趣的定时提醒VBS代码 2007-10-12 12:58

定时提醒你休息的脚本  

天天坐在电脑前的朋友要每隔一段时间活动一下,不然身体会变得越来越差。下成的vbs脚本可以每隔一段时间来提醒你。

set WshShell = WScript.CreateObject("WScript.Shell")
'对话框标?
alerttitle = "定时提醒"
'提醒内容,vbnewline为换行符
alerttext = vbnewline & vbnewline & "休息一下,活动一下胳膊,脖子,腰部。" & vbnewline & vbnewline & vbnewline & "生命在于运动"& vbnewline & vbnewline & vbnewline
for i = 1 to 12 '12为提醒的次数
WScript.Sleep(1000*60*45) '每45分钟提醒一次
msgbox alerttext,4096,alerttitle
next

将上面代码存为:定时提醒.vbs,然后双击运行;按ctr+alt+del,进程中会有一个wscript.exe的进程,结束后他就不会提醒了。


给上网的人推荐一个定时提醒器
不要在网上时间太长,每15分钟提醒你一次。(可以自己设定)
把下面的代码复制到一个记事本文件中,然后改一下扩展名,txt 改为 vbs ,执行一下就可以了。


set WshShell = WScript.CreateObject("WScript.Shell")
'对话框标题
alerttitle = "友情定时提醒"
'提醒内容,vbnewline为换行符
for i = 1 to 48 '提醒的次数
alerttext = vbnewline & "休息一下,活动一下胳膊,脖子,腰部。" & vbnewline & vbnewline & "生命在于运动" & vbnewline & vbnewline & vbnewline & "每30分钟提醒一次,已经提醒您:"&i&"次,累计"&i/2&"小时" & vbnewline
WScript.Sleep(1000*60*30) '每30分钟提醒一次
msgbox alerttext,4096,alerttitle
next

还可以放到启动里,一开机便自动运行

另附加简便方法:

(5):体验Windows XP系统内置的AT命令
  AT命令是Windows XP中内置的命令,它也可以媲美Windows中的“计划任务”,而且在计划的安排、任务的管理、工作事务的处理方面,AT命令具有更强大更神通的功能。AT命令可在指定时间和日期、在指定计算机上运行命令和程序。

  我们可以在“开始→运行”中输入AT命令,下面就来看看AT命令的一些实例分析。

  1、定时关机

  命令:at 21:00 ShutDown –S –T30

  该命令运行后,到了21:00点,电脑会出现“系统关机”对话框,并默认30秒延时自动关机。

  2、定时提醒

  命令:at 12:00 Net Send 10.10.36

  .122与朋友约会的时间到了,快点准备出发吧!

  其中Net Send是Windows内部程序,可以发送消息到网络上的其他用户、计算机。10.10.36.122是本机电脑的IP地址。这个功能在Windows中也称作“信使服务”。

  3、自动运行批处理文件

  如果公司的数据佷重要,要求在指定的日期/时间进行备份,那么运行:

  命令:at 1:00AM /Every:Saturday My_BackUp.bat

  这样,在每个Saturday(周六)的早上1:00点,电脑定时启动My_BackUp.bat批处理文件。My_BackUp.bat是一个你自行编制的批处理文件,它包含能对系统进行数据完全备份的多条命令。

  4、取消已经安排的计划

  命令:at 5 /删除

  有时候,你已经安排好的计划可能临时变动,这样你可以及时地用上述命令删除该计划(5为指派给已计划命令的标识编号),当然,删除该计划后,可以重新安排