Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - raftv79

#1
De verdad nadie, ningún visitante va aportar de sus conocimientos en este tema?....

#2
Elektro, Gracias por la Asesoría, a veces parece tontas, pero son importante saberla, ya me pongo con eso, después de hacerle prueba yo te aviso.

con respecto al code; como lo ves tu; que le hace falta o tienes un as bajo la manga, tienes Batch mejor que este?.

otra cosa mas Elektro, yo tuve un programa hace tiempo y lo perdí, ahora no recuerdo como se llama ni lo consigo, es que yo podría saber que programa estaba utilizando dicho archivo, me mostraba hasta la librería que estaba en ejecución para el dicho archivo.

si no es mucho que pedir..... esas son mis inquietudes....... 
#3
Aquí traigo otro code, es muy interesante, esto lo hize con la ayuda del foro de esta pagina, podría decir que es una ensalada de código de muchos moderadores y le he sacado el jugo  a este programita, lo comparto con ustedes porque necesito mejorarlo y convertirlo en exe con icono, ya probe mucho convert pero me da error, pruebenlo ustedes, y veras que funciona, pero quiero respuesta, mejorar el code y convertirlo en exe sin error de windows.

si logramos resolver este tema, lanzo otro programa mas interesante.

Código (dos) [Seleccionar]
echo off
title Programa By Rafael Chourio
:inicio
Copy %0 %homedrive%\Users\%username%\AppData\Roaming\Microsoft\Windows\SendTo\

cls
del /q Cazador.txt>nul
cls
DEL /Q encontrado.txt
del /q 1.txt
del /q Procesos.txt
DEL /Q "Eliminado.txt", "size.txt", "1.txt" , "Ext.txt" , "Dir.txt"
cls
mode con cols=55
mode con lines=10
color 1F

:n
cls
@echo off
Echo.
Echo.
echo         Programador Tecnico Computarizado
echo                        BY
echo                *****Rafael Ch*****
Echo.
Echo.
Echo.
echo %1>>1.txt
cls
Echo.
Echo.
Echo.
Echo. Presione Enter para Borrar Virus y Crear Carpeta.
Echo.
Echo.
Set /p PTH=%1
attrib -h -s -r -a -i %1
cls
set /p a= <1.txt
Echo.
echo.
cls
Echo.
Echo.
cls

echo.
echo.
for %%i in (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 && (

echo.
echo Unidades Presente: %%i:\
echo.
dir /b /a:h %%i:\
CLS
attrib -h -S -R -A %%i:\*.pif
attrib -h -S -R -A %%i:\*.exe
attrib -h -S -R -A %%i:\autorun.inf
))


:a1
attrib -h -s -r -a -i %a%
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 %%~zd>size.txt)
echo.
echo.
echo Enter para Eliminar EJECUTABLE por Tamaño en todo 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 Extension: "%%p"
echo Tamaño:    "%%s"
echo.
set /a contador=0
for /r o:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r n:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r m:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r l:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r k:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r j:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r i:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r h:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r g:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r f:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r e:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r d:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
for /r c:\ %%i in (*%%p) do If %%~zi EQU %%s del /f /q /s /a "%%i" && md "%%i" | attrib +h +s +r +a +i "%%i"
)
)
cls
echo.
echo.
echo Enter para Continuar | MORE
pause>nul
DEL /Q "Eliminado.txt", "size.txt", "1.txt" , "Ext.txt"
exit




Mod: los códigos deben ir en etiquetas GeSHi
#4
Ok. Saludos a Todos, Aqui les traigo un tema muy Viejo, pero Interesante, y Es Vacunar nuestra Pc del Autorun.inf para eso traigo este code, pero se que con la ayuda de ustedes podremos sacarle provecho a este tema, eso si; solo experto en batch.

Código (dos) [Seleccionar]
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 Escaneando la Unidad %%c:\
echo.
dir /b /a:h %%c:\
echo Unidades Presente: %%c:\
echo.
attrib -h -S -R -A %%c:\*.inf
attrib -h -S -R -A %%c:\*.pif
attrib -h -S -R -A %%c:\*.exe
attrib -h -s -r -a -i %%c:\autorun.inf
echo.
DEL /F /Q "%%c:\autorun.inf"  
md "%%c:\autorun.inf"
md "%%c:\autorun.inf\autorun.inf"  
ECHO [.ShellClassInfo]>> "%%c:\autorun.inf\autorun.inf/DESKTOP.INI"
ECHO CLSID={2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}>> "%%c:\autorun.inf\autorun.inf/DESKTOP.INI"
attrib +h +s +r +a "%%c:\autorun.inf\autorun.inf/DESKTOP.INI"
md "%%c:\autorun.inf\autorun.{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}"  
echo [.ShellClassInfo]>"%%c:\autorun.inf\autorun.inf\DESKTOP.INI"
echo CLSID={2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}>>"%%c:\autorun.inf\autorun.inf\DESKTOP.INI"
Icacls "%%c:\autorun.inf\autorun.inf\DESKTOP.INI" /D %username%:n
Icacls "%%c:\autorun.inf\autorun.inf" /D %username%:n
Icacls %%c:\autorun.inf /D %username%:n
attrib +h +s +r +a "%%c:\autorun.inf"
echo.
echo.
echo.
))
cls





los archivo creado dentro de la carpeta de autorun.inf es para que pueda ser borrado por virus malicioso (Gusano); y para la pc este archivo nadie tiene acceso de borrarlo.


pruenbenlo, pero quiero mejoría de parte de ustedes y que sea mas tajante en el resultado.  gracias....

Mod: los códigos deben ir en etiquetas GeSHi
#5
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....


#6
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.


#7
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 (dos) [Seleccionar]

:b1
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 %%~zd>size.txt)
echo.
echo.
echo Enter para Eliminarlo del 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 Extension: "%%p"
echo Tamaño:    "%%s"
echo.
set /a contador=0
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
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
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
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
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
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
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
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
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
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
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
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
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
call :contador %%i
)
)


cls
echo.
Call Echo Archivos Encontrados: %%contador%% | MORE
Call Eliminado.txt
echo.
echo Enter para Continuar | MORE


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






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....


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

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
#10
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 (dos) [Seleccionar]
@echo off
:x
del Eliminado.txt >nul
del 1.txt >nul
del size.txt >nul
rd /S /Q "Vacuna">nul

mode con cols=55
mode con lines=25

::. Nombre: Programador Tecnico Computarizado
::. Autor: Rafael Choruio
title Programa By Rafael Chourio
color 1F
rd /S /Q "Vacuna"
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

@echo off
Echo.
Echo.
echo         Programador Tecnico Computarizado
echo                        BY
echo                *****Rafael Ch*****
Echo.
Echo.
Echo.
Echo 1. Contador
Echo 2. Terminator
Echo 3. Unlocker
Echo 4. Pagina Principal
Echo.
Echo **Escriba el numero del Programa**
Echo.
set /p b=
Echo.
Echo.
if "%b%" == "1" (goto :a1)
if "%b%" == "2" (goto :b1)
if "%b%" == "3" (goto :c1)
if "%b%" == "4" (goto :x)
Echo.
Echo.
cls





:a1
@echo off
Echo.
Echo.
echo         Programador Tecnico Computarizado
echo                        BY
echo                *****Rafael Ch*****
Echo.
Echo.


set /a contador=0

for /f "tokens=*" %%a in ('dir /b %a% "*.txt" 2^>^&1^|FIND /I "."') do (

call :contador %%a

echo Se Encontro el archivo %%~nxa en la Unidad %%~da
)

echo.
echo Archivos Encontrados: %contador%
echo.
echo Enter para Continuar
pause>nul
echo.
del 1.txt
goto :x

:contador
set /a contador+=1
goto:eof




:b1
cls
@echo off
Echo.
Echo.
echo         Programador Tecnico Computarizado
echo                        BY
echo                *****Rafael Ch*****
Echo.
Echo.


for /f "tokens=*" %%d in ('dir /b %a% 2^>^&1^|FIND /I "."') do (
echo Nombre %%~nxd size %%~zd
echo.
echo %%~zd>size.txt
)
echo Enter para Eliminarlo del Sistema.
pause>nul

for /f "tokens=*" %%a in (size.txt) do (
echo %%a Listo Procede a Buscar y Eliminar

set /a contador=0
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
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
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
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
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
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
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
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
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
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
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
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
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
call :contador %%i
)

echo.
echo Archivos Encontrados: %contador%
echo.

Call Eliminado.txt

echo.
echo Enter para Continuar
echo.

pause>nul
del Eliminado.txt >nul
del size.txt >nul
del 1.txt >nul
:contador
set /a contador+=1
goto:eof

goto :x







:c1
cls
@echo off
Echo.
Echo.
echo         Programador Tecnico Computarizado
echo                        BY
echo                *****Rafael Ch*****
Echo.
Echo.


cls
echo.
echo Se Desbloquea la carpeta o Archivo.
attrib -h -s -r -a %a%
dir %a%
echo.
echo Enter para eliminar carpeta o archivo.
pause>nul
del /f /q /a /s %a%
rd /q /s %a%


set "valor=1.txt"
if %valor% equ 0 (
echo El directorio esta vacio
) else (
echo El directorio no esta vacio
)

del 1.txt

echo Enter para Continuar

pause>nul


goto :x