Discussion :

[stan314]

Salut tout le monde,

Alors j'ai ce code dans mon application , et il me met une erreur : Erreur de syntaxe dans la clause FROM...
Je ne sais pas pourquoi j'ai cette erreur si quelqu'un pourrait m'aider.

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub CSupprimer_Click()
Dim rep As Integer
Dim Rsql As String
Dim rst As Recordset
 
Rsql = "SELECT DISTINCTROW [NOM_SECTEUR],[NUMÉRO_RÉSERVATION] FROM RESERVATION"
Rsql = Rsql & "WHERE [NOM_SECTEUR]= '" & Me.Liste_Secteurs & "'" & ";"
Set rst = CurrentDb.OpenRecordset(Rsql)

Merci d'avance pour votre reponse

stan314

[Meduse]

Mets un

Code :

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

Msgbox Rsql

a la place de la derniere ligne et tu vas comprendre tout de suite.

[OtObOx]

Salut,

je pense qu'il manque un espace après RESERVATION.
Essaye:

Code :

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

1
2
Rsql = "SELECT DISTINCTROW [NOM_SECTEUR],[NUMÉRO_RÉSERVATION] FROM RESERVATION "
Rsql = Rsql & "WHERE [NOM_SECTEUR]= '" & Me.Liste_Secteurs & "';"

kenavo,

JM

edit: Grilled par Meduse !