Delphi - Login à une Base de Données Microsoft Access protégée par mot de passe

Description :

Exemples d'une application créée avec Borland Delphi 7 qui permet de se connecter à une base de données Microsoft Office Access protégée par un mot de passe de sécurité. 

Exemple 1 : Débutant V1

Exemple simple, pour ça il faut définir manuellement le chemin vers la base de données "Materiels_Informatique.mdb" ou "Materiels_Informatique.accdb" dans les propriétés du composant ADOConnection1 comme suite :

with dm.ADOConnection1 do
 begin
  Close;
  LoginPrompt:=false;
  ConnectionString:='';
  dm.ADOConnection1.Provider:='Microsoft.Jet.OLEDB.4.0';    //Pour base de données Access 2002-2003 (*.mdb)
  //dm.ADOConnection1.Provider:='Microsoft.ACE.OLEDB.12.0';  //Pour base de données Access 2007 (*.accdb)

     {dm.ADOConnection1.Properties : Propriétés de ADOConnection}
   Properties['Data Source'].Value:=ExtractFilePath(Application.ExeName)+ 'Materiels_Informatique.mdb';    //Chemin de la BD
   Properties['Persist Security Info'].Value:=False;
   Properties['Jet OLEDB:Database Password'].Value:=Edit_MotDePasse.Text;

  end;{with ADOConnection1}

- Dans l’unité « Project1 », la forme « F_login » doit être la forme qui se créer en premier, pour que lorsque on lance l’application c’est la forme « F_login » qui va s’afficher en premier et sera la forme principale du projet Delphi, comme suite :

Exemple 2 : Débutant V2

Lorsque on lance pour la première fois cette application on doit spécifier le chemin d’accès à la base de données "Materiels_Informatique.mdb" ou "Materiels_Informatique.accdb".Et lorsque on se connecte avec cette application à la base de données "Materiels_Informatique.mdb" par exemple, et que la connexion est établi avec succès, un fichier de configuration "Config.ini" se créer automatiquement dans le même répertoire que celui de l’exécutable qui va stocker le chemin d’accès vers la base de données "Materiels_Informatique.mdb" et comme ça la spécification du chemin d'accès à la base de données "Materiels_Informatique.mdb" ne sera pas demandé à chaque tentative de connexion.

- Dans l’unité « Project1 », la forme « F_login » doit être la forme qui se créer en premier, pour que lorsque on lance l’application c’est la forme « F_login » qui va s’afficher en premier et sera la forme principale du projet Delphi, comme suite :

 

Voir : Comment se connecter avec ADOConnection à une base de données Microsoft Access protégée par un mot de passe de sécurité dans Delphi

 

Lien de téléchargement des codes sources :

Débutant V1 : Télécharger depuis (Google Drive)

Débutant V2 :  Télécharger depuis (Google Drive)