Erreur 3061, trop peu de paramètresRésolu

Question

bonjour tout le monde, 

je suis débutant dans le monde de VB, donc pardonné moi si c'est vraiment bête ce que je raconte.

Je suis en train de faire un petit programme qui lit une base de donnée sous Access. 

Mon problème est lorsque je veux enregistrer une nouvelle valeur dans une table, il me dis l'erreur suivante

Erreur d'exécution '3061':
trop peu de paramètres. 19 attendu.

voici le code:

Private Sub Command2_Click()





'MsgBox (txtnom)
'MsgBox (txtnompc)
'MsgBox (txtip)
'MsgBox (txtlieu)
'MsgBox (txttype)
'MsgBox (txtprocesseur)
'MsgBox (txtcadence)
'MsgBox (txtmemoire)
'MsgBox (txtdisquedur)
'MsgBox (txtndeserie)
'MsgBox (txtdateachat)
'MsgBox (txtprixachat)
'MsgBox (txtvaleurht)
'MsgBox (txtproprietaire)
'MsgBox (txtentite)
'MsgBox (txtfournisseurs)
'MsgBox (txtobservations)
'MsgBox (txtgarantie)
'MsgBox (txtfacture)




 





db.Execute (" INSERT INTO caracteristiques_des_postes ( Nom, NomPC, IP, Lieu, Type, Processeur, Cadence, Mémoire, Disque_dur, N°_de_série, Date_achat, Prix_achat, Valeur_HT, Propriétaire, Entité, Fournisseurs, Observations, Garantie, Facture )VALUES (txtnom, txtnompc, txtip, txtlieu, txttype, txtprocesseur, txtcadence, txtmemoire, txtdisquedur, txtndeserie, txtdateachat, txtprixachat, txtvaleurHT, txtproprietaire, txtentite, txtfournisseur, txtobservations, txtgarantie, txtfacture)")




 



End Sub


Quand j'ai fais les MsgBox, il m'affiche les valeurs que j'ai mis dans case à renseigner.

Pouvez vous m'aider ?
Merci

Dani

jrivet · Accepted Answer

Salut,

Salut,
Essaie ceci

db.Execute (" INSERT INTO caracteristiques_des_postes ( Nom, NomPC, IP, Lieu, Type, Processeur, Cadence, Mémoire, Disque_dur, N°_de_série, Date_achat, Prix_achat, Valeur_HT, Propriétaire, Entité, Fournisseurs, Observations, Garantie, Facture )VALUES " & _
"(" & txtnom & "," & txtnompc & "," & txtip & "," & txtlieu & "," & txttype & "," & txtprocesseur & "," & txtcadence & "," & txtmemoire & "," & txtdisquedur & "," & txtndeserie & "," & txtdateachat & "," & txtprixachat & "," & txtvaleurHT & "," & txtproprietaire & "," & txtentite & "," & txtfournisseur & "," & txtobservations & "," & txtgarantie & "," & txtfacture & ")")

Le mieux pour tester tes requete c'est 
Dim Requete as string
requete = " INSERT INTO caracteristiques_des_postes ( Nom, NomPC, IP, Lieu, Type, Processeur, Cadence, Mémoire, Disque_dur, N°_de_série, Date_achat, Prix_achat, Valeur_HT, Propriétaire, Entité, Fournisseurs, Observations, Garantie, Facture )VALUES " & _
"(" & txtnom & "," & txtnompc & "," & txtip & "," & txtlieu & "," & txttype & "," & txtprocesseur & "," & txtcadence & "," & txtmemoire & "," & txtdisquedur & "," & txtndeserie & "," & txtdateachat & "," & txtprixachat & "," & txtvaleurHT & "," & txtproprietaire & "," & txtentite & "," & txtfournisseur & "," & txtobservations & "," & txtgarantie & "," & txtfacture & ")"
Msgbox Requete
 

De cette facon tu verifie que les valeurs soient correct.
Ensuite il faut etre sur d'inserer le meme nombre de valeur qu il y a de colonne (lors d'une insertion (sauf si les champs sont optionnel) il faut remplir TOUTE les colonnes)

@+,   Ju£i?n

jrivet · Answer

Re,


J'allais oublier,


Si ce sont des champs de type text, il est possible que tu soit , lors de l'insertion, oblige d'entourer les valeurs par des apostrophes '


soit : ....  & "'
,'
" & txtentite & "'
,'
" 






@+,   Ju£i?n

danytoss · Answer

Merci Julien, 

je vais essayer ce que tu viens de me dire.

Je te tiens au courant

Merci
Dany

danytoss · Answer

Merci Julien ça fonctionne.

A++

Dany

Erreur 3061, trop peu de paramètres

4 réponses

Votre réponse

Discussions similaires