Bonsoir,

j'ai un probleme dans la connexion avec ma base de données
dans le module voila mon code :

                 Option Explicit
                 Public cn As New ADODB.Connection

et dans le form load de mon menu voila le code que j'ai ecrit:
            cn.Provider = "microsoft.jet.oledb.4.0"
            cn.ConnectionString = App.Path & "\Med.mdb"
            cn.Open
le probleme lorsque j'excute j'ai un messag d'erreur    "Type defini par l'utilisateur non défini"   dans la 2eme ligne concernant le code du module

Veuillez m'aider svp

Merci d'avance

Moi je ferai plus comme cela

Option Explicit
Public cn As Connection
Public cnRecordset As New ADODB.Recordset



dans le form load
'Déclare la connexion
Set cn = New ADODB.Connection
cn.CursorLocation = adUseClient
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;data source=" & App.Path & "\Med.mdb"
'Test si deja ouverte
If cn.State = 0 Then Call cn.Open(cn.ConnectionString)
'Déclare un enregistrement
Set cnRecordset = New ADODB.Recordset

Réponse acceptée !

Bonjour,

j'ai trouvé la faute j'ai oublié de charger les bibliotheques et désolé du derangement

Merci beaucoup, ça peut servir qq1 d'autre



@+