eliminar virus de usb que crea accesos directos

[**Aincrad**]

 hola a todos hice un vbs que elimina el virus de acceso directo
que se mete en el pendrive. por favor comenten eso me motiva a
hacer mas script.

 bueno aqui el code:

Código (actionscript-french) [Seleccionar] Expandir


'PARA FORO EL HACKER.
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder _
   (WINDOW_HANDLE, "Selecciona una carpeta:", NO_OPTIONS)  
Set objFolderItem = objFolder.Self
strPath = objFolderItem.Path
Set objfso = createobject("scripting.filesystemobject") 'credo por S4L.
Set archivotexto = objfso.createtextfile("desinf.bat",true)
archivotexto.writeline "@echo off"
archivotexto.writeline "title Desinfectando USB (BY S4L)"
archivotexto.writeline "MODE CON: COLS=50 LINES=5"
archivotexto.writeline "color a"
archivotexto.writeline "echo/"
archivotexto.writeline "echo [ÛÛÛ                           ] 13 °/."
archivotexto.writeline "ping localhost -n 1 >nul"
archivotexto.writeline "cd /D "" " & strPath & """"
archivotexto.writeline "Attrib /d /s -r -h -s *.*"
archivotexto.writeline "Attrib /d /s -r -h -s Drive\*.*"
archivotexto.writeline "cls"
archivotexto.writeline "echo/"
archivotexto.writeline "echo [ÛÛÛÛÛÛÛÛÛ                     ] 25 °/."
archivotexto.writeline "ping localhost -n 2 >nul"
archivotexto.writeline "del /f /q *.bat"
archivotexto.writeline "cls"
archivotexto.writeline "echo/"
archivotexto.writeline "echo [ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ               ] 47 °/."
archivotexto.writeline "ping localhost -n 2 >nul"
archivotexto.writeline "del /f /q *.wsf"
archivotexto.writeline "del /f /q Drive\*.wsf"
archivotexto.writeline "if exist *.lnk del *.lnk"
archivotexto.writeline "cls"
archivotexto.writeline "echo/"
archivotexto.writeline "echo [ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ     ] 70 °/."
archivotexto.writeline "ping localhost -n 2 >nul"
archivotexto.writeline "del /f /q *.ws"
archivotexto.writeline "cls"
archivotexto.writeline "echo/"
archivotexto.writeline "echo [ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ  ] 89 °/."
archivotexto.writeline "ping localhost -n 2 >nul"
archivotexto.writeline "del /f /q *.js"
archivotexto.writeline "cls"
archivotexto.writeline "echo/"
archivotexto.writeline "echo [ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ] 100 °/."
archivotexto.writeline "attrib -a -s -h -r /s /d"
archivotexto.writeline "attrib +s +h autorun.inf"
archivotexto.writeline "ping localhost -n 2 >nul"
archivotexto.writeline "explorer.exe "& strPath & """"
archivotexto.writeline "exit"
archivotexto.close
set WshShell=WScript.CreateObject("WScript.Shell")
WShShell.run "desinf.bat"
'FISICA 638


************************* Porfavor comenten.

[osman33]

excelente  quiero participar

[fary]

¿Y porque no crear directamente el .bat? 


saludos.

[**Aincrad**]

¿Y porque no crear directamente el .bat? 

es por que con el vbs se puede seleccionar el pendrive de una manera
mas facil para otras personas.

en cambio en el bat se tiene que poner la letra de la unidad.

****en pocas palabras hay personas de cierta edad que no saben manipular
           muy bien una computadora en cambio con este vbs se selecsiona el usb
            y listo , esto lo hace mas facil para estas personas.

**** en cambio en el bat tienen que escribir la letra da la unidad y hay
       persona que apenas saben usar la pc y se enredan.


--------------------------------por esto lo hice en vbs.   

[Shell Root]

@fisica 638, es totalmente falso BATCH es un "lenguaje" limitado pero cumple con esas funciones...  MIRA