Problème : insertion dans une BDD ACCESS avec VB
Bonjour,
Je me suis mis depuis peu à VB, et je rencontre des problemes pour l'insertion de données dans une base de donnée access en .mdb.
Je fonctionne avec VISUAL BASIC 6.0 et WINDOWS XP.
Mon formulaire VB est simple, il contient des contrôles text, des contrôles option et un bouton "enregistrer" pour pouvoir enregistrer les données dans la base une fois le formulaire rempli.
Après plusieurs heures de recherche, voici à quoi ressemble mon code :
Code:
1 2 3 4 5 6 7 8 9 10
| Private Sub Form_Load()
Dim Cnn1 As ADODB.Connection
Set Cnn1 = New ADODB.Connection
Cnn1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=maBase.mdb ;User Id=Admin; Password="
End Sub
Private Sub cmdEnregistrer_Click()
Dim MonRs As ADODB.Recordset
Set MonRs = Cnn1.Execute("INSERT INTO plante VALUES('ortie','ca pique','18','40','30','calcaire','verte','1','1','1','ortie.JPG'")
End Sub |
Le problème est le suivant : lorsque j'execute le code, j'optient un message d'erreur à la ligne :
Code:
Dim Cnn1 As ADODB.Connection
Le message d'erreur est le suivant : " compil error : User-defined type not defined".
Ma question est donc : d'où vient l'erreur ? aurais-je oublié quelque chose ?
J'attends vos réponses, merci d'avance.