Ver Mensaje Individual
  #9  
Antiguo 16-06-2011
rrosariom rrosariom is offline
Miembro
 
Registrado: abr 2007
Posts: 23
Reputación: 0
rrosariom Va por buen camino
Control de Acceso a una aplicacion

este es el codigo que tengo actualmente:

Código Delphi [-]
 form2.adoquery1.Close;
form2.adoquery1.sql.Clear;
form2.adoquery1.SQL.Add('select username,password FROM DBA_USERS');
form2.adoquery1.SQL.Add('where username = :usuario');
form2.adoquery1.SQL.Add('or password = :clave');
form2.adoquery1.FieldByName('usuario').AsString := dbedit1.Text;
form2.adoquery1.FieldByName('clave').AsString := dbedit2.Text;
form2.adoquery1.Open;
form2.adoquery1.Last;
if form2.adoquery1.RecordCount <> 0
then
  form1.showmodal
else
  showmessage ('Usuario O PassWord Invalido');
  end;

y me presenta el siguiente error:

AdoQuery1:Field'usuario' not found'


Me faltara declarar algo?

Última edición por ecfisa fecha: 21-06-2011 a las 04:18:44. Razón: Etiquetas [DELPHI] [/DELPHI]
Responder Con Cita