Syntax CREATE TABLE

Je ne parvient pas à faire tourner ce code :

Code:

---

1 2 3 4 5 6 7 8

Private Sub btnsauver_Click() Dim SQLEnr As String   SQLEnr = "CREATE TABLE " & Replace(Me.txtauteur, "'", "''") & " AS SELECT auteur, titre FROM prets;" DoCmd.RunSQL (SQLEnr) Debug.Print SQLEnr End Sub

---

mon debug.print retourne si je met werber dans le txtauteur:

Citation:

---

CREATE TABLE werber AS SELECT auteur, titre FROM prets;

---

et le DoCmd.RunSQL (SQLEnr) me retourne une erreur de syntaxe dans l'instruction CREATE TABLE :/

ça me semble pourtant bon...

merci de m'aider.

bonjour,

Essaye :

Code:

---

SELECT auteur, titre FROM prets into werber

---

A+

bonjour,

Coici le code exacte:

Code:

---

SELECT auteur, titre into werber FROM prets

---

A+

ça ne fonctionne pas non plus.

je me demande si le problème ne vient pas de mon DoCmd.RunSQL()...

Bonjour,

Ta première syntaxe était fausse create table ...

cette version

Code:

---

1 2	SELECT prets.auteur, prets.titre INTO werber FROM prets;

---

fonctionne correctement, je l'ai utilisé dans la requête d'Access et la table werber à été crée.

A+

Super ca roule :) merci bcp :)