Discussion :

[Boxtell]

Bonjour,

Je m'arrache les cheveux depuis quelques temps sur un problème, j'ai essayé beaucoup de méthodes trouvées sur le net, mais elle ne semble pas taillées pour mon problème.

Ma question est simple, qu'est ce que je doit mettre autour de cette requête SQL pour l'intégrer à un code VBA :

Code SQL :

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

1
2
INSERT INTO OF_Archivage ( OF_Num, Article_Num, OF_Qte_Initiale_Presse )
VALUES (Formulaires!Presse_75T!OF_Num, Formulaires!Presse_75T!Article_Num, Formulaires!Presse_75T!OF_Qte_Initiale_Presse);

J'ai essayé des strsql = ou autres trucs mais cela n'a jamais fonctionné... Est ce qu'il y a des choses à déclarer, où mettre les guillemets etc...

Merci
Cordialement

[nico84]

Bonjour,

On constitue d'abord une string avec une combinaison des parties fixes et des parties variables et ensuite on l'exécute

Code :

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

1
2
3
dim sr as string
Sr = "INSERT INTO OF_Archivage ( OF_Num, Article_Num, OF_Qte_Initiale_Presse ) VALUES (" & Formulaires!Presse_75T!OF_Num & "," & Formulaires!Presse_75T!Article_Num & "," & Formulaires!Presse_75T!OF_Qte_Initiale_Presse & ");"
currentdb.Execute Sr, dbFailOnError

- En cas d'erreur son n° est dans err.Number
- Si certaines des variables sont des string il faut les encadrer entre '
- Si ces strings peuvent contenir des ' il faut les doubler
- si les valeurs ont des décimales, en France il faut remplacer les , par des .
- en cas de doute : afficher Sr pour voir si elle a une bonne tête

[Boxtell]

Merci beaucoup ! Ça marche et ça me soulage !

[User]

Bonjour,

On constitue d'abord une string avec une combinaison des parties fixes et des parties variables et ensuite on l'exécute

Code :

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

1
2
3
dim sr as string
Sr = "INSERT INTO OF_Archivage ( OF_Num, Article_Num, OF_Qte_Initiale_Presse ) VALUES (" & Formulaires!Presse_75T!OF_Num & "," & Formulaires!Presse_75T!Article_Num & "," & Formulaires!Presse_75T!OF_Qte_Initiale_Presse & ");"
currentdb.Execute Sr, dbFailOnError

- En cas d'erreur son n° est dans err.Number
- Si certaines des variables sont des string il faut les encadrer entre '
- Si ces strings peuvent contenir des ' il faut les doubler
- si les valeurs ont des décimales, en France il faut remplacer les , par des .
- en cas de doute : afficher Sr pour voir si elle a une bonne tête

+1

Une liste de recommandations bien utilie pour qui souhaite rédiger une chaîne SQL