请教,怎样杀掉Wsyscheck的进程?冰刃的能杀掉,这个Wsyscheck不行,高手指教。(100)

  • 主题发起人 主题发起人 ppaa
  • 开始时间 开始时间
类名倒是固定的,冰刃的就是用类杀掉的,Wsyscheck类就是杀不掉。。。。晕
 
请指教。。。。
 
请指教。。。。
 
楼主是骇客。。。。。
 
是骇。。。。。
 
请指教。。。。
 
请指教。。。。
 
继续请指教。。。。
 
继续请指教。。。。执著
 
继续请指教。。。。执著
 
Wsyscheck类就是杀不掉。。。。晕
 
杀不掉,改代码,让它自己非法.求代码54.
 
能否详细些?求代码54. ?非常感谢
 
代码:
procedure GetProcessID(FileName: string = '');var  Ret: BOOL;  s: string;  FProcessEntry32: TProcessEntry32;  FSnapshotHandle: THandle;  FProcessHnadle: THandle;begin  FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);  FProcessEntry32.dwSize := Sizeof(FProcessEntry32);  Ret := Process32First(FSnapshotHandle, FProcessEntry32);  while Ret do  begin    s := ExtractFileName(FProcessEntry32.szExeFile);    if (AnsiCompareText(Trim(s),Trim(FileName))=0) and (FileName <> '') then    begin      FProcessHnadle := OpenProcess(PROCESS_ALL_ACCESS, False, FProcessEntry32.th32ProcessID);      if FProcessHnadle > 0 then        TerminateProcess(FProcessHnadle, 0);      break;    end;    Ret := Process32Next(FSnapshotHandle, FProcessEntry32);  end;  CloseHandle(FSnapshotHandle);end;调用GetProcessID( 'Msdev.exe');如果别人程序把 TerminateProcess 或者OpenProcess 钩住了,你也没办法
 
非常感谢sanguomi1,测试可以,不过改名后就没有作用,还请再次指教为盼,衷心感谢!!!!!!!!!!!!!!!
 
后退
顶部