FREEDEV : Liste des code gratuits windev, webdev ou windev mobile

FREEDEV

Les codes free de FreeDev

Comment gerer les apostrophes dans HFiltre() ?

Voici un exemple de 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

RECHERCHE

Code

**************

Développons ensembles