Sql Text :
Code: Select all
Select U.ID_UTILISATEUR, U.NOM, U.MOT_PASSE
from UTILISATEUR U, UTILISATEUR_COMMUNE UC
where U.ID_UTILISATEUR = UC.ID_UTILISATEUR
and upper(NOM) = upper(:NOM)
and MOT_PASSE = :MOT_PASSE
Code: Select all
Query.Params[0].AsString := EditUtilisateur.Text;
Query.Params[1].AsString := MotPasse;
Query.Open;
NB : This code woks perfectly with BDE and OBDC connection.