Connection à ACCESS avec Mot de passeRésolu

Question

Bonjour,
j'ai un probl&#232;me de connection via VB sur une base de donn&#233;e ACCESS proteger par un mot de passe. voici mon code :
    Dim cn As New ADODB.Connection
    Dim records As New ADODB.Recordset
    Dim Adresse As String

    cn.Provider = "Microsoft.Jet.OLEDB.4.0"
    cn.ConnectionString = "Data Source=" & Adresse & "; PassWord = " & txt_mdp & ""
    cn.Open
    procedure_verifconnection
    records.CursorType = adOpenDynamic

Et j'ai le message d'erreur suivant : Erreur d'execution '-21472...' Impossible de d&#233;marrer votre application. Le fichier d'information du groupe de travail est absent ou ouvert en mode exclusif par un autre utilisateur.

Alors que je n'est pas ouvert ma base avec quoi que se soit d'autre, que je suis sur de mon Adresse (c:\ma_base_de_donne.mbd) et sur de mon mot de passe...
Merci de votre r&#233;ponse ;)

Guizmo95 · Accepted Answer

N'ayan pas eu de r&#233;ponse, j'ai cherch&#233; pendant un tr&#232;s long moment et est finalement trouver la source de mon probleme :

Dim cn As New ADODB.Connection
    Dim records As New ADODB.Recordset
    Dim Adresse As String

    cn.Provider = "Microsoft.Jet.OLEDB.4.0"
    cn.ConnectionString = "Data Source=" & Adresse & "; Jet OLEDB:Database Password = " & txt_mdp & ""
    cn.Open
    procedure_verifconnection
    records.CursorType = adOpenDynamic

J'ai tout simplement remplacer "PassWord" par "Jet OLEDB:Database Password"

Guizmo95 · Answer

Personne ne peu m'aider?

Connection à ACCESS avec Mot de passe

2 réponses

Discussions similaires