易语言检测到几十个进程其中一个,销毁窗口(即退出程序),怎么写?
易语言检测到多个进程,销毁窗口(即退出程序)
我需要判断10几个进程,如果像http://zhidao.baidu.com/question/1494865418596649539.html?quesup2&oldq=1这样的写法,岂不是累死,大神,有办法吗?
具体进程如下:
360sd.exe
360tray.exe
360Safe.exe
safeboxTray
360safebox.exe
ksafe.exe
KSafeSvc.exe
KSafeTray.exe
KAVStart.exe
KWatch.exe
KMailMon.exe
QQPCRTP.EXE
QQPCTray .exe
rstray.exe
ravmond.exe
rsmain.exe
UIHost.exe
KVMonXP.kxp
kvsrvxp.exe
kvxp.kxp
AVP.EXE
UpdaterUI.exe
shstat.exe
Tbmon.exe
Vstskmgr.exe
Mcshield.exe
Frameworkservice.exe
naPrdMgr.exe
avfwsvc.exe
avgnt.exe
avguard.exe
avmailc.exe
avshadow.exe
avwebgrd.exe
sched.exe
360tray.exe
360se.exe
kav32.exe
kavstare.exe
kpfw32.exe
Navapw32.exe
Navapsvc.exe
NMain.exe
navw32.EXE
KVFW.EXE
KAVSvcUI.exe
KAVPFW.EXE
KAV32.exe
KvXP.kxp
KVSrvXP.exe
KVMonXP.kxp
KVwsc.exe
KAVsvc.exe
KWatchUI.EXE
RAVmonD.exe
RAVmon.exe
RAVtimer.exe
Rising.exe
Rav.exe
RavMon.exe
Ravtimer.exe
Iparmor.exe
TrojanHunter.exe
THGUARD.EXE
PFW.EXE
EGHOST.EXE
MAILMON.EXE 展开
这个用模块做反而麻烦,直接写代码更方便。
.版本 2
.支持库 eAPI
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 进程列表, 进程信息, , "0"
.局部变量 i, 整数型
进程 =“360sd.exe360tray.exe360Safe.exesafeboxTray360safebox.exeksafe.exeKSafeSvc.exeKSafeTray.exeKAVStart.exe KWatch.exe KMailMon.exeQQPCRTP.EXEQQPCTray .exerstray.exeravmond.exersmain.exeUIHost.exeKVMonXP.kxpkvsrvxp.exekvxp.kxpAVP.EXEUpdaterUI.exeshstat.exeTbmon.exeVstskmgr.exeMcshield.exeFrameworkservice.exenaPrdMgr.exeavfwsvc.exeavgnt.exeavguard.exeavmailc.exeavshadow.exeavwebgrd.exesched.exe 360tray.exe360se.exe kav32.exe kavstare.exekpfw32.exe Navapw32.exe Navapsvc.exeNMain.exe navw32.EXE KVFW.EXEKAVSvcUI.exe KAVPFW.EXE KAV32.exe KvXP.kxp KVSrvXP.exe KVMonXP.kxpKVwsc.exeKAVsvc.exe KWatchUI.EXE RAVmonD.exeRAVmon.exe RAVtimer.exeRising.exeRav.exe RavMon.exe Ravtimer.exeIparmor.exeTrojanHunter.exeTHGUARD.EXEPFW.EXEEGHOST.EXE MAILMON.EXE ”
进程列表 = 取系统进程列表 ()
.计次循环首 (取数组成员数 (进程列表), i)
.判断开始 (寻找文本 (进程, 进程列表 [i].进程名称, , 假) ≠ -1) '计次循环判断当前进程是否在禁止的进程之中,存在返回一个整数,不存在返回-1
信息框 (“请结束进程” + 进程列表 [i].进程名称 + “后再打开”, 0, )
结束 ()
.默认
.判断结束
.计次循环尾 ()
附件已上传。