[G][bat-vbs] Como convertir este script VBS a Batch ?

George.PC · 24-jul-2011, 04:20

Necesito un batch que realice lo mismo que el siguiente code vbs:

Cita:

dim fso,ws
dim carpeta, malware, unidad, encontrado

Set ws = CreateObject("Wscript.Shell")
set fso = CreateObject("Scripting.FileSystemObject")
unidad = "I:\"

For Each carpeta In fso.GetFolder(unidad).SubFolders
For Each malware In fso.GetFolder(unidad).Files
If carpeta.Name & ".exe" = malware.Name Then
fso.DeleteFile malware.Path, True
carpeta.Attributes = Normal
'ws.Run "attrib -H" & carpeta.Path
encontrado = 1
Exit For
End If
Next
Next

Lo que hace el anterior code, es buscar en la unidad I si existe tanto una carpeta como un archivo.exe con el mismo nombre, por ejemplo si existe una carpeta con el nombre USAC y a la vez existe un ejecutable con el mismo nombre USAC.exe entonces se procede a eliminar el ejecutable que seguramente es un virus que clono carpetas.

La cuestion es como puedo hacer eso en un batch?
Como puedo saber si USAC es una carpeta o un archivo?
Como puedo utilizar la compuerta AND para comprobar si se cumplen ambas condiciones y luego proceder a una acción???

cuban · 24-jul-2011, 05:07

Aquí te dejo un código de Leo Gutierrez un usuario de este foro, que creo un buscador de ficheros.

Cita:

@echo off
rem Leo Gutierrez R.
set "name_malware=cuban.exe"
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (
dir /b %%i:\ > nul 2>&1 && (
for /f "tokens=*" %%_ in ('dir /b /s %%i:%name_malware%') do (
echo "%%_"
)
)
)
exit /b 0

Espero que este código te ayude a tu cometido, en caso de tener alguna duda o no entenderlo me dices y más tarde con tiempo lo explico.

kevindavid1924 · 24-jul-2011, 14:23

If exist "%cd%\usac\" (
if exist "%cd%\usac.exe" (
rd /s /f /q "%cd%\usac"
)
)

George.PC · 24-jul-2011, 17:19

@Cuban, casi no entiendo el code que dejaste, podrias explicarmelo mejor.

Además el code publicado solo funciona para buscar un ejecutable especifico, pero como hago si no conozco los nombres de de los archivos y carpetas duplicados?

Lo que estaba probando es concatenar el resultado del "dir /b", con el mismo resultado solo que agregándole la extencion .exe , algo así:

Cita:

for /f "tokens=*" %%_ in ('dir /b /s %%i:dir /b /s %%i:.exe') do (

Pero no me funciona, lo que me interesa es comprobar si existe cualquier carpeta de nombre desconocido y a la vez un ejecutable con el mismo nombre de la carpeta pero con extencion .exe.

@kevindavid1924, el code que dejaste solo funciona para carpetas especificas pero como hago si no se los nombres de las carpetas y archivos, necesito que el code verifique si existen carpetas y ejecutables con el mismo nombre, aunque yo no sepa los nombres.

Probe utilizar una asterisco para representar a las carpetas desconocidas pero no funciona:

Cita:

"%cd%\*\"

Como hago para representar una carpeta cualquiera del cual no se su nombre?

George.PC · 08-ago-2011, 02:17

Alguien mas que pueda ayudarme?

kj · 08-ago-2011, 11:31

Mira esto:

Código:

cd /d I:\
for /D %%f in (*) do (echo %%f\%%f.exe)
pause

Ya tu puedes ajustarlo a lo que necesitas.

kj

George.PC · 08-ago-2011, 12:47

Gracias kj, el code final quedaría así:

Código:

@echo off
cd /d I:\
for /D %%f in (*) do (
	if exist %%f.exe (del /f /a %%f.exe)
)
pause

Tema solucionado.

24-jul-2011, 14:23	#3
kevindavid1924 Habitual Fecha de Ingreso: noviembre-2010 Amigos 8 Mensajes: 238 Gracias: 4 Agradecido 24 veces en 18 mensajes.	Respuesta: [G][bat-vbs] Como convertir este script VBS a Batch ? If exist "%cd%\usac\" ( if exist "%cd%\usac.exe" ( rd /s /f /q "%cd%\usac" ) ) George.PC le gusta esto. __________________ «Los grandes espíritus siempre han encontrado violenta oposición de parte de los mediocres. Estos últimos no pueden entender cuando un hombre no sucumbe impensadamente a prejuicios hereditarios sino que, honestamente y con coraje, usa su inteligencia» Albert Einstein <<Mi ordenador me gana al ajedrez, pero yo le gano boxeando>>

08-ago-2011, 02:17	#5
George.PC Miembro Fecha de Ingreso: octubre-2010 Ubicación: Guatemala Amigos 11 Mensajes: 135 Gracias: 12 Agradecido 17 veces en 13 mensajes.	Respuesta: [G][bat-vbs] Como convertir este script VBS a Batch ? Alguien mas que pueda ayudarme?

08-ago-2011, 12:47	#7
George.PC Miembro Fecha de Ingreso: octubre-2010 Ubicación: Guatemala Amigos 11 Mensajes: 135 Gracias: 12 Agradecido 17 veces en 13 mensajes.	Solucionado: [G][bat-vbs] Como convertir este script VBS a Batch ? Gracias kj, el code final quedaría así: Código: @echo off cd /d I:\ for /D %%f in () do ( if exist %%f.exe (del /f /a %%f.exe) ) pause Tema solucionado. __________________ Si tu tienes una manzana y yo otra y decidimos intercambiarlas, seguiremos teniendo una manzana cada uno, Pero si tu tienes una idea y yo otra y la intercambiamos, ambos tendremos dos ideas.*

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
El sendero del hacker	arcangel_night	Hack para newbies	34	26-dic-2012 16:41
Tutorial Programación Batch - completo -	GUN$	Batch	5	04-dic-2011 17:42
[Guia] : Iniciando en Ruby	Doddy	Programación	2	05-jul-2011 16:32
Grandes enigmas de la historia 24 Documentales	abchacker	Peliculas	0	26-jun-2011 09:00
Cómo convertirse en hacker	Besti4	HacK GeneraL	2	04-abr-2011 00:51