js8bleu
Messages postés576Date d'inscriptionsamedi 14 octobre 2006StatutMembreDernière intervention27 janvier 2014
-
10 oct. 2009 à 02:59
cs_ghuysmans99
Messages postés3982Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 2013
-
10 oct. 2009 à 11:30
Bonjour,
je n'arrive pas à me connecter à ma BD pourtant mon code semble être correct. Le voici :
Public cn As New ADODB.Connection
Public Sub connect()
Set cn = New ADODB.Connection
cn.Provider = "microsoft.jet.oledb.4.0"
cn.ConnectionString = App.Path & "\BD\MaBD.mdb"
cn.Open
End Sub
Il m'affiche une erreur comme quoi le chemin n'est pas valide (pourtant il l'est).
cs_ghuysmans99
Messages postés3982Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 201316 10 oct. 2009 à 11:30
Public cn As New ADODB.Connection
Public Sub connect()
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BD\MaBD.mdb;User Id=admin;Password=;"
cn.Open
End Sub 'Connect