Discussion :

[unionriton]

Bonjour,
Voici un problème que je n'arrive pas à résoudre, bien que l'ayant travaillé pendant 3 jours.

8) Mon objectif : écrire un programme DELPHI pour accéder à une base de donnée Access (2003).

Mes outils/ Mon matos : DELPHI 2005 ; Access 2003 ; JET 4.0 ; Windows XP SP2 ; une base de donnée de clients

Mon petit + : je protège ma base de données Access en créant un mot de passe.

Fabrication de la connection : ADOConnection avec l'assistant de construction de chaîne de connection.

MON PROBLEME : lorsque j'ai rentré mes paramètres de connexion à savoir le login et le password, ET QUE je teste celle-ci, une erreur apparaît :
Echec du test de connexion en raison d'une erreur survenue lors de l'initialisation du fournisseur. Impossible de démarrer votre application. Le fichier d'informations du groupe de travail est absent ou ouvert en mode excusif par un autre utilisateur.

Pourtant : -- la connection fonctionne lorsque j'enlève le mot de passe sur la base de donnée (or c'est pas ce que je désire)
-- la base de donnée est BIEN fermée, donc pas de problème d'exclusivité...

Mais comment don se connecter alors à cette fichue base sécurisée ?

Merci pour votre aide...

[delphichem]

Pour tester la connexion, il ne faut pas saisir le mot de passe dans l'onglet connexion, mais dans l'onglet toutes -> JETOLEDBatabase Password.

Après avoir saisie le mot de passe, reviens a l'onglet connection et fait le test.

[portu]

Moi je fais comme ceci et ca marche sans aucun problème

Data.Connection.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+Ini.ReadString('Options','DB LOCATION','')+
';Mode=Share Deny None;Extended Properties="";Persist Security Info=False;Jet OLEDB:System database="";'+
'Jet OLEDB:Registry Path="";Jet OLEDBatabase Password="MON_PASSWORD";Jet OLEDB:Engine Type=5;Jet OLEDBatabase 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 OLEDBon''t Copy Locale on Compact=False;'+
'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False' ;
Data.Connection.Connected := true;

[delphichem]

Daccord, mais je cite

Fabrication de la connection : ADOConnection avec l'assistant de construction de chaîne de connection.

Le problème c'est qu'il n'arrive pas a tester sa connexion en passant par l'assistant.

[nivet]

As tu trouvé la solution a ton problème?
Moi j'ai ce problème avec MYsql et aussi avec ma base ACCESS.
Je n'ai pas trouvé la solution.
Quels composant DELPHI 8 utilises tu pour te connecter à ta base?
A t-on accés au composant ADO comme en Delphi 7et si oui comment les installer?

D'avance Merci.