[Batch] Ayuda base de datos

[ELVJop]

Si quieres seguir usando tu code te lo pongo adaptado:

Código [Seleccionar] Expandir


@Echo OFF
TITLE Batch Program V1.0
COLOR 0A

:PDI
Echo Mi  primer  programa  ECHO  en  bach.
Echo -------------------------------------
Echo -------------------------------------
Echo Pulse 1 Para Contuniar o 2 Para Salir
SET /P "op=Opcion: "
Cls
IF "%op%" EQU "1" (GOTO :MENU1)
IF "%op%" EQU "2" (Exit /B 0)

Echo: :: WELCOME to LOGIN Script:: | MORE
Set "File=%UserProfile%\LOGINScript.txt"

:MENU1
Echo ------------
Echo 1) Registro
Echo 2) Log IN
Echo 3) Salir
Echo ------------ | MORE
SET /P "op=Opcion: "
Cls
IF "%op%" EQU "1" (GOTO :REGISTro)
IF "%op%" EQU "2" (GOTO :LOGIN)
IF "%op%" EQU "3" (Exit /B 0)
Call :ERROR & GOTO :MENU

:login
Reg query "HKCU\general" >nul 2>&1
If %Errorlevel% equ 0 (echo Digame la contrasenya general) Else (goto :registro)
cls
:algo
cls
set /p algo=Digame la contrasenya general:
Reg query "HKCU\general" /f "%algo%" /e >NUL
If NOT %Errorlevel% equ 0 (goto :Algo)
goto :menu2

:UserPass
Echo: Establece los siguientes parametros: | MORE
SET /P "name=Usuario: "
SET /P "passw=Contrasena: "
Goto :EOF

:ERROR
CLS
Echo: ERROR: Se ha producido un error, por favor verifica los datos ingresados.
Goto :EOF

:registro
cls
set /p pass1=Digame una contrasenya:
cls
set /p pass2=Repita la contrasenya:
if NOT %pass1%==%pass2% goto :Registro
Reg add "HKCU\general" /v "login" /d "%pass1%" /F >NUL
goto :menu1

:MENU2
cls
Echo Que Deseas Hacer?
Echo 1) Internet
Echo 2) Ares
Echo 3) Ajedrez
Echo 4) Exit
Echo ------------ | MORE
SET /P "op=Opcion: "
Cls
IF "%op%" EQU "1" (GOTO :I)
IF "%op%" EQU "2" (GOTO :A)
IF "%op%" EQU "3" (Goto :Aj)
IF "%op%" EQU "4" (Exit /B 0)
Call :ERROR & GOTO :MENU

:I
Start C:\Users\BTD\Desktop/GoogleChrome
GOTO :MENU2

:A
Start C:\Users\BTD\Desktop/Ares
GOTO :MENU2

:Aj
Start C:\Users\BTD\Desktop/Ajedrez
GOTO :MENU2


[juan196518]

Si quieres seguir usando tu code te lo pongo adaptado:

Código [Seleccionar] Expandir


@Echo OFF
TITLE Batch Program V1.0
COLOR 0A

:PDI
Echo Mi  primer  programa  ECHO  en  bach.
Echo -------------------------------------
Echo -------------------------------------
Echo Pulse 1 Para Contuniar o 2 Para Salir
SET /P "op=Opcion: "
Cls
IF "%op%" EQU "1" (GOTO :MENU1)
IF "%op%" EQU "2" (Exit /B 0)

Echo: :: WELCOME to LOGIN Script:: | MORE
Set "File=%UserProfile%\LOGINScript.txt"

:MENU1
Echo ------------
Echo 1) Registro
Echo 2) Log IN
Echo 3) Salir
Echo ------------ | MORE
SET /P "op=Opcion: "
Cls
IF "%op%" EQU "1" (GOTO :REGISTro)
IF "%op%" EQU "2" (GOTO :LOGIN)
IF "%op%" EQU "3" (Exit /B 0)
Call :ERROR & GOTO :MENU

:login
Reg query "HKCU\general" >nul 2>&1
If %Errorlevel% equ 0 (echo Digame la contrasenya general) Else (goto :registro)
cls
:algo
cls
set /p algo=Digame la contrasenya general:
Reg query "HKCU\general" /f "%algo%" /e >NUL
If NOT %Errorlevel% equ 0 (goto :Algo)
goto :menu2

:UserPass
Echo: Establece los siguientes parametros: | MORE
SET /P "name=Usuario: "
SET /P "passw=Contrasena: "
Goto :EOF

:ERROR
CLS
Echo: ERROR: Se ha producido un error, por favor verifica los datos ingresados.
Goto :EOF

:registro
cls
set /p pass1=Digame una contrasenya:
cls
set /p pass2=Repita la contrasenya:
if NOT %pass1%==%pass2% goto :Registro
Reg add "HKCU\general" /v "login" /d "%pass1%" /F >NUL
goto :menu1

:MENU2
cls
Echo Que Deseas Hacer?
Echo 1) Internet
Echo 2) Ares
Echo 3) Ajedrez
Echo 4) Exit
Echo ------------ | MORE
SET /P "op=Opcion: "
Cls
IF "%op%" EQU "1" (GOTO :I)
IF "%op%" EQU "2" (GOTO :A)
IF "%op%" EQU "3" (Goto :Aj)
IF "%op%" EQU "4" (Exit /B 0)
Call :ERROR & GOTO :MENU

:I
Start C:\Users\BTD\Desktop/GoogleChrome
GOTO :MENU2

:A
Start C:\Users\BTD\Desktop/Ares
GOTO :MENU2

:Aj
Start C:\Users\BTD\Desktop/Ajedrez
GOTO :MENU2


grax