如何结束所有IE进程？

[lostmoon]

打开了诸多网页，用系统的IE浏览器，现在是想将所有的IE进程都强行结束(不是简单的关闭浏览器，是结束进程)，这个怎么写？？

[kfcoffe]

CreateToolhelp32Snapshot

Process32First
Process32Next
列举所有进程，结束你要删除地

[gyk120]

如1L所说，可以用terminateProcess结束进程

[dj2437]

api hook如果你不能读懂我给你代码也不能用,如果你能读懂不用我给你也会想到办法

[s11ss]

WinExec('ntsd -c q -pn iexplore.exe', SW_HIDE);

[SQLDebug_Fan]

给你一个函数，按照程序文件名字杀掉进程。

function KillTask(const ExeName: string): Boolean;
{
  强制终止ExeName对应的应用程序
}
var
  lppe: TProcessEntry32;
  SH, PID: THandle;
  Found: boolean;
begin
  Result := False;
  EnablePrivilege('SeDebugPrivilege', True);
  lppe.dwSize := SizeOf(lppe);
  SH := CreateToolhelp32Snapshot(TH32CS_SNAPALL, 0);
  found := Process32First(SH, lppe);
  while found do
  begin
    if SameText(ExeName, ExtractFileName(lppe.szExeFile)) then
    begin
      PID := OpenProcess(PROCESS_ALL_ACCESS, true, lppe.th32ProcessID);
      Result := TerminateProcess(PID, DWORD(-1));
      CloseHandle(PID);
    end;
    found := Process32Next(SH, lppe);
  end;
  EnablePrivilege('SeDebugPrivilege', False);
end;

[JPEXE]

引用 4 楼 s11ss 的回复:

WinExec('ntsd -c q -pn iexplore.exe', SW_HIDE);

足矣！

[vpn163hot]

先提权，然后#5楼代码足够了

[dd_zhouqian]

引用 4 楼 s11ss 的回复:

WinExec('ntsd -c q -pn iexplore.exe', SW_HIDE);

这个不错

[lostmoon]

这个不好使：WinExec('ntsd -c q -pn iexplore.exe', SW_HIDE);

用了后，瑞星监控软件提示木马病毒，运行不了，禁止了监控，才能运行，这个客户端操作起来，适用性不强。

[lostmoon]

引用 5 楼 sqldebug_fan 的回复:

给你一个函数，按照程序文件名字杀掉进程。
Delphi(Pascal) codefunction KillTask(const ExeName: string): Boolean;{
强制终止ExeName对应的应用程序}var
lppe: TProcessEntry32;
SH, PID: THandle;
Found: boolean;begin
Result := False;
EnablePrivilege('SeDebugPrivilege', True);
lppe.dwSize := SizeOf(lppe);
SH := CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
found := Process32First(SH, lppe);while founddobeginif SameText(ExeName, ExtractFileName(lppe.szExeFile))thenbegin
PID := OpenProcess(PROCESS_ALL_ACCESS, true, lppe.th32ProcessID);
Result := TerminateProcess(PID, DWORD(-1));
CloseHandle(PID);end;
found := Process32Next(SH, lppe);end;
EnablePrivilege('SeDebugPrivilege', False);end;

这个运行不下去，有错误！

[flew0214]

那你就把程序，让杀软例外。不就行了么？

[hongqi162]

遍历 kill

[crossbow]

第一次看见了月亮的真容 :)