Je ne parvient pas à faire tourner ce code :
mon debug.print retourne si je met werber dans le txtauteur:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
et le DoCmd.RunSQL (SQLEnr) me retourne une erreur de syntaxe dans l'instruction CREATE TABLE :/CREATE TABLE werber AS SELECT auteur, titre FROM prets;
ça me semble pourtant bon...
merci de m'aider.
Partager