nRechPers est un entier = Combo_Personnel
FichieVersEcran (Menu,Personnel)
HLitRecherche(Personnel,IDPersonnel,nRecherchePers)
SI HTrouve() ALORS
FichierVersEcran()
OuvreFille(Fiche_Personnel,nRechPers)
SINON
Erreur("Aucune fiche ne correspond")
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=3572&post_id=15091