vbs脚本程序死循环的应用

1、新建一个文本文档，然后在文本文档里面输入以下VBS脚本程序，然后进行保存。（程序里面的“在此插入要重复执行的程序任务，bat命令等”地方可以插入自己要重复执行的程序任务。）

on error resume next

dim a,b,c,ho,mi,se

c=10

do until c=666       '直到c=666才会结束循环

c=10

wscript.sleep 3000   '时间延时3秒

ho=hour(now)         '获取当前时间（小时）

mi=minute(now)       '获取当前时间（分钟）

se=second(now)       '获取当前时间（秒）

if b<>20 and se<10 then   '判断的时间条件可以自由定义

b=20

'在此插入要重复执行的程序任务，bat命令等

end if

if b=20 and se>10 then    '判断的时间条件可以自由定义

b=10

end if

loop

2、将“新建文本文档.txt”命名为“EndlessLoop.vbs”，其中，后缀名的“.txt”已经被改成“.vbs”，“新建文本文档”的名称可以自由命名。

3、双击“EndlessLoop.vbs”就可以运行了，此时可以在任务管理器里面的【进程】查看脚本程序是否在运行。

4、如果要结束这个脚本程序，可以在任务管理器的【进程】里面将wscript.exe进程进行“结束进程”即可。