30-06-2011, 11:15 AM
Comment gerer les apostrophes dans HFiltre() ?
voici le code
voici le code
Code :
//Appel de la procedure Recherche_Fiche(Recherche_Fiche("L architecte")
FONCTION Recherche_Fiche(Emploi)
StF est une chaîne
StF = HFiltre(fiche,"ClefNom = "+Remplace(Emploi," ","\ ")+" ")
HLitPremier("fiche",StF)
Trouve = H.Trouve
HDesactiveFiltre("fiche")
RENVOYER Trouve