vbs 如何在规定的时间内启动某个进程
下面以QQ.exe为例，不报错，但不能在规定时间启动QQ进程：
dim aa,bb,cc,dd
h=hour(now)
m=minute(now)
s=h&":"&m
bb=inputbox("请输入时间","提示")
set cc=getobject("winmgmts:\\.\root\cimv2")
set dd=cc.execquery("select * from win32_process where name='QQ.exe'")
if bb=s then
if dd.count=0 then
set aa=createobject("wscript.shell")
aa.run "QQ.exe"
end if
wscript.sleep 1000
end if
[最优解释]
strApp="QQ.exe"
strTime=inputbox("请输入时间","提示")
set cc=getobject("winmgmts:\\.\root\cimv2")
set dd=cc.execquery("select * from win32_process where name='QQ.exe'")
if dd.count=0 then
set aa=createobject("wscript.shell")
do
s=hour(now) & ":" & minute(now)
if s=strTime then
aa.run strApp
exit do
end if
wscript.sleep 1000
loop
else
msgbox "已经运行！"
end if
说实在的，我对wscript还不清楚，参照楼主的代码修改的。试了一下，基本还行。
strApp="QQ.exe" 这儿要注意，你必须输入完整的路径。
[其他解释]
楼主不知道有‘循环’这个语法么…………
[其他解释]
谢谢大神啊
