Discussion :

[yahia1982]

salut!
je repose encore ma question,
j'arrive pas a connecter a une base access protegee par mot de passe, j'ai essaye plusieurs fois et dans plusoeurs forums, et toujours pas de reponses.
est ce qu'il ya quelqu'un qui peut m'aider a resolver ce probleme.
j'attend vos reponse dans les plus brefs délais.
si quelq'un peut m'envoyer un exemple ça sera mieu.
merci.

[alfadev]

Salut;

tu peut nous indiquer quel composants t'utilise pour se connecter

[yahia1982]

j'utilise les composants ado

même je peus utiliser un autre composant si ça marche bien avec les bases de données.

[alfadev]

Bonjour;

t'a pas essayer

ADOConnection1.Open('Admin','Mon_mot_de_pass');

[Rayek]

salut!
je repose encore ma question,
j'arrive pas a connecter a une base access protegee par mot de passe, j'ai essaye plusieurs fois et dans plusoeurs forums, et toujours pas de reponses.
est ce qu'il ya quelqu'un qui peut m'aider a resolver ce probleme.
j'attend vos reponse dans les plus brefs délais.
si quelq'un peut m'envoyer un exemple ça sera mieu.
merci.

Normalement il te suffit de remplir correctement la chaine de connexion.

Code :

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

1
2
3
4
5
Provider=Microsoft.Jet.OLEDB.4.0;
Password=test;
Data Source=E:\Bases Communes\Mabase.mdb;
Persist Security Info=True

[yahia1982]

Toujours le même probleme
Si quelq'un peut m'envoye un exemple.
merci

[Invité]

J'ai eu le même problème.
Cependant, ça fonctionne maintenant, en ajoutant:

Code :

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

Jet OLEDB:Database Password=test

dans la propriété "ConnectionString" de ADOConnection.

Code :

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

  ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + nomFichierBD + ';Mode=Read;Persist Security Info=False;Jet OLEDB:Database Password=test';

"test" est le mot de passe sur la base de données, pas un mot de passe d'un utilisateur de la base de données.


Je n'ai pas réussi à faire fonctionner Delphi avec un utilisateur particulier de ma base de données Access.

Code :

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

ADOConnection1.Open('Admin','Mon_mot_de_pass');

ne semble pas fonctionner...

[codial]

Bonjour,
Ce code fonctionne parfaitement avec une base access:

Code :

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

1
2
3
4
5
6
7
8
9
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='  + BaseEnCours
    //+ ExtractFileDir(paramStr(0)) + '\Data\'+ BaseEnCours
    +';Mode=ReadWrite;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";'
    +'Jet OLEDB:Database Password="TonMotDePasse";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;'
    +'Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'
    +'Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;'
    +'Jet OLEDB:Don''t Copy Locale on Compact=False;'
    +'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False';

Cordialement

Codial