ajouter dans une table

je réalise une gestion d'absence vb access mais le boton ajouter qui ajoute dans la table absence me donne le msg suivant:

Citation:

---

erreur d'execution '424':
un objet est requit

---

voici le code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

chj1 = Trim(liste5.text) reqaj = "insert into absencea (ref_option) values(" & chj1 & ")" chj2 = Trim(liste6.text) reqaj2 = "insert into absencea (semestre) values(" & chj2 & ")" chj3 = Trim(liste4.text) reqaj3 = "insert into absencea (nom_element) values(" & chj3 & ")" chj4 = Trim(liste5.text) reqaj4 = "insert into absencea (ref_option) values(" & chj4 & ")"   While Not (rs.EOF) List5.text = rs!ref_option list6.text = rs!semestre List3.text = rs!cne List4.text = rs!nom_element List2.text = rs!séance Option1.Caption = rs![absence_justifier] Option2.Caption = rs![absence_justifier] text.Value = rs![date_absence] Combo1.text = rs![observation] Wend rs.Close

---

aider moi :cry::cry::cry:

Tu précises pas sur quel ligne tu as l'erreur?

En général, l'erreur 424 apparait lorsqu'on utilise une variable qui est null.
dans ton cas, cela peut se produire si rs est null, vide ou nothing

Et a priori tes requêtes SQL sont bizarres si tu les exécutes tel quel tu vas avoir une ligne dans la table avec chaque information.
Il faut les mettre dans une seul ligne et gérer le cas ou une valeur est vide ou non renseigné.. et de même que si les zones sont du texte les mettre entre quote.