宏病毒分析及清除实验.doc

《宏病毒分析及清除实验.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、宏病毒分析及清除实验实验目的演示宏的编写说明宏的原理及其安全漏洞和缺陷理解宏病毒的作用机制。实验环境Windows系列操作系统；Word2003应用程序。实验学时2学时，必做实验。实验内容1.设置实验环境；2.打开带宏病毒的恥rd文档；3.查看感染过程，分析病毒；4.杀毒。实验步骤：1.软件设置：关闭杀毒软件；打开Word2003,在工具-宏-安全性中，将安全级别设置为低，在可靠发行商选项卡中，选择信任任何所有安装的加载项和模板，选择信任visualbasic项目的访问。注意：为了保证该实验不至于造成较大的破坏性，进行

2、实验感染后，被感染终端不要打开过多的word文档，否则清除比较麻烦（对每个打开过的文档都耍清除）。安全性f?iix00置为1.2.3.4.安全级（§）可靠发行商a）o非常高。只允许运行安装在受信任位置的宏。所有苴他签箸的-和未经签箸的宏都将被禁用o高。只允许运行可靠来源签署的宏'未经签署的宏会自动取消O中。您可以选择是否运行可能不安全的宏他人安全性时>才能使用这项设置Do取消LtVQIVICI'TIQIQZUr~iiiiiiiiiii，只/八么口丁神一^丁说明宏的原理及其安全漏:酥缺陷2理解潮毒的作用机制。3注意：为了

3、保证该实验不至干造成较大的破坏性，进行实验感染后，被感総端不要打开过多的word文档，否则清除比较麻烦（MW个打开过的文档者屢清除）。32.运行宏病毒和杠开和创建若干・T）OC文冷待有仟何不8常的枷冇°卩1.运行宏病毒打开和创建若干.DOC文档，没有任何不止常的地方。打开带有宏病毒的文件：“宏病毒.DOC”，存盘关闭。查看感染过程戲宏病W.doc-licrosoTtford・』口一^够一ffiAH）格式©工具Q）表格®窗口⑪帮助01）键入需要帮助的问题宋体L4$48«18202224«28303234W38JO4281

4、012中病毒了，看到对话框了吗？状态性还有吗？2只要打开或新建WORD文档都会中羞的哦。a试试如何杀羞吧，用手工杀毒，这样就可以学到宏病羞的原理、传播及其防范了・心2苗未感染病Wl.doc-IicrosoftTordI-—,•.•^入d）格式©工具⑴表格®窗口⑩帮助⑩对未感染病毒的w）rd文件进行病毒感染"型文档1—MicrosoftVordEEx:文件g）编辑@）视图②插入Q）格式©工具a）表格®窗口⑩帮助⑩1」3」丨3丄弩.达；◎▼鑒二2481012141618202224262830323436八X新建一个文档2

5、型新建一个文档•doc-KicrosoftTord:文件（I）編辑©）视图辺插入d）格式©工具⑴表格@）窗口⑪帮助⑩:1；【*口丨“aI移宝丨一冷汛丨町▼丨01ntf：宋体(L；22468101214161820222426283032343E□IIaII

6、I

7、*aII

8、II

9、

10、

11、新建一个文档卩1.自我复制功能演示。新建或打开若干文档，查看自我复制和传染过程。2.查看宏病毒打开一个“宏病毒.DOC”文档，然后按Alt+Fll调用宏编写窗口（工具-宏-VisualBasic宏编辑器）,在左侧的project-Micros

12、oftWord对象-ThisDocumcnt中查看到VB代码,保存，表明当前wotd文档含有宏病毒，并将自身复制到Normal,dot（word文档的公共模板中也可以看到相同的代码）。此时所有的WMd文档打开和关闭吋，都将运行以上的病毒代码,可以加入适当的恶意代码，影响wed的正常使用，本例中只是简单的跳出一•个提示框。闫W」Document+Vornal-Project(Exp7-1_■acro_vi3-曰MicrosoftWord对象®JThisDocument国口引用霸Project侏馬染病毒1)日色IMicro

13、softWord对象画］ThisDocument+口引用ThisDocruientDocument按字母序I按分类序I〔名称）ThisDoc>jmentzMicro-VirusSubDocument_0pen0OnErrorResumeNextApplicatioruDisplayStatusBar=FalseOptions・alPrompt=FalseS©tourcodQmodule=ThisDocument.VBProject.VBComponents(1).CoSethost=NormalTemplate.VBP

14、roject.VBComponents(1).CodeModulIfThisDocument=NormalTemplateThenSethost=ActiveDocument.VBProject.VBComponents(1).CodeMEndIfWithhostIf.Lines(1,1)<>'"Micro-Virus"Then.