Discussion :

[Husqvarna]

bonjour,

Je fais une connexion en vb6 à Access. J'ajoute le module "Microsoft ActiveX Data Objects 2.x Library", j'ai essayé les version 2.0 à 2.8, et il ne reconnait pas "ADODB.Recorset".

Par contre pour ADODB.Connection c'est bon.

j'ai le message suivant :

---------------------------
Microsoft Visual Basic
---------------------------
Compile error:

User-defined type not defined
---------------------------
OK Aide
---------------------------

Merci de me dire ce que j'ai oublié.

Bonne journée

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
    'connection
    Dim con As ADODB.Connection
    Set con = New ADODB.Connection
 
    con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Text_db.text + ""
   Dim rs As ADODB.Recorset
    Set rs = New Recordset  
 
 con.Open
    rs.Open " INSERT INTO 'MaTable'... , con, AdopenDynamic, AdLockOptimistic"
 
    'close
    rs.Close
    con.Close
    'free memory
    Set rs = Nothing
    Set con = Nothing

[sovo]

ton probleme ce trouve a ce niveau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim rs As ADODB.Recorset
Set rs = New Recordset

remplace le plutot par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim rs As ADODB.Recorset
Set rs = New ADODB.Recordset

[SfJ5Rpw8]

manque pas un d ?

ne reconnait pas "ADODB.Recorset

[Husqvarna]

manque pas un d ?

je crois pas...

[sovo]

apparement ton probleme est resolu. Mais prend aumoins la peine de nous le faire savoir.