ADO connexion dynamique

**emmakiki** · 30/09/2018, 16h02

Bonjour,

merci de vous pencher sur mon problème

je souhaite s'il vous plaît savoir comment procéder pour définir la connexion à la base de données après installation de l'application (voire pendant l'installation)

en effet je souhaite installer ma base de données sur un emplacement réseau et déployer l 'application sur différent postes (5) et souhaite définir le chemin d'accès a chaque fois

notons que la base de données est sous access et liée à delphi par le composant ADO

petit exemples s'il vous plaît

Qu'en pensez-vous ?

**SergioMaster** · 01/10/2018, 08h39

Bonjour,

Déjà j'ai une première réaction à chaud :
ACCESS et plusieurs clients sans parler de répertoire partagé c'est pas très sérieux !

**BuzzLeclaire** · 18/10/2018, 18h41

Bonjour,

C'est parfait tout çà lool

Personnellement, j'utilise un fichier INI situé au même endroit que ton exécutable, dans lequel j'indique le chemin UNC du fichier MDB ou ACCDB.

Style de fichier INI
[CHEMIN]
UNC=\\Serveur\BASEDEDONNES\monfichier.mdb

Ensuite dans ton programme tu peux te connecter ainsi pour un fichier MDB (pas ACCDB)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
  Try
     Try
 
      ADOCnx.Connected := False;
      ADOCnx.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + BaseUNC +
            ';Persist Security Info=False';
      ADOCnx.LoginPrompt := False;
      ADOCnx.Connected := True;
 
// à partir d'ici tu est connecté
 
     Except
       ON E:Exception do
       begin
         MessageDlg('*** ADOCnx***' + #13+#10
         + '*** Message : '+ E.Message,mtWarning,[mbOK],0);
       end;
     End;
   Finally
     ADOCnx.Close;
   End;