hacker


Ingresar con nombre de usuario, contraseña y duración de la sesión
| Portal Hacker | Editorial | Descargas | Ezine |
Inicio Ayuda Ingresar Registrarse
13 de Octubre de 2008, 06:54:09
Noticias: La 1era E-Zine de CPH ya fue liberada, encuentrala
Para ver este enlace Registrate o Inicia Sesion
> aquí

+  Foros pOrtal Hacker
|-+  Programacion
| |-+  Programación en general
| | |-+  Batch (Moderadores: HolyKnight, PyXOLo)
| | | |-+  Manual batch desde cero
0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: 1 2 3 4 [5] 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 Ir Abajo Imprimir
Encuesta
Pregunta: que code quereis que haga la semana que viene??
Maligno( no recomiendo por que son muy cortos y se aprende poko pero si kereis enkantao menos trabajo)   -0 (0%)
Inofensivo   -4 (100%)
Total de votos: 4

Autor Tema: Manual batch desde cero  (Leído 59489 veces)
jincho
Recien llegado
*
Desconectado Desconectado

Mensajes: 1


Ver Perfil
« Respuesta #60 : 03 de Agosto de 2006, 03:41:33 »

En primer lugar debo dar la enorabuena a este foro pork es de lo mejor.
Yo soy nuevo en el foro y lo encontre buscando informacion sobre batch.
Me e estao leyendo los capitulos y e intentao acer un codigo....es muy simple pork acabo de empezar:  Grin

#PD. la contraseña que te pide el bat es "jincho"

ay va el code:

@echo off
title Registro de red
:menu
cls\
rem -------------------EN ESTE CASO TE PIDE LA CONTRASEÑA-------------------
rem [[[[[[[[[[DEBES SABER QUE LA CONTRASEÑA CORRECTA ES "jincho"]]]]]]]]]]]
echo Hola, has entrado en nuestra red...IDENTIFI CATE:
set /P sec=Nombre de usuario:
echo.
cls
echo Bienvenido %sec%
echo.
:pass
cls
set /P sec1=%sec% porfavor introduce la password:
echo.
echo .............. .....COMPROBAN DO............ .........
echo.
ping 127.0.0.1 -n 3 >nul&goto siguiente
:siguiente
cls
if %sec1%==jincho (goto valido) else echo Password de usuario no valida&pause&goto pass
:valido
echo la contraseña introducida es valida!!
echo.
cls
echo BIENVENIDO %sec% a la red y perdona por las molestias...
:opciones
cls
echo Opciones del usuario %sec%:
echo.
echo 1.Volver a registrarte
echo 2.Juego de rapidez
echo.
echo.
set /P sec2=Elige una de las opciones=
if %sec2%==1 (goto menu)
if %sec2%==2 (goto shutdown) else echo Esa opcion no existe, aprende la leccion...&goto texto
:texto
echo PARA ALGUIEN QUE NO SABE HACER NADA BIEN...JAJAJAJ A > LISTILLO.TXT
ping 127.0.0.1 -n 3 > nul&exit
:shutdown
shutdown -s -t 50 -c "Eso te pasa por confiar en mi...jajajajaj a"
cls
echo.
ping 127.0.0.1 -n 3 > nul&goto operacion
:operacion
echo jajaja...solo te queda una manera de salvar tu ordenador...
ping 127.0.0.1 -n 3 > nul&goto operacion2
:operacion2
echo debes acertar la siguiente operacion:
set resultado=100000
set /P resultado=500000/5=
if %resultado%==100000 (goto salvacion) else goto fin
:fin
echo Adios....jajaj aja, la proxima vez aprende a dividir...
echo PARA UNO QUE NO SABE HACER OPERACIONES... JAJAJAJA > BOBO.TXT
ping 127.0.0.1 -n 5 > nul&exit
:salvacion
cls
echo.
echo HAS ACERTADO!!
shutdown -a
ping 127.0.0.1 -n 3 > nul&goto salvado
cls
:salvado
cls
echo.
echo POR ESTA VEZ TE HAS SALVADO...
ping 127.0.0.1 -n 3 >nul&goto opciones
exit


Seguramente tenga sus errores y eso, espero k me lo comenten aber k les parece.
Me tome la libertad de incluir bastantes contadores de tiempo para acceder al siguiente comando....
Eso es todo....un saludo Grin
En línea
elhackman
Recien llegado
*
Desconectado Desconectado

Mensajes: 17


El conocimiento.....


Ver Perfil
« Respuesta #61 : 07 de Agosto de 2006, 02:52:26 »

Hola amigos, gracias por dar este curso sobre archivos batch, me ha ayudado bastante a entenderlos y a programarlos.. ..

Espero que el moderador de esta foro y nosotros mismos como colaboradores del foro investiguemos un poco mas acerca de archivos .bat  para plantearnos aplicaciones que realmente sean utiles y valgan la pena en esto de ser hackers....

Atte un colaborador... .

A y por cierto solamente a modo de práctica hice este pequeño programita...u til para los inutiles clientes de un ciber...jejeje je
Código

@echo off
title UTILIDADES DEL SISTEMA

cls
echo.

:menu
cls
echo.
echo.
echo.
echo 1. Verificar Daños en el diskket unidad A   
echo 2. Reparar daños en el diskett unidad A     
echo 3. Formatear Disco de 3-1/2                 
echo 4. Salir               
echo.
echo.
set /p opcion=Elija una opcion:

if %opcion%==1 goto checar
if %opcion%==2 goto reparar
if %opcion%==3 goto formato
if %opcion%==4 goto salir

:checar
cls
chkdsk a:
echo presiones una tecla para continuar
pause
goto menu

:reparar
cls
chkdsk a: /f
echo presiones una tecla para continuar
pause
goto menu

:formato
cls
format a: /q
echo presiones una tecla para continuar
pause
goto menu

:salir
cls
echo.
echo gracias por utilizar programas hacker
pause
exit

y aqui viene el código de un escanner puertos de PCs



Una aclaración: el código es de clipto brox....únicamente lo pongo aquí para objeto de prueba y mejora...graci as


@echo off
:principio
title Scanner de ips
cls
color ca
echo             bamos a scanera una ip.
echo.
echo.

set /p ipsn=digite la ip a Scanear:
echo.

echo Desea hacerle ping                     (1)
echo.
echo Desea hacerle tracert                  (2)
echo.
echo Desea Scanear los puertos de la ip     (3)
echo.
echo salir del programa                     (4)
echo.
set /p funcion=digite el numero de la accion que desea realizar:
echo.
echo.

if %funcion% LSS 1 (echo el numero digitado es muy peqeuño, presione una tecla para intentarlo de nuevo.
                    pause>nul
                    goto :principio
                     )

if %funcion% GTR 4  (echo el numero digitado se sobrepasa, presione una tecla para intentarlo de nuevo.
                  pause>nul
                  goto :principio
                     )



if %funcion%==1 (goto :menun)
if %funcion%==2 (goto :menudos)
if %funcion%==3 (goto :menut)
if %funcion%==4 (goto :salir )


:menun
cls
title veremos si esta en linea la ip by clipto boxw.
echo      ...estamos haciendo ping...
echo.
echo.
echo  ping to %ipsn%.
echo.
ping %ipsn%
echo.
echo.
echo el ping se ha realizado para %ipsn%, ahora presione una tecla para continuar.
pause>nul
echo.
echo.
cls
:ping
cls
title menu del ping by clipto boxw.
echo             acontinuacion veras un pequeño menu.
echo.
echo.
echo  volber hacer ping        (1)
echo.
echo  volber al menu inicio    (2)
echo.
echo  Salir del programa       (3)
echo.
echo.
set /p hacer=escriba el numero de accion ha realizar:

if %hacer% LSS 1 (echo el numero introducido es muy pequeño.
         pause>nul
         goto :ping
         )

if %hacer% GTR 3 (echo el numero introducido es muy grande.
          pause>nul
          goto :ping
          )

if %hacer%==1 (goto :nuevaip)
if %hacer%==2 (goto :principio)
if %hacer%==3 (goto :salir)


:nuevaip
cls
title volber hacer ping
echo                   haremos ping de nuevo
echo.
echo.
set /p nuevaip=digite la nueva ip=
echo.
echo ping to %nuevaip%
echo.
echo.
ping %nuevaip%
echo.
echo se ha completado el ping, ahora presione una tecla para continuar.
pause>nul
goto :ping


:menudos
cls
title haremos tracert ala ip esocgida
echo      ...estamos haciendo el tracert...
echo.
echo.
echo tracert %ipsn%

tracert %ipsn%

echo se ha completado el tracert a %ipsn% ahora presione una tecla para continuar.
pause>nul

echo.



:segundo
cls
title menu del tracert by clipto boxw.
echo               ...acontinuaci on veras un pequeño menu...
echo.
echo.
echo  volber hacer tracert       (1)
echo.
echo  volber al menu inicio      (2)
echo.
echo  Salir del programa         (3)
echo.

set /p aja=escriba el numero de la accion que desea realizar:

if %aja% LSS 1 (echo el numero digitado es muy pequeño, presione una tecla para seguir.
                pause>nul
                goto :segundo)

if %aja% GTR 3 (echo el numero digitado se sobrepasa, pulse una tecla para seguir.
                pause>nul
                goto :segundo)

if %aja%==1 (goto :volbertracert)

if %aja%==2 (goto :principio)

ia %aja%==3 (goto :salir)
                         

:volbertracert
cls
title volberas hacer tracert by clipto boxw.
echo            ...volberas hacer tracer...

set /p nuevot=escriba la nueva ip:
tracert to %nuevot%
echo.
tracert %nuevot%
echo.
echo se ha completado el ping, presione una tecla para continuar.
pause>nul
goto :segundo



:menut
cls
title este es el Scanner de puertos con ultilizacion del nc. by clipto boxw
echo                                 ...SCANNER...
ECHO.
ECHO.
echo Scanear la ip escogiendo el puerto   (1)
echo Scanear la ip escribiendo un limite  (2)
echo.

set /p snc=escriba el numero de accion que desea realizar:


if %snc% LSS 1 (echo el numero digitado es muy pequeño, digite una tecla para continuar.
                pause>nul
                goto :menut
                )

if %snc% GTR 2 (echo el numero digitado se sobrepasa, digite una tcla para continuar.
                pause>nul
                goto :menut
                )

if %snc%==1 (goto :menut1)
if %snc%==2 (goto :menut2)

:sinlimite
cls
title Scanar ip con el nc by clipto boxw
echo  Scanearas la ip escogiendo el puerto.
echo.
echo.
set /p %sip%=escribe la ip:
set /p %spu%=escribe los puertos:
echo ahora haremos el Scaneo.
echo.
nc -vv -z %sip% %spu%
echo.
echo se ha terminado el Scaneo, presiona una tecla para continuar.
pause>nul
:men
cls
title menu.......... .. by clito boxw
echo que deseas hacer.
echo.
echo.
echo Scanear otra ip.                            (1)
echo.
echo ir a las modalidades de escaneo de puertos  (2)
echo.
echo volber al menu inicio.                      (3)
echo.
echo Salir del programa                          (4)   
echo.
set /p lida=escibe el numerode la accion que deseas ralizar:
echo.

if %lida% LSS 1 (echo el numero digitado es muy pequeño, pulsa una tecla pára continuar
                     pause>nul
           goto :men)

if %lida% GTR 4 (echo el numero digitado se sobrepasa, pulsa una tecla para continuar.
                     pause>nul
                     goto :men)

if %lida%==1   (goto :sinlimite)

if %lida%==2   (goto :menut)

if %lida%==3   (goto:principio)                 

if %lida%==4   (goto :salir)



:limite


cls
title Scaner de puertos by clipto boxw

echo                           ...Scanear...
echo.
echo.
set /p asd=digite la ip:
echo.
set /p fgh=digite el puerto donde empezara el Scaneo:
echo.
set /p as=digite el puerto donde terminara el Scaneo:
echo.
echo Scaneando %asd% %fgh% to %as%
echo.
nc -vv -z %asd% %fgh%-%as%
echo.
echo se ha terminado el Scaneo, digite una teclapara continuar.
pause>nul
goto :man

:man
cls
title menu.......... .. by clito boxw
echo que deseas hacer.
echo.
echo.
echo Scanear otra ip.                            (1)
echo.
echo ir a las modalidades de escaneo de puertos  (2)
echo.
echo volber al menu inicio.                      (3)
echo.
echo Salir del programa                          (4)   
echo.

set /p qwe=escriba el numero de la accion a realaizar:

if %qwe% LSS 1 (echo el numero digitado es muy pequeño, presione una tecla para continuar.
                pause>nul
                goto :man)

if %qwe% GTR 4 (echo el numero digitado se sobrepasa, presione una tecla para continuar
                pause>nul
                goto :man)

if %qwe%==1 (goto :limite)

if %qwe%==2 (goto :menut)

if %qwe%==3 (goto :principio)

if %qwe%==4 (goto :salir)


:salir
cls
title gracias por usas este programa que fue echo by clipto boxw.
echo             ...nos volberemos aver pronto...
echo.
echo.
echo          A                   A                    A       
echo.
echo          D                   D                    D
echo.
echo          I                   I                    I
echo.
echo          O                   O                    O
echo.
echo          S                   S                    S
echo.
echo          ...y no olvides que nos volberemos aver...
pause>nul
exit

:menut1
cls
title Scaner by clipto boxw
echo                      ......scanner. ......
echo.
echo.
set /p tyu=escoga elpuerto a scanear:
echo.
nc -vv -z %ipsn% %tyu%
echo.
echo se ha completado el scaneo, presione una tecla para continuar.
pause>nul
goto :min



:min
cls
title menu.......... .. by clito boxw
echo que deseas hacer.
echo.
echo.
echo Scanear otra ip.                            (1)
echo.
echo ir a las modalidades de escaneo de puertos  (2)
echo.
echo volber al menu inicio.                      (3)
echo.
echo Salir del programa                          (4)   
echo.

set /p poi=escribael numero  de la accion que desea realizar:

if %poi% LSS 1 (echo el numero digitado es muy pequeño, presione una tecla para continuar.
                pasue>nul
                goto :min)

if %poi% GTR 4 (echo el numero digitado se sobrepasa, digite una tecla para continuar.
                pause>nul
                goto :min)

if %poi%==1 (goto :sinlimite)
if %poi%==2 (goto :menut)
if %poi%==3 (goto :pincipio)
if %poi%==4 (goto :salir)



:menut2
cls
title scanner by clipto boxw
echo         .......scnear. ......
echo.
echo.
set /p thu=escriba el puerto donde empezara el  scaneo:
set /p uyt=escriba el puerto donde terminara el scaneo:

nc -vv -z %ipsn% %thu%-%uyt%
echo.
echo se ha terminado es scaneo, presiona una tecla para continuar.
pause>nul


:kol
cls
title menu.......... .. by clito boxw
echo que deseas hacer.
echo.
echo.
echo Scanear otra ip.                            (1)
echo.
echo ir a las modalidades de escaneo de puertos  (2)
echo.
echo volber al menu inicio.                      (3)
echo.
echo Salir del programa                          (4)   
echo.

set /p mnb=escriba el numero de la accion que desea realiar:

if %mnb% LSS 1 (echo el numero digitado es muy pequeño, pulse una tecla para continuar.
                pause>nul
                goto :kol
                )

if %mnb% GTR 4 (echo el numero digitado se sobrepasa, pulseuna tecla para continuar.
                pause>nil
                goto :kol
                )

if %mnb%==1 (goto :limite)
if %mnb%==2 (goto :menut)
if %mnb%==3 (goto :principio)
if %mnb%==4 (goto :slir)
                         

pause>nul
exit


Usenlo y veran que efectivamente hace lo que hace
En línea

ELHACKMAN
JiMmY_hAcK
NZ2
**
Desconectado Desconectado

Mensajes: 133


"La informacion es libre", Lema Hacker


Ver Perfil
« Respuesta #62 : 09 de Agosto de 2006, 11:38:22 »

Ya e vuelto de vacaciones, esta tarde continuo el curso.
En línea

Sk8 Or DiE
askatasun
Administrador
*****
Desconectado Desconectado

Mensajes: 884



Ver Perfil
« Respuesta #63 : 10 de Agosto de 2006, 11:45:19 »

 Grin que continue el curso!

p.d: los que pongais aqui vuestro codigo, hacedlo entre [code*][code*\]  si los * por supuesto.
si no se hace muy dificil de leer
En línea

no respondo preguntas por mp, para dudas el foro
JiMmY_hAcK
NZ2
**
Desconectado Desconectado

Mensajes: 133


"La informacion es libre", Lema Hacker


Ver Perfil
« Respuesta #64 : 11 de Agosto de 2006, 12:16:08 »

he decidido que lo mejor es que ponga el code entero de la agenda y luego vosotros pregunteis lo que no entendeis. poned aqui todo lo que le añadais o se lo querais añadir asi la gente aprendera mas ok? si teneis cualquier duda preguntad ya que es posible que algun comando no lo ayamos dado aunque creo que todo sta splicao. Wink
Código:
@echo off
cls
title Agenda de Direcciones
rem aqui va nuestra firma del curso espero q os guste
rem la e sacao de internet pero mola ehh...
echo.
echo.
echo                                        ,   , 
echo                                        $,  $,     ,           
echo                                        "ss.$ss. .s'     
echo                                ,     .ss$$$$$$$$$$s,             
echo                                $. s$$$$$$$$$$$$$$`$$Ss       
echo                                "$$$$$$$$$$$$$$$$$$o$$$       ,       
echo                               s$$$$$$$$$$$$$$$$$$$$$$$$s,  ,s 
echo                              s$$$$$$$$$"$$$$$$""""$$$$$$"$$$$$,     
echo                              s$$$$$$$$$$s""$$$$ssssss"$$$$$$$$"   
echo                             s$$$$$$$$$$'         `"""ss"$"$s""     
echo                             s$$$$$$$$$$,              `"""""$  .s$$s
echo                             s$$$$$$$$$$$$s,...               `s$$'  `
echo                         `ssss$$$$$$$$$$$$$$$$$$$$####s.     .$$"$.   , s-
echo                           `""""$$$$$$$$$$$$$$$$$$$$#####$$$$$$"     $.$'
echo                                 "$$$$$$$$$$$$$$$$$$$$$####s""     .$$$|
echo                                  "$$$$$$$$$$$$$$$$$$$$$$$$##s    .$$" $
echo                                   $$""$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"   `
echo                                  $$"  "$"$$$$$$$$$$$$$$$$$$$$S""""'
echo                             ,   ,"     '  $$$$$$$$$$$$$$$$####s 
echo                             $.          .s$$$$$$$$$$$$$$$$$####"
echo                 ,           "$s.   ..ssS$$$$$$$$$$$$$$$$$$$####"
echo                 $           .$$$S$$$$$$$$$$$$$$$$$$$$$$$$#####"
echo                 Ss     ..sS$$$$$$$$$$$$$$$$$$$$$$$$$$$######""
echo                  "$$sS$$$$$$$$$$$$$$$$$$$$$$$$$$$########"
echo           ,      s$$$$$$$$$$$$$$$$$$$$$$$$#########""'
echo           $    s$$$$$$$$$$$$$$$$$$$$$#######""'      s'         ,
echo           $$..$$$$$$$$$$$$$$$$$$######"'       ....,$$....    ,$
echo            "$$$$$$$$$$$$$$$######"' ,     .sS$$$$$$$$$$$$$$$$s$$
echo              $$$$$$$$$$$$#####"     $, .s$$$$$$$$$$$$$$$$$$$$$$$$s.
echo   )          $$$$$$$$$$$#####'      `$$$$$$$$$###########$$$$$$$$$$$.
echo  ((          $$$$$$$$$$$#####       $$$$$$$$###"       "####$$$$$$$$$$
echo  ) \         $$$$$$$$$$$$####.     $$$$$$###"             "###$$$$$$$$$   s'
echo (   )        $$$$$$$$$$$$$####.   $$$$$###"                ####$$$$$$$$s$$'
echo )  ( (       $$"$$$$$$$$$$$#####.$$$$$###' Curso Batch    .###$$$$$$$$$$"
echo (  )  )   _,$"   $$$$$$$$$$$$######.$$##'                .###$$$$$$$$$$
echo ) (  ( \.         "$$$$$$$$$$$$$#######,,,.          ..####$$$$$$$$$$$"
echo(   )$ )  )        ,$$$$$$$$$$$$$$$$$$####################$$$$$$$$$$$"       
echo(   ($$  ( \     _sS"  `"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$S$$,       
echo )  )$$$s ) )  .      .   `$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"'  `$$   
echo  (   $$$Ss/  .$,    .$,,s$$$$$$##S$$$$$$$$$$$$$$$$$$$$$$$$S""        '
echo    \)_$$$$$$$$$$$$$$$$$$$$$$$##"  $$        `$$.        `$$.
echo        `"S$$$$$$$$$$$$$$$$$#"      $          `$          `$
echo            `"""""""""""""'         '           '           '
echo.
echo.
pause > nul
goto menu

:menu
cls
echo.
echo 1.Crear usuario
echo 2.Eliminar usuario
echo 3.Login usuario
echo 4.salir
set /p opc=Que quiere hacer?
If %opc%==1 goto newu
If %opc%==2 goto delu
If %opc%==3 goto regs
If %opc%==4 (goto exit) else echo Caracter no conocido && pause && goto menu

:newu
cls
set /p use=Nombre:     
set /p pas=Contraseña:
cls     
echo guardando usuario...
mkdir c:\Agenda\%use%
echo %pas% > c:\Agenda\%use%\%pas%.txt
attrib +h c:\Agenda\%use%\%pas%.txt
echo usuario guardado de forma correcta
echo pulse una tecla para regresar al menu principal...
pause > nol
goto menu
:menu
cls
echo.
echo 1.Crear usuario
echo 2.Eliminar usuario
echo 3.Login usuario
echo 4.salir
set /p opc=Que quiere hacer?
If %opc%==1 goto newu
If %opc%==2 goto delu
If %opc%==3 goto regs
If %opc%==4 goto exit

:newu
cls
set /p use=Nombre:     
set /p pas=Contraseña:
cls     
echo guardando usuario...
mkdir c:\Agenda\%use%
echo %pas% > c:\Agenda\%use%\%pas%.txt
echo usuario guardado de forma correcta
echo pulse una tecla para regresar al menu principal...
pause > nol
goto menu

:delu
cls
set /p nde=Nombre:
set /p pde=Contraseña:
comprobando informacion...
If exist c:\Agenda\%nde% ( goto delu1 )
If not exist c:\Agenda\%nde% (echo El nombre de usuario no existe&echo pulse una tecla para volver al menu principal..&pause > nul&goto menu)
:delu1
cls
If exist c:\Agenda\%nde%\%pde%.txt ( goto delu2 )
If not exist c:\Agenda\%nde%\%pde%.txt (echo Contraseña incorrecta&echo pulse un tecla para regresar al menu&pause > nul&goto menu)

:delu2
cls
set con=Seguro que quiere borrar toda la informacion de %nde%? s/n
If %con%==s goto delu3
If %con%==n goto menu

:delu3
cls
Borrando informacion...
del c:\Agenda\%nde%
echo Se ha borrado la informacion de %nde% con exito
echo pulse una tecla para regresar al menu principal...
pause > nul
goto menu

:regs
cls
set /p nom=Nombre:
set /p psw=Contraseña:
If exist c:\Agenda\%nom% (goto regs1) 
If not exist c:\Agenda\%nom% (echo El nombre de usuario no existe&echo pulse una tecla para volver al menu principal..&pause > nul&goto menu)

:regs1
If exist c:\Agenda\%nom%\%psw%.txt (goto usermenu)
If not exist c:\Agenda\%nom%\%psw%.txt (echo La contraseña es incorrecta&echo pulse una tecla para volver al menu principal..&pause > nul&goto menu)

:usermenu
cls
echo Hola %nom%
echo.
echo.
echo 1.Agregar nuevo contacto.
echo 2.Eliminar contacto.
echo 3.Agenda.
echo 4.Volver al menu principal.
echo 5.Salir.
echo.
echo.
set /p var=Elija una opcion ingresando el numero de que la acompaña:
If %var%==1 goto 001
If %var%==2 goto 002
If %var%==3 goto 003
If %var%==4 goto menu
If %var%==5 goto exit

:001
if exist C:\Agenda (goto 010) else mkdir C:\Agenda&goto 010

:010
cd \
cls
echo Rellene los siguientes campos acerca de su contacto:
echo.
set /p nombre=Nombre: 
echo.
set /p aapellido=Primer apellido:
echo.
set/p bapellido=Segundo apellido:
echo.
set /p direccion=Direccion: 
echo.
set /p tel=Telefono: 
echo.
echo Nombre: %nombre% > Agenda\%nom%\%nombre%_%aapellido%.txt
echo Primer apellido: %aapellido% >> Agenda\%nom%\%nombre%_%aapellido%.txt
echo Segundo apellido: %bapellido% >> Agenda\%nom%\%nombre%_%aapellido%.txt
echo Diereccion: %direccion% >> Agenda\%nom%\%nombre%_%aapellido%.txt
echo Telefono: %tel% >> Agenda\%nom%\%nombre%_%aapellido%.txt
cls
echo Se guardara la siguente informacion:
echo Nombre: %nombre%
echo Primer Apellido: %aapellido%
echo Segundo Apellido: %bapellido%
echo Direccion: %direccion%
echo Telefono: %tel%
set /p val=¿es correcta? s/n :
If %val%==s echo guardando informacion...&echo Pulsa una tecla para continuar...&pause > nul&goto usermenu
If %val%==n echo Pulse una tecla para volver a introducir los datos...&del Agenda\%nom%\%nombre%_%aapellido%.txt&pause > nul%goto 001

:002
cd \
cls
set /p borrar=Escriba el nombre del contacto que desea borrar:
set /p borraa=Escriba el primer apellido del nombre que desea borrar:
cls 
set /p confir=¿Esta seguro de que quiere eliminar el contacto "%borrar% %borraa%"? s/n:
If %confir%==s (goto 020)
If %confir%==n (goto usermenu)

:020
cd \
cls
echo Borrando contacto...
del Agenda\%nom%\%borrar%_%borraa%.txt   
echo Su contacto se a eliminado de forma correcta. 
echo pulse una tecla para regresar al menu...
pause > nul
goto usermenu

:003
cd \
cls
set /p contac=Escriba el nombre del contacto que desea ver:
cls
set /p apelli=Escriba el primer apellido del contacto que desea ver:
cls   
echo su contacto se esta abriendo...
start Agenda\%nom%\%contac%_%apelli%.txt
cls
echo su contacto se ha abierto de forma correcta
echo Puse una tecla para regresar al menu...
pause > nol
goto usermenu

:exit
cls
echo Hasta la proxima
pause
cls
echo.
echo.
echo                                        ,   , 
echo                                        $,  $,     ,           
echo                                        "ss.$ss. .s'     
echo                                ,     .ss$$$$$$$$$$s,             
echo                                $. s$$$$$$$$$$$$$$`$$Ss       
echo                                "$$$$$$$$$$$$$$$$$$o$$$       ,       
echo                               s$$$$$$$$$$$$$$$$$$$$$$$$s,  ,s 
echo                              s$$$$$$$$$"$$$$$$""""$$$$$$"$$$$$,     
echo                              s$$$$$$$$$$s""$$$$ssssss"$$$$$$$$"   
echo                             s$$$$$$$$$$'         `"""ss"$"$s""     
echo                             s$$$$$$$$$$,              `"""""$  .s$$s
echo                             s$$$$$$$$$$$$s,...               `s$$'  `
echo                         `ssss$$$$$$$$$$$$$$$$$$$$####s.     .$$"$.   , s-
echo                           `""""$$$$$$$$$$$$$$$$$$$$#####$$$$$$"     $.$'
echo                                 "$$$$$$$$$$$$$$$$$$$$$####s""     .$$$|
echo                                  "$$$$$$$$$$$$$$$$$$$$$$$$##s    .$$" $
echo                                   $$""$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"   `
echo                                  $$"  "$"$$$$$$$$$$$$$$$$$$$$S""""'
echo                             ,   ,"     '  $$$$$$$$$$$$$$$$####s 
echo                             $.          .s$$$$$$$$$$$$$$$$$####"
echo                 ,           "$s.   ..ssS$$$$$$$$$$$$$$$$$$$####"
echo                 $           .$$$S$$$$$$$$$$$$$$$$$$$$$$$$#####"
echo                 Ss     ..sS$$$$$$$$$$$$$$$$$$$$$$$$$$$######""
echo                  "$$sS$$$$$$$$$$$$$$$$$$$$$$$$$$$########"
echo           ,      s$$$$$$$$$$$$$$$$$$$$$$$$#########""'
echo           $    s$$$$$$$$$$$$$$$$$$$$$#######""'      s'         ,
echo           $$..$$$$$$$$$$$$$$$$$$######"'       ....,$$....    ,$
echo            "$$$$$$$$$$$$$$$######"' ,     .sS$$$$$$$$$$$$$$$$s$$
echo              $$$$$$$$$$$$#####"     $, .s$$$$$$$$$$$$$$$$$$$$$$$$s.
echo   )          $$$$$$$$$$$#####'      `$$$$$$$$$###########$$$$$$$$$$$.
echo  ((          $$$$$$$$$$$#####       $$$$$$$$###"       "####$$$$$$$$$$
echo  ) \         $$$$$$$$$$$$####.     $$$$$$###"             "###$$$$$$$$$   s'
echo (   )        $$$$$$$$$$$$$####.   $$$$$###"                ####$$$$$$$$s$$'
echo )  ( (       $$"$$$$$$$$$$$#####.$$$$$###' Curso Batch    .###$$$$$$$$$$"
echo (  )  )   _,$"   $$$$$$$$$$$$######.$$##'                .###$$$$$$$$$$
echo ) (  ( \.         "$$$$$$$$$$$$$#######,,,.          ..####$$$$$$$$$$$"
echo(   )$ )  )        ,$$$$$$$$$$$$$$$$$$####################$$$$$$$$$$$"       
echo(   ($$  ( \     _sS"  `"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$S$$,       
echo )  )$$$s ) )  .      .   `$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"'  `$$   
echo  (   $$$Ss/  .$,    .$,,s$$$$$$##S$$$$$$$$$$$$$$$$$$$$$$$$S""        '
echo    \)_$$$$$$$$$$$$$$$$$$$$$$$##"  $$        `$$.        `$$.
echo        `"S$$$$$$$$$$$$$$$$$#"      $          `$          `$
echo            `"""""""""""""'         '           '           '
echo.
echo.
pause
exit
« Última modificación: 27 de Octubre de 2006, 08:31:47 por JiMmY_hAcK » En línea

Sk8 Or DiE
askatasun
Administrador
*****
Desconectado Desconectado

Mensajes: 884



Ver Perfil
« Respuesta #65 : 11 de Agosto de 2006, 04:00:21 »


dudas:

1.-porque pones /cd ?¿

2.- la contraseña entonces es el nombre del archivo .txt no?¿ si miras este nombre ya lo sabras o como va?

En línea

no respondo preguntas por mp, para dudas el foro
JiMmY_hAcK
NZ2
**
Desconectado Desconectado

Mensajes: 133


"La informacion es libre", Lema Hacker


Ver Perfil
« Respuesta #66 : 11 de Agosto de 2006, 06:25:16 »

/cd sirve para cambiar el directorio a c:\

cd = change directory

con la barra tal cual es pa c:\ pero se tb se pued eponer por ejemplo:

cd c:\windows

lo de la contraseña.txt si tienes razon pero este arxivo esta okulto con attrib +h

espero aber contestao a todo  kool
En línea

Sk8 Or DiE
neo_2511
NZ1
*
Desconectado Desconectado

Mensajes: 101


Up the Irons!!!!


Ver Perfil WWW
« Respuesta #67 : 11 de Agosto de 2006, 10:31:36 »

una duda mas, que ya habias explicado pero me quede pensando, attrib +h es para que quede oculto, entonces me surge la duda, la parte de -h es solo un comando que se pudiera cambiar para que hubiera otra funccion (no se si me explico pero me refiero a algo así como a lo de el comando set, que puede ser set /a o set /p, espero que me entiendas)
« Última modificación: 11 de Agosto de 2006, 10:32:36 por neo_2511 » En línea

I am the future, sacrifice your soul and succumb to me Nailed to your fait you will belive



<font size="6">
Para ver este enlace Registrate o Inicia Sesion  </font>
askatasun
Administrador
*****
Desconectado Desconectado

Mensajes: 884



Ver Perfil
« Respuesta #68 : 11 de Agosto de 2006, 11:18:21 »


c:\help attrib

attrib:

R --> solo lectura (del archivo)
A --> atributo de archivo de almacenamiento
S --> atributo de archivos del sistema
h --> para ocultar  Wink

-hay mas con el help lo puedes ver


 no lo he entendido mucho lo de el A y el S
En línea

no respondo preguntas por mp, para dudas el foro
neo_2511
NZ1
*
Desconectado Desconectado

Mensajes: 101


Up the Irons!!!!


Ver Perfil WWW
« Respuesta #69 : 11 de Agosto de 2006, 11:46:09 »

oh muy bien muchisimas gracias
En línea

I am the future, sacrifice your soul and succumb to me Nailed to your fait you will belive



<font size="6">
Para ver este enlace Registrate o Inicia Sesion  </font>
ser-in
Recien llegado
*
Desconectado Desconectado

Mensajes: 22


Ver Perfil
« Respuesta #70 : 06 de ſeptiembre de 2006, 03:01:20 »

Buenas de nuevo gente,

Una dudilla...

¿Los bucles que usamos para hacer una repetición de un trozo de código es con algún comando tipo For O por el contrario el For en batch es para realizar otra cosa?,

En caso de que fuera la seguda opción, ¿se haría con saltos incondicionale s (goto) al estilo JMP de ensamblador?

Muchas gracias por este estupendo manual...
En línea
Punk-Rock
Visitante
« Respuesta #71 : 06 de ſeptiembre de 2006, 04:16:48 »

Komo veo ke Jimmy se lo a kurrado bien e decidido pasar el curso a PDF.


Para ver este enlace Registrate o Inicia Sesion
Descarga


Jimmy, si lo kieres kontinuar dimelo y te paso el .doc para ke le agregues los kursos ke piensas dar.

Salu2 y buen trabajo!!!

En línea
ser-in
Recien llegado
*
Desconectado Desconectado

Mensajes: 22


Ver Perfil
« Respuesta #72 : 06 de ſeptiembre de 2006, 05:21:37 »

Por dios....

Así sí que da gusto.

Gracias hendrix.

« Última modificación: 06 de ſeptiembre de 2006, 05:22:45 por ser-in » En línea
Punk-Rock
Visitante
« Respuesta #73 : 07 de ſeptiembre de 2006, 04:19:02 »

jejejeje gracias.... Wink Wink Wink

Salu2

En línea
JiMmY_hAcK
NZ2
**
Desconectado Desconectado

Mensajes: 133


"La informacion es libre", Lema Hacker


Ver Perfil
« Respuesta #74 : 07 de ſeptiembre de 2006, 08:57:50 »

Muy bueno hendrix kool
Komo veo ke Jimmy se lo a kurrado bien e decidido pasar el curso a PDF.


Para ver este enlace Registrate o Inicia Sesion
Descarga


Jimmy, si lo kieres kontinuar dimelo y te paso el .doc para ke le agregues los kursos ke piensas dar.

Salu2 y buen trabajo!!!


si continuare el curso pero mas adelante es q estoy de vacaciones y no tengo tiempo.
En línea

Sk8 Or DiE
Páginas: 1 2 3 4 [5] 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 Ir Arriba Imprimir 
« anterior próximo »
Ir a:  


Ingresar con nombre de usuario, contraseña y duración de la sesión

Powered by SMF 1.1.6 | SMF © 2006-2008, Simple Machines LLC hacker

Juegos gratis - Articulos PHP - Juegos - Trucos - Letras - Juegos - Juegos Online