Discussion :

[debutantecpp]

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

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

voici le code:

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
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

[franck1530]

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.