Bonjour,

Je veux insérer dans une table des données venant à la fois d'une autre table et d'un formulaire.

Voici le code que j'exécute:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
list = "INSERT INTO TBLTAMPON "
    list = list & "(QID, MCSerial, ActionName, Groupe) "
    list = list & "Values(SELECT " & Me.lstchoice.Column(0) & ", " & Me.lstchoice.Column(3) & ", "
    list = list & "QUOTED_ACTIONS.ActionName, ACTIONS.Groupe "
    list = list & "FROM ACTIONS, QUOTED_ACTIONS "
    list = list & "WHERE QUOTED_ACTIONS.QID = " & Me.lstchoice.Column(0) & " "
    list = list & "AND QUOTED_ACTIONS.ActionID = ACTIONS.ActionID);"
    'list = list & "ORDER BY ACTIONS.Groupe))"
    Debug.Print list
 
    CurrentDb.Execute list
Quand je l'exécute j'ai un mesage d'erreur me retournant une erreur d'exécution en me disant qu'il y a une erreur de syntaxe dans le SELECT, il m'affiche: 'SELECT 17'. 17 étant la valeur de ma colonne 0.
Par contre quand j'effectue la requete SELECT dans une query cela fonctionne très bien.
Le problème peut-il venir que la requete retourne plusieurs ligne ?

Merci d'avance.