Problème connexion oledb

Question

Bonjour &#224; toute et &#224; tous,

Je d&#233;bute en VB 6 (oui je sais qu'il aurait &#233;t&#233; plus malin de commencer avec VB 2005 mais les enseignements acad&#233;miques sont ainsi faits...) et j'ai un probl&#232;me lorsque je cherche &#224; &#233;tablir une connexion avec une base de donn&#233;es existante, un message d'erreur m'indique [gestionnaire de pilotes ODBC] source de donn&#233;es introuvable et nom de pilotes non sp&#233;cifi&#233;s. Sachant que les r&#233;f&#233;rences &#224; Active X data object 2.8, &#224; recordset et &#224; ADO ext 2.8 fro DLL and security ont &#233;t&#233; faites, quelqu'un peut-il m'expliquer ce qui ne va pas ?

Voici mon code
Sub main()
      
    Dim cnn As New ADODB.Connection
    Dim cat As New ADOX.Catalog
    Dim nomobjet
    
    cnn.Open "Provider='Microsoft.Jet.OLEDB.4.0';" & _
    "DataSource" = "C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\NorthwindCS.mdb"""
    Set cat.ActiveConnection = cnn
    
    For Each nomobjet In cat.Tables
        With nomobjet
            Debug.Print .Name
            Debug.Print .Type
        'Debug.Print nomobjet & "  " & nomobjet.Type
    
    End With
    Next
    
    
End Sub

Merci d'avance de vos lectures...

jpleroisse · Answer

Bonsoir,

Je crois que tes r&#233;f&#233;rences ADO et DAO, ne sont  pas correctes, c'est

Microsoft ActiveX Data Object 2.5 Library et Microsoft DAO 3.6 Object Libray



jpleroisse



Si une r&#233;ponse vous convient, cliquez R&#233;ponse Accept&#233;e.

Problème connexion oledb

1 réponse

Discussions similaires