Bonjour,

je suis en train de construire une BD devant être manipulé (ajout , edit ,...) par formulaire.

J'ai donc créé un formulaire permettant au user d'ajouter une ligne à une table.
L'ajout est déclenché par un bouton, mais lors de l'exécutions, ACCESS m'indique un code erreur 424 objet requis.


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
 
 
Private Sub BTN_VALIDER_AJOUT_Click()
Me.Requery
Dim req1 As String
 
 
req1 = "INSERT INTO SUIVI_EQUIPEMENT (Zone, FIN, Description, Code, PN, CMS, SN, MOD, CROQUIS, ATA, MODELE, Vendor )" _
& "VALUES (" & txt_ZONE.Text & "," & txt_FIN.Text & "," & txt_DESCRIPTION.Text & "," & LST_FOURNISSEUR.Text & "," & txt_PN.Text & "
," & txt_CMS.Text & "," & txt_SN.Text & "," & txt_MOD.Text & "," & txt_CROQUIS.Text & "," & txt_ATA.Text & "," &  txt_AVION.Text & "," & txt.VENDOR.Text & ");"
 
 
DoCmd.RunSQL req1
 
BTN_VALIDER_AJOUT.Enabled = False
EQUIPEMENT_AJOUT.Visible = False
 
 
 
End Sub
Les champs de texte sont tous créés, et la syntaxe à été vérifiée, et ma table autorise les champs vide pour tous les attributs.

Quelqu'un a -t-il un idée ?