Bir trojan virüstür.Gizli dosya ayarlarını değiştirip bulaştığı klasörleri görmenizi engeller.combofix isimli bir dosya ile silinmesi mümkün, başka türlü silmeniz pek mümkün değil çünkü neredeyse hiçbir anti-virüs programı bunu bulamıyor.
çok piç kurusu bi' şey bu. combofix falan hikaye olabiliyor. çünkü virüs onunda çalışmasını engelliyor. siz hiçbirşeye elinizi sürmeyin önce.
http://rapidshare.com/files/126835739/sil.rar.html
adresine girin indirin. sistem geri yüklemeyi kapatın önce. indirdiğiniz dosyanın içindekileri okuyun eksiksiz uygulayın. sorununun bu yolla halledildiğini söylüyorlar. valla ben yaptım olmadı. ondan önce bi sürü şey denemiştim. ondandır herhalde. siz ilk bunu deneyin kurtulun. kurtulursanız bi artılayın bu entryi hatrına. bende sevineyim birisine hayrım dokundu diye. hadi bakalım oy da dilendik gider ayak. sksksjksj...
edit: evet bi kişi kurtulmuş. yardımlaşmak ne güzel bi şey canım...
gizli dosyaları görünür olmasını engelleyen pislik. Flash diskler yüzünden pcden pcye bulaşır. http://uploaded.to/?id=vt9qoa adresinden indireceğiniz vbscript ile 2 sn de kurtulmanız mümkün.
Dim objShell, objFileSystem, objTextStream, objRegex
Dim colRegexMatches1, colRegexMatches2
Dim nReturnCode
Dim strIpFileText
Dim element, i
Dim Lista
Lista=array("n1de?ect.com","nide?ect.com","nlde?ect.com","j*.bat","m*.com","d*.com","copy.exe","host.exe",_
"a0*.com","ntdeiect.com","ntdelect.com", "u?de*.com","ntde1ect.com", "x*.com", "tio*.*",_
"80*.com","semo*.exe","autorun*.*","x*.exe","yl*.exe","qd*.cmd")
Set hardwaremania=WScript.CreateObject("WScript.Shell")
Set objShell = WScript.CreateObject("WScript.Shell")
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives
Wscript.Echo "bu script kötü amaçlý amvo, avpo, n1detect ve türevlerini kaldýrmak için hazýrlanmýþtýr"
Wscript.Echo "arama ve silme iþlemi bikaç saniye alacaktýr. lütfen sabýrlý olun"
i=0
For Each objDrive in colDrives
If objDrive.IsReady = True Then
nret=hardwaremania.Run("cmd /C attrib -s -h -r "&objDrive.DriveLetter&":\autorun.inf",0,TRUE)
Set objTextStream = objFileSystem.OpenTextFile(objDrive.DriveLetter&":\autorun.inf",1)
strIpFileText = objTextStream.ReadAll
objTextStream.Close
End If
Next
i=0
For Each element In colRegexMatches1
element = Replace(element,"=","")
WScript.Echo "Proceeding to remove file of virus :" & element
For Each objDrive in colDrives
If objDrive.IsReady = True Then
Wscript.Echo "Clean drive: " & objDrive.DriveLetter
nret23=hardwaremania.Run("cmd /C del /f c:\windows\system32\amvo*.*",0,TRUE)
nret24=hardwaremania.Run("cmd /C del /f c:\windows\system32\avpo*.*",0,TRUE)
nret57=hardwaremania.Run("cmd /C del /f c:\windows\system32\semo*.*.*",0,TRUE)
nret59=hardwaremania.Run("cmd /C del /f c:\windows\system32\semo*.*",0,TRUE)
WScript.Echo "gizli dosyalarýn görünmesi için kayýt defteri eski haline getiriliyor"
nret23=hardwaremania.Run("cmd /C del /f c:\windows\system32\amvo*.*",0,TRUE)
nret24=hardwaremania.Run("cmd /C del /f c:\windows\system32\avpo*.*",0,TRUE)
nret57=hardwaremania.Run("cmd /C del /f c:\windows\system32\semo*.*.*",0,TRUE)
nret59=hardwaremania.Run("cmd /C del /f c:\windows\system32\semo*.*",0,TRUE)
For Each objDrive in colDrives
If objDrive.IsReady = True Then
For X=0 to UBound(Lista)
nret=hardwaremania.Run("cmd /C attrib -s -h -r "&objDrive.DriveLetter&":\"&Lista(X)&"",0,TRUE)
nret=hardwaremania.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\" &Lista(X)& "/f /q /a",0,TRUE)
Next
End If
Next
flash diske bulaştıysa cmd kullanılarak çabucak aşılan virüs. aha da şöyle;
önce diskin takılı olduğu alan seçilir. biz flash diski F'ye takmış olalım mesela. her windows işletim sisteminde bulunan cmd programını çalıştırıyoruz. ardından şunları ekrana yazıyoruz.
f:
attrib -r -s -h /s /d
işte bu kadar. artık gizli dosyalarınızı görebilirsiniz.
