Discussion :

[niamo]

Bonjour à tous, j'ai écris une requête de mise à jour sur un table mais elle n'a aucun effet, je ne sais pas expliquer pourquoi... pouvez vous m'aider ?

Voici la requête :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Set db = CurrentDb
strSQL = "UPDATE TblCOMMANDES " & _
         "SET [ID_COMMANDE] = '" & strIdCmde & "', " & _
         "[NUM_COMMANDE]= '" & strNumCmde & "', [DATE]='" & strDateCmde & "', [ETAT]='" & strEtatCmde & "', " & _
         "[MONTANT_COMMANDE]= '" & strMontantCmde & "', [FRAIS_PORT_COMMANDE]= '" & strFraisCmde & "', " & _
         "[DATE_LIVRAISON]= '" & strDLivraisonCmde & "', [Ref_Fournisseur] = '" & strFournisseurCmde & "', [Ref_Interlocuteur]= '" & strInterlocuteurCmde & "', [Ref_Cat] ='" & strCategorieCmde & "', [Ref_Conditions_reglement]= '" & strCrCmde & "', [Document_externe]= '" & strDocExt & "';"
db.Execute strSQL

[Invité]

Bonjour

Dans ta requête SQL tu utilises systématiquement des quotes (') pour entourer tes variables.

Si je regarde donc ta requête, pour moi tous les champs sont de type texte

Alors les champs contenant des dates sont bien au format date ? Si oui, il faut utiliser des # à la place, et si tes champs sont de type numérique il ne faut mettre ni ', ni #.

Philippe

[niamo]

ok merci, tu m'avais déja évoqué ce problème la derniere fois mais je ne savais pas la syntaxe pour les autres types : ma requête est donc la suivante mais ca ne vient pas de ça enfin à moins qu'il reste des erreurs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Set db = CurrentDb
strSQL = "UPDATE TblCOMMANDES " & _
         "SET [ID_COMMANDE] = " & strIdCmde & ", " & _
         "[NUM_COMMANDE]= '" & strNumCmde & "', [DATE]=#" & strDateCmde & "#, [ETAT]='" & strEtatCmde & "', " & _
         "[MONTANT_COMMANDE]= " & strMontantCmde & ", [FRAIS_PORT_COMMANDE]= " & strFraisCmde & ", " & _
         "[DATE_LIVRAISON]= #" & strDLivraisonCmde & "#, [Ref_Fournisseur] = " & strFournisseurCmde & ", [Ref_Interlocuteur]= " & strInterlocuteurCmde & ", [Ref_Cat] =" & strCategorieCmde & ", [Ref_Conditions_reglement]= " & strCrCmde & ", [Document_externe]= '" & strDocExt & "';"
db.Execute strSQL

[niamo]

Je viens de m'apercevoir qu'il manque la clause "where", mais ça ne marche toujours pas Voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Set db = CurrentDb
strSQL = "UPDATE TblCOMMANDES " & _
         "SET [ID_COMMANDE] = " & strIdCmde & ", " & _
         "[NUM_COMMANDE]= '" & strNumCmde & "', [DATE]=#" & strDateCmde & "#, [ETAT]='" & strEtatCmde & "', " & _
         "[MONTANT_COMMANDE]= " & strMontantCmde & ", [FRAIS_PORT_COMMANDE]= " & strFraisCmde & ", " & _
         "[DATE_LIVRAISON]= #" & strDLivraisonCmde & "#, [Ref_Fournisseur] = " & strFournisseurCmde & ", [Ref_Interlocuteur]= " & strInterlocuteurCmde & ", [Ref_Cat] =" & strCategorieCmde & ", [Ref_Conditions_reglement]= " & strCrCmde & ", [Document_externe]= '" & strDocExt & "'" & _
         "WHERE [ID_COMMANDE]= " & strIdCmde & ";"
db.Execute strSQL

[niamo]

J'ai trouvé d'où venait le problème, je ne peux pas faire de SET sur la clef primaire.. J'ai donc enlevé ça et par contre seulement deux champs n'arrivent pas a ce mettre à jour et je ne sais pas pourquoi... si qulequ'un a une idée, voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
strSQL = "UPDATE TblCOMMANDES " & _
         "SET [NUM_COMMANDE]= '" & strNumCmde & "', [DATE]=#" & strDateCmde & "#, [ETAT]='" & strEtatCmde & "', " & _
         "[MONTANT_COMMANDE]= " & strMontantCmde & ", [FRAIS_PORT_COMMANDE]= " & strFraisCmde & ", " & _
         "[DATE_LIVRAISON]= #" & strDLivraisonCmde & "#, [Ref_Fournisseur]=" & strFournisseurCmde & ", [Ref_Interlocuteur]=" & strInterlocuteurCmde & ", [Ref_Cat]=" & strCategorieCmde & ", [Ref_Conditions_reglement]= " & strCrCmde & ", [Document_externe]= '" & strDocExt & "'" & _
         "WHERE [ID_COMMANDE]= " & strIdCmde & ";"
db.Execute strSQL

[Kawabaumga]

Bonjour,

quels champs ne se mettent pas à jour?
Votre clé primaire est de quel type? auto increment?

[niamo]

Ma clef primaire est de type numérique (sans auto-incrément) et les champs qui ne se mettent pas a jour sont : Ref_Fournisseur et Ref_Interlocuteur

[niamo]

c'est bon j'ai trouvé d'où venais l'erreur, un peu longue à expliquée, mais le problème est résolu, merci a vous