como puedo crear una ventana de password
Publicado por Mauro (2 intervenciones) el 21/07/2006 23:19:09
bueno tengo el siguiente codigo :
string nom,cla
select Usuario,Password into :nom,:cla from Registro where Usuario=:sle_nombre.text and Password=:sle_pass.text;
if Blio.sqlcode = 100 then
contador=contador+1
messagebox('Advertencia','Nombre Incorrecto o Contraseña errada',exclamation!)
if contador = 3 then
messagebox('Aviso','Intentos Fallidos, El Sistema se Cerrará',exclamation!)
else
sle_nombre.text=""
sle_pass.text=""
sle_nombre.setfocus()
end if
else
open(w_administrador)
end if
se supone que debe agarrar la informacion y agregarla a las variables pero creo que no hace nada de eso se va de frente al open con cualquier nombre hasta con los espacios en blancos hay algo mal no se alguien q me ayude gracia de antemano
string nom,cla
select Usuario,Password into :nom,:cla from Registro where Usuario=:sle_nombre.text and Password=:sle_pass.text;
if Blio.sqlcode = 100 then
contador=contador+1
messagebox('Advertencia','Nombre Incorrecto o Contraseña errada',exclamation!)
if contador = 3 then
messagebox('Aviso','Intentos Fallidos, El Sistema se Cerrará',exclamation!)
else
sle_nombre.text=""
sle_pass.text=""
sle_nombre.setfocus()
end if
else
open(w_administrador)
end if
se supone que debe agarrar la informacion y agregarla a las variables pero creo que no hace nada de eso se va de frente al open con cualquier nombre hasta con los espacios en blancos hay algo mal no se alguien q me ayude gracia de antemano
Valora esta pregunta


0