Discussion :

[Virgile59]

Bonjour à tous, voici le code :

Code :

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

1
2
3
4
If IsNull(Me.txtClient) Then
Else
sql = sql & "HAVING (((QS36F_ADRESS.DNOM) Like " " & Forms![frmRechClient].txtClient & " * "))"
End If

Il y a une erreur de syntaxe comme le titre l'indique...

Qqn peut m'aider ?

[tamerlan]

Je pense qu il manque des crochets et un !
remplace ca

sql = sql & "HAVING (((QS36F_ADRESS.DNOM) Like " " & Forms![frmRechClient].txtClient & " * "))"

par

Code :

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

sql = sql & "HAVING (((QS36F_ADRESS.DNOM) Like " " & Forms![frmRechClient]![txtClient & " * "]))"

c est peut etre ca

[mcdotta]

Tchô Virgile,

C'est mc...

Je pense que ce qui suit devrait jouer ...

Code :

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

1
2
 
sql = sql & "HAVING QS36F_ADRESS.DNOM Like '%" & Forms![frmRechClient]![txtClient] & "%'"

Remarque les deux apostrophes (devant et après le % afin de spécifier une chaîne de caractère....

Comme je ne sais pas si tu exécutes cette requête comme ca ou si tu utilises le code ailleurs remplace les % par * si tu n'ouvres pas un recordset ADO à partir de cette ligne de code.

Porte toi bien

MC

[Virgile59]

Code :

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

sql = sql & "HAVING (((QS36F_ADRESS.DNOM) Like '" & Forms![frmRechClient].txtClient & "*')) "

C'est OK.

Petit coucou à MC