[A-03] Opération invalide sur création de table

Bonjour,

Je souhaiterai lancer une requête de création de table via une macro.
La requête est correcte (à savoir, elle s'exécute correctement lorsqu'elle est lancée en "direct"), cependant, j'obtiens une erreur 3219 / Opération invalide lorsque je l'execute via macro. L'erreur est localisée sur la ligne en gras.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub Commande4_Click() Dim Rs As DAO.Recordset Set Rs = CurrentDb.OpenRecordset("Req1") While Not Rs.EOF MsgBox Rs(0) Rs.MoveNext Wend Set Rs = Nothing End Sub

---

J'ai bien essayé de supprimer la table créée par la requête au préalable mais rien n'y fait.
J'ai fait quelques recherches ici et ailleurs mais j'ai l'impression que cette erreur est plutôt "générique" et que la résolution se fait au cas par cas!

D'avance merci.

Bonjour

Si Req1 pointe vers une requête action et pas sur une requête sélection, c'est normal que tu aies une erreur.

Peux-tu préciser Req1 et éventuellement nous en donner le code SQL?

Citation:

---

Envoyé par Pierre Fauconnier

Bonjour

Si Req1 pointe vers une requête action et pas sur une requête sélection, c'est normal que tu aies une erreur.

Peux-tu préciser Req1 et éventuellement nous en donner le code SQL?

---

Bonjour et merci pour la réponse:

Voilà la requête

Code:

---

1 2	SELECT Table1.* INTO [Table3] FROM Table2 INNER JOIN Table1 ON Table.ChampA = Table1.ChampB;

---

Il s'agit donc bien d'une requête de selection (ou alors je me gourre complétement :aie:)

Comme tu parles dans le titre d'une opération invalide sur création de table... je suis un peu perdu...

Peux-tu préciser le contexte?

Ok...:D
Alors, je crée 2 tables par import de données (format txt): table 1 et table 2.
Suite à cet import, je crée une table, table3, qui est en fait une jointure de la table 1 et de la table 2...Table 3 est créée via la requete ci-dessus!
En esperant avoir été clair! ;)

Dans le code que tu donnes, tu oublies le 2 dans On TABLE.ChampA

Cela étant

ta requête n'utilise pas la bonne syntaxe d'un requête ajout. La bonne syntaxe est

Code:

---

Insert into Table3 (champ1, champ2, ...) select table1.Champ1, table1.Champ2 from champ1 inner join Table2 on table1.champ1 = table2.champ2

---

De plus, cette requête étant une requête action (ajout), elle ne peut pas être utilisée par un objet de type RECORDSET, puisqu'elle ne renvoie pas un jeu d'enregistrement.

Pourquoi veux-tu itérer sur cette requête?

Enfin, tu dis que cette requête fonctionne "en direct" mais j'ai peine à croire qu'elle fonctionne avec le code que tu as donné.

Peux-tu donné le code sql exact de la requête utilisée en direct?

Bon alors, j'ai trouvé un moyen de contournement :mrgreen:

Il suffit de passer par un (simple):
DoCmd.RunSQL suivi de la requête et ca fonctionne parfaitement!

merci Pierre et à ceux qui m'ont lu !

Bonne fin de journée!:king: