Ver Mensaje Individual
  #5  
Antiguo 15-06-2016
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Aunque la búsqueda puede ser insensible a mayúsculas y minúsculas, dependiendo del collate usado, los valores almacenados en la base se regresan tal como fueron capturados. Entonces, en lugar de buscar un usuario con nombre de usuario y contraseña determinada, puedes simplemente buscarlo por nombre de usuario y comparar las contraseñas en tu código delphi. Algo así:

Código Delphi [-]
FMCorp.qry_login.SQL.Add('Select usuario, contrasenia, NombreUsuario, NivelUsuario from login where usuario=' + QuotedStr(txtUsuario.Text));
FMCorp.qry_login.Open;

if FMCorp.qry_login.FieldByName('contrasenia').AsString = txtPass.Text then
begin
    // La contraseña es correcta
end;

LineComment Saludos
Responder Con Cita