在寫了《Worm.Win32.VB.fw分析與清除方案》后,也沒想到要寫什么專殺,不過這些天好多同學都說中了這只病毒,我要是一個一個去解決,非忙死我不可!感染范圍挺大的!我之前寫了一篇《VBS編程打造自己的病毒專殺工具》 ,VBS相對來說熟悉點,所以這次就用VBS來寫個專殺吧……下面代碼不懂的,請參考那篇介紹如何寫自己的病毒專殺的文章吧。
復制代碼 代碼如下:
on error resume next
set w=getobject("winmgmts:")
set p=w.execquery("select * from win32_process where name='wininit.exe'")
for each i in p
i.terminate
next
set fso=createobject("scripting.filesystemobject")
set v1=fso.getfile("c:\windows\system32\systeminit.exe")
set v2=fso.getfile("c:\windows\system32\wininit.exe")
set v3=fso.getfile("c:\windows\system32\winsystem.exe")
v1.attributes=0
v2.attributes=0
v3.attributes=0
v1.delete
v2.delete
v3.delete
set drvs=fso.drives
for each drv in drvs
if drv.drivetype=1 or drv.drivetype=2 or drv.drivetype=3 or drv.drivetype=4 then
set w=fso.getfile(drv.driveletter":\kerneldrive.exe")
w.attributes=0
w.delete
set u=fso.getfile(drv.driveletter":\autorun.inf")
u.attributes=0
u.delete
end if
next
set reg=wscript.createobject("wscript.shell")
reg.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",0,"REG_DWORD"
reg.regwrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Start",2,"REG_DWORD"
reg.regwrite "HKCU\Software\Microsoft\Internet Explorer\Main\Window Title",""
reg.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Userinit","C:\WINDOWS\system32\userinit.exe,"
reg.regdelete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\wininit"
reg.regdelete "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions"
fso.getfile("regedit.exe").copy("c:\regedit.exe")
fso.getfile("cmd.exe").copy("c:\windows\system32\cmd.exe")
fso.getfile("taskmgr.exe").copy("c:\windows\system32\taskmgr.exe")
fso.getfile("msconfig.exe").copy("C:\WINDOWS\pchealth\helpctr\binaries\msconfig.exe")
fso.getfile("regedit.exe").copy("C:\WINDOWS\system32\dllcache\regedit.exe")
fso.getfile("cmd.exe").copy("C:\WINDOWS\system32\dllcache\cmd.exe")
fso.getfile("taskmgr.exe").copy("C:\WINDOWS\system32\dllcache\taskmgr.exe")
fso.getfile("msconfig.exe").copy("C:\WINDOWS\system32\dllcache\msconfig.exe")
regedit.exe、cmd.exe、taskmgr.exe、msconfig.exe四個文件是正常的(你可以從其他電腦上拷貝這四個文件),將這四個文件與上面的KillVirus.vbs放在同一目錄下。運行KillVirus.vbs即可!
寫專殺不容易的,代碼為原創……希望尊重勞動成果啊!另:VBS寫出來的專殺果真不怎么樣,不過效果還是挺好的(對付小病毒)。思路如此,放上來僅供參考試用。上面代碼試驗通過,非常的有效!完全文件請到我網盤下載:-)http://ycosxhack.ys168.com/,“病毒專殺”目錄,文件名為“Worm.Win32.VB.fw專殺.rar(修正)”。
補充:使用這個專殺后,重啟電腦。因為有的注冊表或其他設置要在重啟后見到效果!不過病毒肯定沒了這個時候……專殺修正