Agenda de Direcciones

Iniciado por ANTRAX, Julio 18, 2011, 10:18:44 PM

Tema anterior - Siguiente tema

0 Miembros y 1 Visitante están viendo este tema.

Código: dos
@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