Discussion :

[gwenagan]

Bonjours à tous,

Dans un code comme celui-ci, comment faire pour que ma requete fonctionne si dans ma variable il y a un apostrophe ? Par exemple, ma variable (SW_SERIE) est égale à (L'instit). Faut il mettre plusieurs doubles cotes ?

Merci par avance pour votre aide.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
NEW_FILTRE = "SELECT T_FILMS.NO_ENREGISTREMENT, T_FILMS.F_GENRE, T_FILMS.F_SERIE, T_FILMS.F_TITRE, T_FILMS.F_CLASSEUR FROM T_FILMS"
 
WAND = " WHERE"
 
If Not IsNull(SW_SERIE) And SW_SERIE <> "" Then
 
NEW_FILTRE = NEW_FILTRE + WAND
NEW_FILTRE = NEW_FILTRE + " "
NEW_FILTRE = NEW_FILTRE + "T_FILMS.F_SERIE Like '" & SW_SERIE & "'"
 
WAND = " AND"
 
End If
 
If Not IsNull(SW_GENRE) And SW_GENRE <> "" Then
 
NEW_FILTRE = NEW_FILTRE + WAND
NEW_FILTRE = NEW_FILTRE + " "
NEW_FILTRE = NEW_FILTRE + "T_FILMS.F_GENRE Like '" & SW_GENRE & "'"
 
WAND = " AND"
End If
 
NEW_FILTRE = "SELECT T_FILMS.NO_ENREGISTREMENT, T_FILMS.F_GENRE, T_FILMS.F_SERIE, T_FILMS.F_TITRE, T_FILMS.F_CLASSEUR FROM T_FILMS"
 
 
Me.RecordSource = NEW_FILTRE + ";"
Me.Requery

[Sekigawa]

Tu travailles sur quoi??

[al1_24]

Il suffit de doubler l'apostrophe dans la chaîne (L'instit devient L''instit)

[gwenagan]

Bonjour et merci pour ta reponse,

Mais où dois je doubler l'apostrophe ?

A quel endroit dans ma variable ?

Merci encore de ton aide.

Sinon je travail sur un petit programme permettant de retrouver facilement un film dans des classeurs DVD.

[say]

bah dans la variable....genre un replace(var, " ' ", " '' ") mais ça dépend de ton language...quoi que ça ressemble à Access

[gwenagan]

Oui c'est bien sous Access,

Je n'y arrive pas dés que je recherche dans la zone prevue dans mon formulaire tout ce qui commence par (l'i*), cela me renvoie :

SELECT T_FILMS.NO_ENREGISTREMENT, T_FILMS.F_GENRE, T_FILMS.F_SERIE, T_FILMS.F_TITRE, T_FILMS.F_CLASSEUR FROM T_FILMS WHERE T_FILMS.F_SERIE Like ''l'*''

[say]

mais quand tu dis que ça ne fonctionne pas...
en fait, tu n'as pas les résultats attendus??? ou il y a une erreur ?

elle est correcte la requête qui t'es retourné...

[gwenagan]

En fait, quand je met le code suivant :

NEW_FILTRE = NEW_FILTRE + "T_FILMS.F_SERIE Like "" & SW_SERIE & """

et que je recherche L'I*

cela ne me renvoie rien mais ne me signale pas d'erreur.

Par contre si je met le code suivant :

NEW_FILTRE = NEW_FILTRE + "T_FILMS.F_SERIE Like '" & SW_SERIE & "'"

La fenetre de debogage s'ouvre avec erreur d'execution.

Si j'analyse le résultat dans la fenetre d'execution, voila ce que me renvoie mon code :

SELECT T_FILMS.NO_ENREGISTREMENT, T_FILMS.F_GENRE, T_FILMS.F_SERIE, T_FILMS.F_TITRE, T_FILMS.F_CLASSEUR FROM T_FILMS WHERE T_FILMS.F_SERIE Like 'l'e*'

[gwenagan]

En fait, il prend mon apostrophe pour (une simple cote) et non comme une partie du texte à rechercher.

[say]

perso, j'ai testé

Code :

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

1
2
SELECT T_FILMS.NO_ENREGISTREMENT, T_FILMS.F_GENRE, T_FILMS.F_SERIE, T_FILMS.F_TITRE, T_FILMS.F_CLASSEUR 
FROM T_FILMS WHERE T_FILMS.F_SERIE Like "l'e*"

et ça marche très bien...alors je suis un peu perplexe...

[gwenagan]

Je viens de tester avec votre requete et cela marche effectivement très bien.
Mais ce que je ne sais pas, c'est quel code vous renvoie cela :
LIKE "l'e*"

Moi cela me renvoie :
LIKE 'l'e*'

[say]

re,
je le faisais pas en code...
Comme je le supposais...ce n'est pas un problème de SQL mais un problème de VBA, qui trouve sa solution dans la FAQ adéquate :

http://vb.developpez.com/faq/?page=Bdd#apostrophe

marrant, c'est exactement ce que j'ai dit au début...même la syntaxe..

A+

[n'oublie pas le le cas échéant]

[gwenagan]

Merci à toi,

En effet tu avais raison depuis le début, mais je ne comprenais pas quoi faire de ce que tu me disais. Je ne savais pas ou placer cette fonction et je ne savais pas non plus qu'il s'agissait d'une fonction.

Je marque résolu et merci encore.