Question

vbs检测进程是否存在，如果没有继续语句，如果有要检测的进程则停止脚本

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励20（财富值+成长值）

Answer 1

set f=createobject("scripting.filesystemobject")
do
set mi=getobject("winmgmts:win32_process").instances_
for each p in mi
if ucase(p.name)=ucase("QQ.exe") then
WScript.quit
end if
next
wscript.sleep 2000
loop