Discussion :

[JLDK007]

Bonjour à tous

Je n'arrive pas à établir une connexion à une base des données MS Access sécurisé en mode exclusif en utilisant ADO et le fournisseur Microsoft Jet OLEDB 4.1.

La base des données, si elle n'est pas sécurisée, la connexion s'établit, mais comment incorporer dans mes codes la prise en compte du mot de passe lorsque j'utilise Ado dans les 2 cas ?
C'est à dire, 1° lorsque le composant ADO est placé sur le formulaire ?
Ici, le datagrid est alimenté par cet ado (voir datasource)

2° lorsque ADO est créé puis invoqué dans un code...

Si quelqu'un peut m'aider à résoudre ce problème...

Merci pour toute tentative de solution...

[Bilxadim]

Bonjour
Là, je suppose que tu ouvert ta base access en exclusif et ensuite tu a mis un mot de passe.
Soit Con ta variable de connection

Code :

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

1
2
3
4
5
6
 
Dim Con as New ADODB.Connection
Set Con = New ADODB.Connection
Con.provider="Microsoft.JET.OLEDB.4.0"
Con.connectionString="Data Source=" & app.paph & "\Nombase.mdb;Jet OLEDB:Database Password=" 'MotDePass: c'est le mot de pass que vous avez donné dans la base access
Con.Open

Bon courage
Cordialement.