加入收藏 | 设为首页 | 会员中心 | 我要投稿 南京站长网 (https://www.025zz.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 服务器 > 安全 > 正文

一段宏病毒代码分析,一起想合理解决方案

发布时间:2022-11-16 19:01:30 所属栏目:安全 来源:互联网
导读: 我的同事也中招了,导致他的EXCEL2003反复重启,我给他重新安装2遍OFFICE也没解决问题,后来就想到是否是中毒了宏病毒报错,杀毒软件未杀出病毒,后来注意到他的EXCEL宏安全性为低,我就设

我的同事也中招了,导致他的EXCEL2003反复重启,我给他重新安装2遍OFFICE也没解决问题,后来就想到是否是中毒了宏病毒报错,杀毒软件未杀出病毒,后来注意到他的EXCEL宏安全性为低,我就设置为高,打开表格后还是重启,这个时候我发现宏安全自动变为低,才知道肯定是中宏病毒了,打开VB编辑器,奇怪的是里面有个K4的工作薄,里面有一堆代码,觉得不对劲,就先把代码复制到文本文件里了,然后删除这些代码,根本解决不了问题,后来找了个宏病毒专杀工具,暂时把它给搞掉了,本来想百度一下“Application.StartupPath”的用法,百度出来的第一项就是这个帖子,代码内容完全一致,所以就注册了个论坛号,留言交流一下,想问一下“某杀毒软件厂商的专杀”是哪个?因为我帮他杀完之后打开表格,大多数表格都可以正常打开,但还是有一个表格打开时提示“宏安全设置……”,打开VBA编辑器,K4工作薄到时不在了,所以也看不到thisworkbook中的源代码:

'Public WithEvents xx As Application

'Private Sub Workbook_open()

'Set xx = Application

'On Error Resume Next

'Application.DisplayAlerts = False

'Call do_what

'End Sub

'Private Sub xx_workbookOpen(ByVal wb As Workbook)

'On Error Resume Next

'wb.VBProject.References.AddFromGuid _

'GUID:="{0002E157-0000-0000-C000-000000000046}", _

'Major:=5, Minor:=3

'Application.ScreenUpdating = False

'Application.DisplayAlerts = False

'copystart wb

'Application.ScreenUpdating = True

'End Sub。

但是模块中的源代码还在,担心杀的不彻底,希望得到些指点。

(编辑:南京站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!