Impossible de se connecter à la base de données Access à partir d'une requête VBA dans Excel - Excel, vba, ms-access, access-vba, excel-2010

J'ai une requête VBA intégrée dans Excel qui exécute une requête SQL sur une base de données Access. La connexion fonctionne lorsque la base de données n'est pas protégée sans mot de passe à l'aide du code suivant:

Set Connection = New ADODB.Connection
Cnct = "Provider=Microsoft.ACE.OLEDB.12.0;"
Cnct = Cnct & "Data Source=" & DBFullName & ";"
Connection.Open ConnectionString:=Cnct

Mais quand je mot de passe protéger la base de données et essayezComme ci-dessus, mais avec la condition de mot de passe ajoutée, il ne sera pas connecté et le message "Erreur d'exécution -2147217843" s'affichera. Le code que j'utilise pour cela est le suivant:

Set Connection = New ADODB.Connection
Cnct = "Provider=Microsoft.ACE.OLEDB.12.0;"
Cnct = Cnct & "Data Source=" & DBFullName & ";"
Cnct = Cnct & "user ID=" & Environ("Username") & ";"
Cnct = Cnct & "password=XXXXXXXXXX;"
Connection.Open ConnectionString:=Cnct

Est-ce que quelqu'un sait ce que je fais mal ici?

Réponses:

C'est la chaîne de connexion à utiliser lorsque vous avez un accès 2007 - Base de données 2013 protégée par un mot de passe à l'aide du "Définir la base de données Mot de passe"fonction dans Access.

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:myFoldermyAccessFile.accdb;Jet OLEDB:Database Password=MyDbPassword;

Certains rapports de problèmes avec un mot de passe de plus de 14 caractères. Également que certains personnages pourraient causer des problèmes. Si vous rencontrez des problèmes, essayez de changer le mot de passe en un mot court avec des caractères normaux.

Remarque! Les rapports indiquent qu'une base de données chiffrée à l'aide deLe schéma de chiffrement par défaut d'Access 2010 - 2013 ne fonctionne pas avec cette connexion chaîne. En accès; essayez les options et choisissez la méthode de cryptage 2007 au lieu. Cela devrait le faire fonctionner. Nous ne connaissons aucun autre Solution. Contactez-nous si d'autres solutions sont disponibles!

(La source)