正在加载...

{简单,快乐}

au3-非法进程查杀源代码

Posted by l4ever on 2007-07-04 21:35

AU3代码:

#NoTrayIcon
If FileExists(@ScriptDir&”\Process.ini”) = 0 Then
MsgBox(16,”提示 L4EVER.CN”,”配置文件不存在,程序即将退出!”)
Exit
EndIf
$1 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”1″,”")
$2 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”2″,”")
$3 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”3″,”")
$4 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”4″,”")
$5 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”5″,”")
$6 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”6″,”")
$7 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”7″,”")
$8 = IniRead(@ScriptDir &”\Process.ini”,”查杀进程”,”8″,”")
While 1
If ProcessExists ($1) Then
ProcessClose($1)
EndIf
If ProcessExists ($2) Then
ProcessClose($2)
EndIf
If ProcessExists ($3) Then
ProcessClose($3)
EndIf
If ProcessExists ($4) Then
ProcessClose($4)
EndIf
If ProcessExists ($5) Then
ProcessClose($5)
EndIf
If ProcessExists ($6) Then
ProcessClose($6)
EndIf
If ProcessExists ($7) Then
ProcessClose($7)
EndIf
If ProcessExists ($8) Then
ProcessClose($8)
EndIf
WEnd

Process.ini

[查杀进程]
1=qq.exe
2=notepad.exe

评论列表

  1. alex

    能否共享贵站小图标?谢谢勒~~
    如果可以的话请发邮箱:
    yyly07@163.com
    万分感谢
    就是下面有阴影的小图标

  2. jh

    以上代码可用才循环来控制累加!

添加评论

所有评论均需人工审核方可显示,发布广告者请止步!