VBS 循環中導致CPU利用率過高的解決

最新推荐文章于 2025-03-12 16:19:28 发布

原创最新推荐文章于 2025-03-12 16:19:28 发布 · 1k 阅读

0 ·

CC 4.0 BY-SA版权

VBS 学习专栏收录该内容

0 篇文章

订阅专栏

本文介绍了一种使用VBScript实现定时运行指定程序的方法。通过设置特定的时间条件，脚本能够在每天固定时间执行任务，例如关闭浏览器并启动某个批处理文件。文中还介绍了如何利用WScript.Sleep命令来控制循环频率。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

只需要在循環中加入SCript.Sleep 100,就可以了。

測試代碼：

Option Explicit
On Error Resume Next '測試中最好去掉，否則不能發現錯誤 
Dim Wsh,sProgramme,sRunTime,nTime
sProgramme="test.bat"
sRunTime=Mid(Time,4,5)
nTime=Mid(Time,4,5)
Msgbox nTime
Do While True
WScript.Sleep 1000 '循環中使用這句即可解決 
If nTime=sRunTime Then
Set Wsh=WScript.CreateObject("WScript.Shell")
wsh.Run "taskkill /f /im iexplore.exe",0,True
Wsh.Run sProgramme,0,True
Set Wsh=NoThing
sRunTime=DateAdd("h",2,Time)
sRunTime=Mid(sRunTime,4,5)
Msgbox sRunTime
Exit Do
End If
nTime=Mid(Time,4,5)
WScript.Sleep 1000
Loop