rede_vil

Aqui estan los twitter de los famosos. PARA BUSCARLOS MAS RAPIDOS PRESIONEN: CTRL + F Cuatemoc Blanco (seleccion mexicana) cuauhtemocb10 Lady gaga Ladygaga Britney spars britney spears Juanes juanestwiter ricky martin ricky_martin Alex Syntek syntekoficial benny ibarra bennyibarra Alejandro Fernandez alexoficial Chayanne chayannemusic Paulina rubio paurubio Shakira shakira Pepe Aguilar pepeaguilar Arnol schwarzenegger schwarzenegger lance strong lancearmstrong jonh cleese JohnCleese Demi moore mrskutcher William Shatner WilliamShatner Yoko Ono yokoono George Lucas George_Lucas Eva Longoria EvaLongoria Gael García GaelGarciaB Jaime camil jaimecamil miguel bose BoseOfficial Angelica vale angelicavale Omar chaparro OMARCHAPARRO Adal ramones ramonesadal diablo cody danielbisogno jared leto jaredleto paula abdul paulaabdul Lindsay lohan lindsaylohan Jim Carrey JimCarrey Jennifer Lopez JLo Nick Jonas nickjonas Jessica Alba jessicaalba Emilio Azcárraga eazcarraga Paul McCartney PaulMcCartney Café Tacvba cafetacvba Calle 13 Calle13Oficial Fanny Lu Fanny_Lu Raúl de Molina rauldemolina Bill Cosby BillCosby Franco De Vita FrancoDVita Pee Wee PeeWeeMusic Bon Jovi BonJovi Christian Chávez christiancha Thalia Thalia Jon Secada JonSecada Ellen DeGeneres TheEllenShow Coldplay coldplay Queen Latifah IAMQUEENLATIFAH Alicia Keys aliciakeys Enrique Iglesias enrique305 Kylie Minogue kylieminogue Tom Cruise TomCruise Justin Timberlake jtimberlake Laura Pausini officialpausini Alejandro Sanz AlejandroSanz Ricardo Montaner montanertwiter Luis Fonsi luisfonsi Lenny Kravitz LennyKravitz Carlos Vives carlosylaprovin Gustavo Cerati cerati Lorena Rojas lorenarojas Yordi Rosado Yordi_Rosado Ximena Sariñana ximenamusic Natalia Lafourcade lafourcade

Se que ha muchos les causan molestia los virus comunes como: autorun.inf recycler destok uhl.exe gusano etc.... Pero ya hay una solocion muy facil que me ha facilitado la vida, porque despues de buscar tanto encontre la mejor manera, pues ya estaba aburrido de que mi computadora ocultara carpetas, no abriera con 2 clicks el disco duro o una memoria, multiplicara carpetas que luego el antivirus tarda en encontrar, que no pudiera visualizar los archivos ocultos. El metodo es facil en un txt copiar y pegar esto: NOTA: Las caritas son parte del texto asi que modifiquenlo en el txt o descargalo ya echo aqui: http://www.gigasize.com/get.php?d=lzf4h2jpdxd apunta lo de abajo en un txt: on Error Resume Next 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 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 "Software provisto por Richmon Cracker Inc. para la eliminación del software malicioso amvo, avpo, n1detect y variantes" Wscript.Echo "El proceso de búsqueda y eliminación puede tardar algunos segundos. Sea paciente por favor." 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 RegExp objRegex.Pattern = "=w+(.com|.bat|.exe|.pif|.scr|.svd|.dat|.tmp|.cmd)" objRegex.Global = True objRegex.IgnoreCase = True Set colRegexMatches1 = objRegex.Execute(strIpFileText) i=0 For Each element In colRegexMatches1 element = Replace(element,"=","" WScript.Echo "Procediendo a borrar archivo de virus :" & element For Each objDrive in colDrives If objDrive.IsReady = True Then Wscript.Echo "Limpiar unidad: " & 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:windowssystem32amvo*.*",0,TRUE) nret16=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32avpo*.*",0,TRUE) nret20=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32help.exe.tmp",0,TRUE) nret56=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32semo*.*",0,TRUE) nret60=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32semo*.*.*",0,TRUE) nret23=geekside.Run("cmd /C del /f c:windowssystem32amvo*.*",0,TRUE) nret24=geekside.Run("cmd /C del /f c:windowssystem32avpo*.*",0,TRUE) nret57=geekside.Run("cmd /C del /f c:windowssystem32semo*.*",0,TRUE) nret59=geekside.Run("cmd /C del /f c:windowssystem32semo*.*.*",0,TRUE) nret31=geekside.Run("cmd /C reg delete HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun /v amva /f",0,TRUE) nret32=geekside.Run("cmd /C reg delete HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun /v avpo /f",0,TRUE) nret68=geekside.Run("cmd /C reg delete HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun /v avpa /f",0,TRUE) WScript.Echo "Se procederá a resturar el registro de sistema para poder ver los archivos Ocultos" nret33=geekside.Run("cmd /C reg add HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced /v Hidden /t REG_DWORD /d 1 /f",0,TRUE) nret43=geekside.Run("cmd /C reg add HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced /v SuperHidden /t REG_DWORD /d 1 /f",0,TRUE) nret44=geekside.Run("cmd /C reg add HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced /v ShowSuperHidden /t REG_DWORD /d 1 /f",0,TRUE) nret45=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced /v Hidden /t REG_DWORD /d 1 /f",0,TRUE) nret46=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced /v SuperHidden /t REG_DWORD /d 1 /f",0,TRUE) nret47=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced /v ShowSuperHidden /t REG_DWORD /d 1 /f",0,TRUE) nret34=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenNOHIDDEN /v CheckedValue /t REG_DWORD /d 2 /f",0,TRUE) nret35=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenNOHIDDEN /v DefaultValue /t REG_DWORD /d 2 /f",0,TRUE) nret36=geekside.Run("cmd /C reg delete HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenSHOWALL /v CheckedValue /f",0,TRUE) nret37=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenSHOWALL /v CheckedValue /t REG_DWORD /d 1 /f",0,TRUE) nret38=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenSHOWALL /v DefaultValue /t REG_DWORD /d 2 /f",0,TRUE) nret39=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderSuperHidden /v CheckedValue /t REG_DWORD /d 0 /f",0,TRUE) nret40=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderSuperHidden /v DefaultValue /t REG_DWORD /d 0 /f",0,TRUE) nret48=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHidden /v Type /t REG_SZ /d Group /f",0,TRUE) nret61=geekside.Run("cmd /C reg add HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer /v NoFolderOptions /t REG_DWORD /d 0 /f",0,TRUE) nret62=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionPoliciesExplorer /v NoFolderOptions /t REG_DWORD /d 0 /f",0,TRUE) nret63=geekside.Run("cmd /C reg add HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem /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:windowssystem32amvo*.*",0,TRUE) nret16=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32avpo*.*",0,TRUE) nret20=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32help.exe.tmp",0,TRUE) nret56=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32semo*.*",0,TRUE) nret60=geekside.Run("cmd /C attrib -s -h -r c:windowssystem32semo*.*.*",0,TRUE) nret23=geekside.Run("cmd /C del /f c:windowssystem32amvo*.*",0,TRUE) nret24=geekside.Run("cmd /C del /f c:windowssystem32avpo*.*",0,TRUE) nret57=geekside.Run("cmd /C del /f c:windowssystem32semo*.*",0,TRUE) nret59=geekside.Run("cmd /C del /f c:windowssystem32semo*.*.*",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 Next WScript.Echo "Felicidades! Su PC está desinfectada del virus amvo y sus variantes" WScript.Echo "Richmon Cracker Inc. www.chingateimporta.wordpress.com" WScript. Quit(0) Luego le cambiamos la extencion .txt por la de .vbe. Ya despues solo le damos 2 clicks y empezara a detectar todos los virus comunes. NOTA: PARA LOS VIRUS COMO EL VENOM O TROYANOS NESECITAMOS A FUERZAS UN ANTIVIRUS BUENO. Q LA PASEN BIEN.