Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

pb SQL : INSERT INTO dans VB

2 réponses
Avatar
fabrizio-r
Bonjour a tous,

Je veu inserer des donne=E9 dans un table, ainsi mon code=20
est le suivant :=20

db.Execute "INSERT INTO materiel=20
(num,type,sous_type,valeur,description,nombre) VALUES "=20
& "('" & num & "','" & Replace(Combo2.List
(Combo2.ListIndex), "'", "=A6") & "','" & Replace
(Combo3.List(Combo3.ListIndex), "'", "=A6") & "','" &=20
Replace(valeur_add.Text, "'", "=A6") & "','" & Replace
(descr_add.Text, "'", "=A6") & "',' ','" & Replace
(nb_add.Text, "'", "=A6") & "');"


ce que je ne comprend pas c que vb me dis :

Runtime Error '3346' :=20

"Le nombre de valeurs de la requ=EAte doit coincider avec=20
le nombre de champs de destination"

Alors que dans ma table, j ai bien le meme nombre de=20
champs de destination.

Si quelqu'un a une id=E9=E9, je suis preneur...

Merci d'avance.

Fabrice.

2 réponses

Avatar
Eric
Bonjour Fabrizio

(descr_add.Text, "'", "¦") & "',' ','" & Replace
(nb_add.Text, "'", "¦") & "');"



tu as 2 virgules dans la chaine "',' ','" donc mets : " ','"

A+
Eric


"fabrizio-r" écrivait
news:5e1801c42dcd$0ef9e420$:

Bonjour a tous,

Je veu inserer des donneé dans un table, ainsi mon code
est le suivant :

db.Execute "INSERT INTO materiel
(num,type,sous_type,valeur,description,nombre) VALUES "
& "('" & num & "','" & Replace(Combo2.List
(Combo2.ListIndex), "'", "¦") & "','" & Replace
(Combo3.List(Combo3.ListIndex), "'", "¦") & "','" &
Replace(valeur_add.Text, "'", "¦") & "','" & Replace
(descr_add.Text, "'", "¦") & "',' ','" & Replace
(nb_add.Text, "'", "¦") & "');"


ce que je ne comprend pas c que vb me dis :

Runtime Error '3346' :

"Le nombre de valeurs de la requête doit coincider avec
le nombre de champs de destination"

Alors que dans ma table, j ai bien le meme nombre de
champs de destination.

Si quelqu'un a une idéé, je suis preneur...

Merci d'avance.

Fabrice.



Avatar
fabrizio-r
oui c'etai ca l erreur effectivement, c'est vraiment une
erreur bete, je ne comprend pas que je n'ai pas vu cela.

Merci encore.

Fabrice.

-----Message d'origine-----
Bonjour Fabrizio

(descr_add.Text, "'", "¦") & "',' ','" & Replace
(nb_add.Text, "'", "¦") & "');"



tu as 2 virgules dans la chaine "',' ','" donc


mets : " ','"

A+
Eric


"fabrizio-r"


écrivait
news:5e1801c42dcd$0ef9e420$:

Bonjour a tous,

Je veu inserer des donneé dans un table, ainsi mon




code
est le suivant :

db.Execute "INSERT INTO materiel
(num,type,sous_type,valeur,description,nombre)




VALUES "
& "('" & num & "','" & Replace(Combo2.List
(Combo2.ListIndex), "'", "¦") & "','" & Replace
(Combo3.List(Combo3.ListIndex), "'", "¦") & "','" &
Replace(valeur_add.Text, "'", "¦") & "','" & Replace
(descr_add.Text, "'", "¦") & "',' ','" & Replace
(nb_add.Text, "'", "¦") & "');"


ce que je ne comprend pas c que vb me dis :

Runtime Error '3346' :

"Le nombre de valeurs de la requête doit coincider




avec
le nombre de champs de destination"

Alors que dans ma table, j ai bien le meme nombre de
champs de destination.

Si quelqu'un a une idéé, je suis preneur...

Merci d'avance.

Fabrice.




.