elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Únete al Grupo Steam elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.  (Leído 5,545 veces)
raftv79

Desconectado Desconectado

Mensajes: 17


Ver Perfil
[BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« en: 24 Agosto 2012, 16:58 pm »

NO SOY UN PROFESIONAL, NI MUCHO MENOS APARENTO SERLO, PERO LO QUE SE LO HE APRENDIDO DE USTEDES LOS EXPERTO, LOS CODE QUE PRESENTO SON DE WWW.ELHACKER.NET. SOLO QUE ALGUNOS LOS HE MODIFICADO PARA MIS NECESEDADES Y QUIERO COMPARTIRLO CON USTEDES Y A LA MISMAS VEZ QUIERO SU AYUDA, EN ESPECIAL A LOS MODERADORES DE ESTA sección...


AL ARRASTRAR UN ARCHIVO O CARPETA  A LA VENTANA DEL PROGRAMA EN BAT, PRESENTA TRES OPCIONES, LA IDEA ES PERFECCIONAR MAS, SE QUE TIENE ERRORES Y ORRORES PERO COMO DICEN AQUI EN MI TIERRA, HASTA AQUI ME TRAJO EL RIO.  PUEDEN MODIFICAR EL CODE:

HAY UN PROBLEMA QUE LA CARPETA O ARCHIVO TIENE QUE ESTAR EN EL MISMO SITIO DONDE SE EJECUTE EL PROGRAMA Y ME GUSTARIA QUE YO EJECUTARIA EL PROGRAMA EN CUALQUIER PARTE Y AL ARRASTRAR EL ARCHIVO AL PROGRAMA HAGA SU FUNCIONES...... BUENO PRUEBENLO Y SE DARAN CUENTA



CODE:


Código
  1. @echo off
  2. :x
  3. del Eliminado.txt >nul
  4. del 1.txt >nul
  5. del size.txt >nul
  6. rd /S /Q "Vacuna">nul
  7.  
  8. mode con cols=55
  9. mode con lines=25
  10.  
  11. ::. Nombre: Programador Tecnico Computarizado
  12. ::. Autor: Rafael Choruio
  13. title Programa By Rafael Chourio
  14. color 1F
  15. rd /S /Q "Vacuna"
  16. cls
  17. @echo off
  18. echo             Programador Tecnico Computarizado
  19. echo                            BY
  20. echo                    *****Rafael Ch*****
  21. Echo.Arrastre a esta ventana el Intruso, presione Enter.
  22. Set /p PTH=
  23.  
  24. cls
  25. echo %PTH% >1.txt
  26. set /p a= <1.txt
  27. cls
  28.  
  29. @echo off
  30. echo         Programador Tecnico Computarizado
  31. echo                        BY
  32. echo                *****Rafael Ch*****
  33. Echo 1. Contador
  34. Echo 2. Terminator
  35. Echo 3. Unlocker
  36. Echo 4. Pagina Principal
  37. Echo **Escriba el numero del Programa**
  38. set /p b=
  39. if "%b%" == "1" (goto :a1)
  40. if "%b%" == "2" (goto :b1)
  41. if "%b%" == "3" (goto :c1)
  42. if "%b%" == "4" (goto :x)
  43. cls
  44.  
  45.  
  46.  
  47.  
  48.  
  49. :a1
  50. @echo off
  51. echo         Programador Tecnico Computarizado
  52. echo                        BY
  53. echo                *****Rafael Ch*****
  54.  
  55.  
  56. set /a contador=0
  57.  
  58. for /f "tokens=*" %%a in ('dir /b %a% "*.txt" 2^>^&1^|FIND /I "."') do (
  59.  
  60. call :contador %%a
  61.  
  62. echo Se Encontro el archivo %%~nxa en la Unidad %%~da
  63. )
  64.  
  65. echo Archivos Encontrados: %contador%
  66. echo Enter para Continuar
  67. pause>nul
  68. del 1.txt
  69. goto :x
  70.  
  71. :contador
  72. set /a contador+=1
  73. goto:eof
  74.  
  75.  
  76.  
  77.  
  78. :b1
  79. cls
  80. @echo off
  81. echo         Programador Tecnico Computarizado
  82. echo                        BY
  83. echo                *****Rafael Ch*****
  84.  
  85.  
  86. for /f "tokens=*" %%d in ('dir /b %a% 2^>^&1^|FIND /I "."') do (
  87. echo Nombre %%~nxd size %%~zd
  88. echo %%~zd>size.txt
  89. )
  90. echo Enter para Eliminarlo del Sistema.
  91. pause>nul
  92.  
  93. for /f "tokens=*" %%a in (size.txt) do (
  94. echo %%a Listo Procede a Buscar y Eliminar
  95.  
  96. set /a contador=0
  97. for /r o:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  98. for /r n:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  99. for /r m:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  100. for /r l:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  101. for /r k:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  102. for /r j:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  103. for /r i:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  104. for /r h:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  105. for /r g:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  106. for /r f:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  107. for /r e:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  108. for /r d:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  109. for /r c:\ %%i in (*.exe) do If %%~zi EQU %%a del /f /q /s /a "%%i" /F && echo.Se encontro y elimino : %%i >> Eliminado.txt
  110. call :contador %%i
  111. )
  112.  
  113. echo Archivos Encontrados: %contador%
  114.  
  115. Call Eliminado.txt
  116.  
  117. echo Enter para Continuar
  118.  
  119. pause>nul
  120. del Eliminado.txt >nul
  121. del size.txt >nul
  122. del 1.txt >nul
  123. :contador
  124. set /a contador+=1
  125. goto:eof
  126.  
  127. goto :x
  128.  
  129.  
  130.  
  131.  
  132.  
  133.  
  134.  
  135. :c1
  136. cls
  137. @echo off
  138. echo         Programador Tecnico Computarizado
  139. echo                        BY
  140. echo                *****Rafael Ch*****
  141.  
  142.  
  143. cls
  144. echo Se Desbloquea la carpeta o Archivo.
  145. attrib -h -s -r -a %a%
  146. dir %a%
  147. echo Enter para eliminar carpeta o archivo.
  148. pause>nul
  149. del /f /q /a /s %a%
  150. rd /q /s %a%
  151.  
  152.  
  153. set "valor=1.txt"
  154. if %valor% equ 0 (
  155. echo El directorio esta vacio
  156. ) else (
  157. echo El directorio no esta vacio
  158. )
  159.  
  160. del 1.txt
  161.  
  162. echo Enter para Continuar
  163.  
  164. pause>nul
  165.  
  166.  
  167. goto :x
  168.  


« Última modificación: 24 Agosto 2012, 20:00 pm por EleKtro H@cker » En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.788



Ver Perfil
Re: PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #1 en: 24 Agosto 2012, 19:02 pm »

HAY UN PROBLEMA QUE LA CARPETA O ARCHIVO TIENE QUE ESTAR EN EL MISMO SITIO DONDE SE EJECUTE EL PROGRAMA
No he tenido ese problema al usar tu code. Me he mirado el code por encima y no parece que haya errores a simple vista.

Da un ejemplo para poder recrear el error que dices (Nombre del archivo y directorio en el que está cada archivo + La opción del bat que te da error con ese archivo)

Saludos


En línea

raftv79

Desconectado Desconectado

Mensajes: 17


Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #2 en: 24 Agosto 2012, 21:22 pm »


con este link aloje un archivo doc donde esta la explicacion del error que yo considero.... gracias de antemano...


https://skydrive.live.com/redir?resid=DE64C7681976909!268
En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.788



Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #3 en: 24 Agosto 2012, 23:34 pm »

Pues para empezar usa correctamente la sintaxis para evitar errores futuros:
Código
  1. For /R c:\ %%i in (*.exe) do (If %%~zi EQU %%a (acciones))

Luego, El comando no elimina archivos porque estás repitiendo el parámetro "/F" en el comando Del.
Citar
del /f /q /s /a "%%i" /F &&...
PD: Y el parámetro "/s" es innecesario ya que con DIR haces la recursividad para encontrar el resto de archivos.

Aparte, La opción Terminator es muy peligrosa y debes modificarla, Porque elimina archivos por su tamaño...
Esto quiere decir que si arrastras un archivo "test.exe" de "236 kb" a la CMD, La opción "terminator" eliminará cualquier archivo .exe que pese 236 kb, Por lo tanto, No me parece nada útil, Y es muy peligroso porque acabaría eliminando archivos que no debería.

Código
  1. call :contador %%i
Ese comando no tiene sentido, Pues estás llamando a :Contador con un argumento que no piensas utilizar para nada.

El contador no aumenta, Porque solo le llamas una vez, No lo estás usando dentro de cada Búsqueda...

En resumen:
Código
  1. :b1
  2. CLS
  3. Echo.                                         | MORE
  4. echo         Programador Tecnico Computarizado
  5. echo                        BY
  6. echo                *****Rafael Ch*****       |MORE |MORE
  7. set /A "contador=0"
  8. for /f "tokens=*" %%d in ('dir /b %a% 2^>^&1^|FIND /I "."') do (echo Nombre %%~nxd size %%~zd | MORE & echo %%~zd>size.txt)
  9. echo Enter para Eliminarlo del Sistema.
  10. pause>nul
  11.  
  12. for /F "tokens=*" %%a in (size.txt) do (
  13. echo %%a Listo Procede a Buscar y Eliminar
  14. For %%# in (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 (
  15. FOR /R %%#\ %%i in (*.exe) do (If %%~zi EQU %%a (DEL /f /q /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt & Call Set /A contador+=1))
  16. )
  17. )
  18.  
  19. Call Echo Archivos Encontrados: %%contador%% | MORE
  20. Call Eliminado.txt
  21. echo Enter para Continuar | MORE
  22. pause>nul
  23. DEL /Q "Eliminado.txt", "size.txt", "1.txt"
  24. goto :X

Saludos.
« Última modificación: 24 Agosto 2012, 23:40 pm por EleKtro H@cker » En línea

raftv79

Desconectado Desconectado

Mensajes: 17


Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #4 en: 30 Agosto 2012, 18:22 pm »

Buenas Tardes, He pasado la semana probando Tu Code de Diferente forma y no me funciona. ya no se que hacer......
En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.788



Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #5 en: 31 Agosto 2012, 05:06 am »

Buenas Tardes, He pasado la semana probando Tu Code de Diferente forma y no me funciona. ya no se que hacer......

Hola,

Debes reemplazar en tu code original, desde la etiqueta ":b1" hasta el comando "goto :X" con el trozo de código que te copié.

Si lo has hecho y sigue sin funcionarte, entonces postea aquí el código tal y como lo tienes ahora mismo para que pueda examinarlo y ayudarte.

Un saludo
En línea

raftv79

Desconectado Desconectado

Mensajes: 17


Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #6 en: 31 Agosto 2012, 17:36 pm »

saludo.
claro que entendi la parte que hiciste........y agradezco tu ayuda......y gracias a ustedes, me motiva a crear y a trabajar mi cabecita....jajajajaja.




ya me dio resultado con la ayuda de EleKtro H@cker (Moderador).

con tu code y el mio, y un retoque que hice, pude afinarlo, y funciona como yo quiero, aunque se que le quite el ultimo for (For %%# in (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 (
      FOR /R %%#\ %%i in (*%%p) do (If %%~zi EQU %%s DEL /f /q /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt & Call Set /A contador+=1) porque se salia de cmd al llegar aqui. por esa razon tuve que utilizar el que estaba anterior.


Código
  1. :b1
  2. CLS
  3. Echo.                                         | MORE
  4. echo         Programador Tecnico Computarizado
  5. echo                        BY
  6. echo                *****Rafael Ch*****       |MORE |MORE
  7. set /A "contador=0"
  8. for /f "tokens=*" %%d in ('dir /b /s %a% 2^>^&1^|FIND /I "."') do (echo %%~xd>Ext.txt | MORE & echo %%~zd>size.txt)
  9. echo Enter para Eliminarlo del Sistema.
  10. pause>nul
  11. cls
  12. for /F "tokens=*" %%s in (size.txt) do (
  13. echo %%s
  14. for /F "tokens=*" %%p in (Ext.txt) do (
  15. echo %%p
  16. cls
  17. echo Espere Por Favor......
  18. echo Extension: "%%p"
  19. echo Tamaño:    "%%s"
  20. set /a contador=0
  21. for /r o:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  22. for /r n:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  23. for /r m:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  24. for /r l:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  25. for /r k:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  26. for /r j:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  27. for /r i:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  28. for /r h:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  29. for /r g:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  30. for /r f:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  31. for /r e:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  32. for /r d:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  33. for /r c:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && echo.Se encontro y elimino : %%i >> Eliminado.txt
  34. call :contador %%i
  35. )
  36. )
  37.  
  38.  
  39. cls
  40. Call Echo Archivos Encontrados: %%contador%% | MORE
  41. Call Eliminado.txt
  42. echo Enter para Continuar | MORE
  43.  
  44.  
  45. pause>nul
  46. DEL /Q "Eliminado.txt", "size.txt", "1.txt" , "Ext.txt"
  47. goto :X
  48.  





te hago 3 peticiones:

1.- tratarias de mejorar tu for
2.- que funcione el contador
3.- encriptarlo (se para que es pero solo hasta ahi) nunca e hecho eso.

 gracias....


« Última modificación: 31 Agosto 2012, 20:20 pm por EleKtro H@cker » En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.788



Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #7 en: 31 Agosto 2012, 21:01 pm »

te hago 3 peticiones:
1.- tratarias de mejorar tu for
2.- que funcione el contador
3.- encriptarlo (se para que es pero solo hasta ahi) nunca e hecho eso.

Contesto a tus peticiones:

1. La mejora es el script que hice, Hasta donde yo lo probé funciona, de todas formas si los retoques que le has hecho al FOR te funciona tal y como lo tienes ahora ¿Entonces que necesitas mejorar del FOR?

2. El fallo de tu contador ya te lo expliqué en mi comentario. En el script que hice tienes un ejemplo muy claro de como puedes usarlo. (De todas formas cuando tenga más tiempo lo aplicaré en tu code...)

3. ¿Quieres encriptarlo para proteger el archivo y que no se pueda leer ni ejecutar?
   ¿O quieres cifrar el bat de manera que al ejecutar ese bat se "auto-desencripte" y se ejecuten todos los comandos?
   Si buscas lo primero, Esto mismo te sirve: http://foro.elhacker.net/empty-t357078.0.html
   Si buscas lo segundo, No te voy a hacer el trabajo, Pero te puedo decir como puedes hacerlo.

Saludos


Saludos.
En línea

raftv79

Desconectado Desconectado

Mensajes: 17


Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #8 en: 1 Septiembre 2012, 16:42 pm »

ok, esta bien.

te agradezco lo del contador, y lo de cifrar es la segunda opcion, que se pueda ejecutar. es algo que quiero aprender.


En línea

raftv79

Desconectado Desconectado

Mensajes: 17


Ver Perfil
Re: [BATCH] PROGRAMA QUE BUSCA ARCHIVO POR SU "SIZE" Y LO ELIMINA.
« Respuesta #9 en: 3 Septiembre 2012, 15:34 pm »

buenos dias.  amigo EleKtro H@cker, ya solucione con respecto al contador. hice prueba con tu code y ya me funciono, gracias......

voy a compartirlo......


echo off
:X

DEL /Q "encontrado.txt" , "Eliminado.txt", "size.txt", "1.txt" , "Ext.txt" , "go.txt"

mode con cols=55
mode con lines=25

::. Nombre: Programador Tecnico Computarizado
::. Autor: Rafael Choruio
title Programa By Rafael Chourio
color 1F
cls
@echo off
Echo.
Echo.
echo             Programador Tecnico Computarizado
echo                            BY
echo                    *****Rafael Ch*****
Echo.
Echo.
Echo.
Echo.
Echo.
Echo.
Echo.Arrastre a esta ventana el Intruso, presione Enter.
echo.
Set /p PTH=

cls
echo %PTH% >1.txt
set /p a= <1.txt
cls



:a1
CLS
Echo.                                         | MORE
echo         Programador Tecnico Computarizado
echo                        BY
echo                *****Rafael Ch*****       |MORE |MORE


set /A "contador=0"
for /f "tokens=*" %%d in ('dir /b /s %a% 2^>^&1^|FIND /I "."') do (echo %%~xd>Ext.txt | MORE & echo %%~nxd>size.txt)
echo.
echo.
echo Enter para buscar y contar en el Sistema.
echo.
pause>nul
echo.
cls
echo.
for /F "tokens=*" %%s in (size.txt) do (
echo %%s
for /F "tokens=*" %%p in (Ext.txt) do (
echo %%p
cls
echo.
echo Espere Por Favor......
echo.
echo Nombre:    "%%s"
echo Extension: "%%p"
echo.
echo El Contador de Archivo By Rafael Chourio>> encontrado.txt
echo.>> encontrado.txt
for %%c in (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 %%c:\ > nul 2>&1 && (
echo.
echo Unidades Presente: %%c:\
echo.
for /f "tokens=*" %%i in ('dir /b /s "%%c:\%%s" 2^>^&1^|FIND /I "."') do (echo %%i && echo.Se encontro: %%i >> encontrado.txt & Call Set /A contador+=1)


))
))
echo.
echo.
echo Enter para Mostar Log
pause>nul




cls
echo.
echo.>> encontrado.txt
echo ----------------------------------------->> encontrado.txt
Call Echo Archivos Encontrados: %%contador%% >> encontrado.txt| MORE
Call encontrado.txt
echo.
echo Enter para ir al inicio | MORE


pause>nul
DEL /Q "encontrado.txt", "size.txt", "1.txt" , "Ext.txt"
goto :X






mil gracias.....




solo me falta la ultima peticion. cifrar el code....

att rafael chourio....


« Última modificación: 3 Septiembre 2012, 15:41 pm por raftv79 » En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines