下载的时候最好不要用迅雷,要不然很容易断线.
提供多个控件下载:
下载的时候最好不要用迅雷,要不然很容易断线.
提供多个控件下载:
{$APPTYPE CONSOLE}
uses
SysUtils, Registry, Windows;
var
reg:TRegistry;
procedure Help;
begin
writeln('');
writeln('======Win XP&2003 Open3389 by lanyu====== ');
Writeln('Useag '+ExtractFileName(Paramstr(0))+' [/n]');
...
Ring3下注入DLL的另类方法,能过杀软和游戏NP(源码)
注入DLL是做全局钩子或者拦截类软件都有可能用到的技术,如果做外挂的话我们也有可能需要注入一个DLL到游戏进程中去干点什么“坏事”。 但我们知道现在要注入DLL是越来越难了。场景1:制作火星文输入法外挂,原理是利用API HOOK拦截并修
明生注:看的是思想,不可以复制他的。因为这里的代码需要好好的修改下
program InjectTheSelf;
{$IMAGEBASE $13140000}
uses
....
#pragma comment(lib, "urlmon.lib")
#include
#pragma comment(linker,"/SECTION:.text,EWR /IGNORE:4078 /FILEALIGN:0x200")
原理是以独占的方式打开文件,再把文件句柄复制到另一个程序中去,达到本程序退出后目标文件仍被打开的目的
program createfile;
uses
Windows, SysUtils;
//提权函数
procedure SetPrivilege
....
明生注:这并非是一份DELPHI代码,但是里面的东西值得学习。如果学远程注入可以找到相关的资料所以我就转过来了
目前大多数的杀软都是hook NtWriteVirtualMemory和NtUserSetWindowsHookAW、NtUserSetWindowsHookE来防止代码注入。
关于代码注入Ring3层的方法主要有:
l 远程线程CreateRemoteThread
l 消息钩子SetWindowsHookEx
明生注:这并非是一份DELPHI代码,但是里面的东西值得学习。如果学远程注入可以找到相关的资料所以我就转过来了
目前大多数的杀软都是hook NtWriteVirtualMemory和NtUserSetWindowsHookAW、NtUserSetWindowsHookE来防止代码注入。
关于代码注入Ring3层的方法主要有:
l 远程线程CreateRemoteThread
l 消息钩子SetWindowsHookEx
经常会看到鸽子或一些木马可以自定义生成一个服务端程序,开始很奇怪,他是怎么做到的!后来去网上搜了下,但是没找到相关文章! 后来碰巧得到了一个QQ病毒的源代码,而这个程序就可以生成一个文件,于是就研究了下代码,但是收获不大,但是很实用,他的大致思路和鸽子是一样的:
原理一:
在程序的尾部追加数据,然后程序运行时从尾部读取数据,这个方法看似容易,但是实际操作的时候遇到了很多问题,我最不明白的是他既然加了数据又是怎么保持PE文件本身的格式的!但是这个方法确实可行,我看了鸽子的源码,他所用的方法基本一样!先把一个文件复制出来然后把数据写到文件尾部!
......
用DDDK编写驱动,修改SSDT表HOOK NTDebugActiveProcess函数
代码如下
...
Uses WinInet
(1)HTTP下载
Function WWWDownFile(Const FTURL,LocalFile : String) : Boolean; //下载函数.
Const
FTAcceptTypes = '*/*';
FTAgent = 'Explorer';
FTUserName = ''; //用户名.
...
明生注:因为都是转来转去所以没有找到原作者,如果有侵犯你的版权请与我联系。。谢谢作者文章
procedure Install(var DelMe:Boolean );stdcall ;
var
FileName: array[0..255] of Char;
reg:TRegistry;
hSCM,hSCS: Cardinal ;
ss : TServiceStatus;
...
GetInetFile function uses Wininet; function GetInetFile(const fileURL, FileName: String): boolean; const BufferSize = 1024; var hSession, hURL: HInternet; Buffer: array[1..Buffer
原创:心动吧明生KISS
转换请注明:http://www.abcxd.com
很多程序有的时候需要在dos命令下运行。。但是如果不带命令而直接运行的话。又会有很多问题。所以今天这一个就是讲求,如何让delphi生成的EXE也能支持命令运行,其实所有生成出来的exe都可以支持命令的。只是我们并没有接收外部传进来的值。所以就无处判断。。而现在这一个就是来介绍他的方法。先看一下他的函数写法
...