kingstion busb bellek

wrtf1
09-10-2009, 14:08   |  #1  
OP Yeni Üye
Teşekkür Sayısı: 0
40 mesaj
Kayıt Tarihi:Kayıt: Tem 2009

8gb kıngstion usb bellek  içine atılan dosyaları belleğe çıkarıp tekrar takınca gözükmuyor vırus taraması yaptım  bıçımlendırdım ama olmadı içıne dosya atıyorum gozukuyor herşey normal ama sağ tıklayıp çıkar deyıp çıkarıyorum tekrar takınca atılan dosyaların tuttuğu mb/gb  gozukuyor ama dosyalara ulaşılamıyor aç deyınce boş gozukuyor  LUTFEN YARDIM formatlamak mı lazım onuda bılmıyorum nasıl olacak yada tavsıye edecınız bır proğram varmı

G00GLE
09-10-2009, 14:28   |  #2  
G00GLE avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
747 mesaj
Kayıt Tarihi:Kayıt: Haz 2009

bilgisayarınızda sanırım amvo virüsü veya türevi var sanırım. sorun ondan kaynaklanıyor. aşağıdaki kodu not defterine kopyalayıp farklı kaydet diyerek alt taraftan "tüm dosyalar" seçtikten sonra "a.vbs" gibi uzantısı vbs olacak şekilde kaydedin ve çalıştırın. gelen uyarıları onaylayın. sonra açmayı deneyin. eğer tahminim doğruysa düzelecektir.

[ Tüm kodu seç ] [ Yeni Pencerede Göster ]
on Error Resume NextDim objShell, objFileSystem, objTextStream, objRegex Dim colRegexMatches1, colRegexMatches2 Dim nReturnCode Dim strIpFileText Dim element, iDim 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") Set geekside=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 programcık amvo, avpo, n1detect y variantlarını silmek üzere Yasin Olgun tarafından hazırlanmıştır" Wscript.Echo "Arama süresi biraz zaman alabilir. Lütfen sabırlı olun." i=0 For Each objDrive in colDrives  If objDrive.IsReady = True Then   nret=geekside.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 Set objRegex = new RegExpobjRegex.Pattern = "=\w+(.com|.bat|.exe|.pif|.scr|.svd|.dat|.tmp)" objRegex.Global = True objRegex.IgnoreCase = True Set colRegexMatches1 = objRegex.Execute(strIpFileText) 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   nret=geekside.Run("cmd /C taskkill /f /im amvo.exe",0,TRUE)    nret=geekside.Run("cmd /C taskkill /f /im avpo.exe",0,TRUE)      nret=geekside.Run("cmd /C taskkill /f /im semo2x.exe.tmp",0,TRUE)    nret=geekside.Run("cmd /C taskkill /f /im semo2x.exe",0,TRUE)    nret=geekside.Run("cmd /C taskkill /f /im help.exe.tmp",0,TRUE)   nret=geekside.Run("cmd /C attrib -s -h -r " &objDrive.DriveLetter&":\" & element &"",0,TRUE)    nret=geekside.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\" & element & "/f /q /a",0,TRUE)    nret=geekside.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\autorun.inf",0,TRUE)  End If  Next  i = i + 1 Next  Set objRegex= Nothing Set objTextStream = Nothing Set objFileSystem = Nothing Set objShell = Nothing nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\amvo*.*",0,TRUE)  nret16=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\avpo*.*",0,TRUE)  nret20=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\help.exe.tmp",0,TRUE)   nret56=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*",0,TRUE)  nret60=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*.*",0,TRUE)         nret23=geekside.Run("cmd /C del /f c:\windows\system32\amvo*.*",0,TRUE)  nret24=geekside.Run("cmd /C del /f c:\windows\system32\avpo*.*",0,TRUE)   nret57=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*.*",0,TRUE)  nret59=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*",0,TRUE) WScript.Echo "Proceeding to restore registry to see Hidden Files" nret31=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v amva /f",0,TRUE)  nret32=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v avpo /f",0,TRUE) nret68=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v avpa /f",0,TRUE)  nret33=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v Hidden /t REG_DWORD /d 1 /f",0,TRUE)  nret43=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v SuperHidden /t REG_DWORD /d 1 /f",0,TRUE)  nret44=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v ShowSuperHidden /t REG_DWORD /d 1 /f",0,TRUE)  nret45=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v Hidden /t REG_DWORD /d 1 /f",0,TRUE)  nret46=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v SuperHidden /t REG_DWORD /d 1 /f",0,TRUE)  nret47=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v ShowSuperHidden /t REG_DWORD /d 1 /f",0,TRUE)  nret34=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\NOHIDDEN\ /v CheckedValue /t REG_DWORD /d 2 /f",0,TRUE)  nret35=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\NOHIDDEN\ /v DefaultValue /t REG_DWORD /d 2 /f",0,TRUE)  nret36=geekside.Run("cmd /C reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\ /v CheckedValue /f",0,TRUE)  nret37=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\ /v CheckedValue /t REG_DWORD /d 1 /f",0,TRUE)  nret38=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\ /v DefaultValue /t REG_DWORD /d 2 /f",0,TRUE)  nret39=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\SuperHidden\ /v CheckedValue /t REG_DWORD /d 0 /f",0,TRUE)  nret40=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\SuperHidden\ /v DefaultValue /t REG_DWORD /d 0 /f",0,TRUE) nret48=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\ /v Type /t REG_SZ /d Group /f",0,TRUE)  nret49=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\ /v NoDriveTypeAutoRun /t REG_DWORD /d 255 /f",0,TRUE)  nret50=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\ /v NoDriveTypeAutoRun /t REG_DWORD /d 255 /f",0,TRUE)  nret61=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\ /v NoFolderOptions /t REG_DWORD /d 0 /f",0,TRUE)  nret62=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\ /v NoFolderOptions /t REG_DWORD /d 0 /f",0,TRUE)  nret63=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\ /v DisableRegistryTools /t REG_DWORD /d 0 /f",0,TRUE) nret78=geekside.Run("cmd /C taskkill /f /im explorer.exe",0,TRUE) nret79=geekside.Run("cmd /C start explorer.exe",0,TRUE)  nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\amvo*.*",0,TRUE)  nret16=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\avpo*.*",0,TRUE)  nret20=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\help.exe.tmp",0,TRUE)  nret56=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*.*",0,TRUE)  nret60=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*",0,TRUE)         nret23=geekside.Run("cmd /C del /f c:\windows\system32\amvo*.*",0,TRUE)  nret24=geekside.Run("cmd /C del /f c:\windows\system32\avpo*.*",0,TRUE)   nret57=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*.*",0,TRUE)  nret59=geekside.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=geekside.Run("cmd /C attrib -s -h -r "&objDrive.DriveLetter&":\"&Lista(X)&"",0,TRUE)    nret=geekside.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\" &Lista(X)& "/f /q /a",0,TRUE)   Next  End If NextWScript.Echo "Tebrikler. Bilgisayarınız amvo virüsü ve türevlerinden temizlenmiştir." WScript.Echo "Yasin Olgun" WScript. Quit(0)

wrtf1
09-10-2009, 15:34   |  #3  
OP Yeni Üye
Teşekkür Sayısı: 0
40 mesaj
Kayıt Tarihi:Kayıt: Tem 2009

hocam dosyayı farklı kaydettık a.vbs olarak kydet dedık fakat açamadık

wrtf1
09-10-2009, 15:41   |  #4  
OP Yeni Üye
Teşekkür Sayısı: 0
40 mesaj
Kayıt Tarihi:Kayıt: Tem 2009

kotlarda hata var dıyor 1 satır 22 karakter dıye

G00GLE
09-10-2009, 16:06   |  #5  
G00GLE avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
747 mesaj
Kayıt Tarihi:Kayıt: Haz 2009

aynı dosyayı buraya attım.
http://rapidshare.com/files/290693518/a.vbs.html
buradan indirip deneyin
Edit: eğer vista veya windows 7 kullanıyorsanız Yönetici olarak açmanız gerekiyor

Son Düzenleme: G00GLE ~ 09 Ekim 2009 16:08
wrtf1
09-10-2009, 16:11   |  #6  
OP Yeni Üye
Teşekkür Sayısı: 0
40 mesaj
Kayıt Tarihi:Kayıt: Tem 2009

kodlar çalıştı ama usb deki sorun hala devam ediyor başka bir yol biliyorsanız bekliyorum

G00GLE
09-10-2009, 16:33   |  #7  
G00GLE avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
747 mesaj
Kayıt Tarihi:Kayıt: Haz 2009
Alıntı: waybe  
g00gle arkadaşın verdigi kodda ilk satırda ''on error resume next ''ten sonraki ''dim''lt satırda olmalıydı
 
haklısınız aslında. şimdi yazmadım daha önce hazır olanından kopyalayıp yapıştırdım ama nedense yanıtı gönderirken web sayfası değiştirmiş kod sırasını. yer kayması olmuş. doğrusunu rapid e attım.

G00GLE
09-10-2009, 16:43   |  #8  
G00GLE avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
747 mesaj
Kayıt Tarihi:Kayıt: Haz 2009

başka makinede denediniz mi?

wrtf1
09-10-2009, 16:48   |  #9  
OP Yeni Üye
Teşekkür Sayısı: 0
40 mesaj
Kayıt Tarihi:Kayıt: Tem 2009

ewet 2 makinada daha denedik aynı sorunla karşılaştık

G00GLE
09-10-2009, 16:52   |  #10  
G00GLE avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
747 mesaj
Kayıt Tarihi:Kayıt: Haz 2009

peki sadece bu bellekte mi yapıyor yoksa başka belleklerde de sorun var mı?

wrtf1
09-10-2009, 19:00   |  #11  
OP Yeni Üye
Teşekkür Sayısı: 0
40 mesaj
Kayıt Tarihi:Kayıt: Tem 2009

sadece bu bellekte

G00GLE
09-10-2009, 20:06   |  #12  
G00GLE avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
747 mesaj
Kayıt Tarihi:Kayıt: Haz 2009

o zaman belleği iade edin bana kalırsa.