Formulario login y password
Lo que quiero saber es como hacer que dicho formulario para ingresar con password y nombre y den acceso a otra página si no nolo haga.
Hasta ahoratengo la base de tablas nombre y contraseña donde se guardan los nombres y password pero como le hgo para que este lea esa base de datos para verificar los datos ingresados y dar acceso a otro formulario.
Hasta ahoratengo la base de tablas nombre y contraseña donde se guardan los nombres y password pero como le hgo para que este lea esa base de datos para verificar los datos ingresados y dar acceso a otro formulario.
1 Respuesta
Respuesta de areal76
1
Una forma sencilla:
Crea una tabla que almacene el usuario y el password
tabla UsersSys
campos Nuser, Puser
Crea un formulario UserAccess
En UserAccess crea dos campos: txtUser, txtPass
un botón cmbAccess
en el evento clic de cmbAccess digita:
valCount = 0
If valCount = 3
form.release
endif
select UsersSys
Locate for Nuser = form.txtUser.value and Puser = form.txtPass
if found()
codigo para accesar a otra pagina
else
messagebox("usuario y Password Incorrecto")
valCount = valCount+1
form.txtUser.setfocus()
Endif
La variable valCount verifica las veces que el usuario intenta accesar al tercer intento se cierra
Crea una tabla que almacene el usuario y el password
tabla UsersSys
campos Nuser, Puser
Crea un formulario UserAccess
En UserAccess crea dos campos: txtUser, txtPass
un botón cmbAccess
en el evento clic de cmbAccess digita:
valCount = 0
If valCount = 3
form.release
endif
select UsersSys
Locate for Nuser = form.txtUser.value and Puser = form.txtPass
if found()
codigo para accesar a otra pagina
else
messagebox("usuario y Password Incorrecto")
valCount = valCount+1
form.txtUser.setfocus()
Endif
La variable valCount verifica las veces que el usuario intenta accesar al tercer intento se cierra
