Discussion :

[Terminator]

Bonjour,

voila, je n'arrive pas à excuter uen requete SQL sous VBA (fourni ds ACCESS)

voila ma requete:
Dim SQL As String

Code :

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

1
2
3
    SQL = "INSERT INTO ListeStagiaires VALUES(NumRAC,NomStagiaire.Value,LieuFormation.Value,Secteur.Value,DateInRAC,DateOutRAC,DateInFormation,DateOutFormation,Employeur.Value,NomFormateur.Value,NextInFormation,DateVCA,ResponsableFormation.Value);"
 
    DoCmd.RunSQL SQL

J'utilise des zone de txt et des liste
ou encore celle-ci:

Code :

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

1
2
3
4
5
Dim SQL As String
 
 SQL = "SELECT * FROM Stagiaire"
 
 DoCmd.RunSQL (SQL)

J'ai un message du genre:
"Erreur d'exécution '2342'
Une action ExécuterSQL nécissite un argumentconsistant en une instruction SQL"

L'erreur pointe sur le DoCMS.runSQL(SQL)

MERCI DE VOTRE AIDE

PS: lorsque j'exécurer la requete normalement (en créanr une requete hors VBA), sa fonctionne en donnant les valeurs exacte

[cafeine]

Hello,

on ne peut pas exécuter un SQL de sélection, ça ne marche que pour les SQL Action :

• INSERT
• UPDATE
• DROP
• ALTER
• etc. (si j'en ai oublié)

[Terminator]

Merci

Mais pour le select, j'avais juste fait ca pour tester (mais si tu me dis que ca sert a rien )

Mais celle que j'essaie de faire est la premiere (INSERT)

Merci d'avance pour votre aide

[Gary_Stoupy]

Bonjour,

Pour commencer ta requête d'insertion ne peut pas fonctionner pour la bonne raison que les valeurs que tu lui dis d'insérer sont des variables...

Code :

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

SQL = "INSERT INTO ListeStagiaires VALUES(" & NumRAC & ", '" & NomStagiaire.Value & '", etc.....)

Ca fonctionnera déjà mieux comme ça mais je ne pense pas que ce soit à l'origine de ton probleme (quoique...)

[Toftof]

Si tu dis où tu veux mettre les choses, ça peux aider:

Code :

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

1
2
3
 
INSERT INTO TableDest(ChampDest)
VALUES ('ValeurInitiale');

[cafeine]

Ton SQL d'INSERT est faux.

Tu mélanges variable et chaîne.

Code :

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

DoCmd.RunSQL "INSERT INTO Table Values (UneVariable, UnControl)"

va planter ...

Tu augmentes tes chances en faisant comme ça :

Code :

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

1
2
DoCmd.RunSQL "INSERT INTO Table Values (""" & UneVariableChaine & """, " & _
  UneVariableNumerique & ")"

Il faut sortir les variables de la chaine SQL pour que leur valeur soit évaluée.