salut à tous
je voudrai pouvoir effectuer une recherche dans un champs que j'ai intitulé résumé qui contient du texte l'ennui c que avec une requete simple sql je ne peux pas obtenir de resultat si ce mot recherché ne se trouve pas au début du texte.
alors ds ce site j'ai touvé la source suivante:
'txtBase est le texte dans lequel on fait la recherche,
txtRecherche est le texte que l'on désire chercher.
La fonction renvoit TRUE si le mot est trouvé, FALSE s'il n'est pas trouvé.
Source
' ------------------------------------------------------------------------
' renvoit True si le deuxième texte passé en paramètre est dans le premier
' ------------------------------------------------------------------------
Function fTexteInTexte(txtBase, txtRecherche)
Dim i
fTexteInTexte = False
i = 1
Do While (i + Len(txtRecherche) <= Len (txtBase) + 1) And fTexteInTexte = False
If LCase(txtRecherche) = LCase(Mid(txtBase, i, Len(txtRecherche))) Then
fTexteInTexte = True
End If
i = i + 1
Loop
End Function
malheureusement j'ai pas pu l'employer pour mon cas
une idée?
Merci
__youcefe