'似乎有更专业的办法,我仅想到这样简劣
dim wmi,proc,info,flag,target
target="qq.exe":flag=false
set wmi=getobject("winmgmts:")
do
set proc=wmi.execquery("select * from win32_process")
for each info in proc
if info.name=target then flag=true
next
if flag=false then msgbox target & "已关闭!" :wscript.quit
flag=false
wscript.sleep 1000
loop
原帖由 梦想种子 于 2008-1-27 23:52 发表
'似乎有更专业的办法,我仅想到这样简劣
dim wmi,proc,info,flag,target
target="qq.exe":flag=false
set wmi=getobject("winmgmts:")
do
set proc=wmi.execquery("select * from win32_process")
for each in ...