probleme de connection

Question

Bonjour,
je voudrai me connecter &#224; une base de donn&#233;e ACCESS via VB :
Mon code est le suivant :  

Private Sub Command2_Click()
    Dim cn As ADODB.Connection
    Dim records As ADODB.Recordset


    Set cn = New Connection
    Set records = New Recordset
    cn.Provider = "Microsft.Jet.OLEDB.4.0"
(je n'est pas encore mis connectionString et Open mais c'est pas &#231;a le probleme)

Et j'ai ce message d'erreur : "Erreur de compilation : Utilisation incorrecte du mot cl&#233; New" et j'ai bien cr&#233;e la r&#233;f&#233;rence &#224; la biblioth&#232;que Microsoft Activex Data Object 2.8 Library.
Merci de votre r&#233;ponse

borntoclimb · Answer

J'ai deja eu un probl&#233;me similaire. Essayes de referencer ADO 2.1 au lieu de 2.8.
A+
Borntoclimb

---No pasa nada...

aieeeuuuuu · Answer

salut

tu peux faire directement
dim cn as new ADODB.recordset

et ton objet et declar&#233; et instanci&#233; du meme coup !

Guizmo95 · Answer

Merci de vos r&#233;ponse, et bien, le code marche avec la d&#233;claration et l'intanciation directement :

Private Sub Command2_Click()
    Dim cn As New ADODB.Connection
    Dim records As New ADODB.Recordset 
    'Set cn = New Connection
    'Set records = New Recordset

    cn.Provider = "Microsft.Jet.OLEDB.4.0"
   ...

Merci encore

Probleme de connection

3 réponses

Discussions similaires