Re: Fenêtre de recherche

Posté par R&B le 21/1/2004 15:59:32
OK, Je vous ai fait passé un mail...
sinon la lecture du résultat de votre requete n'est effectivement pas bon.

je m'explique, pour remplir la table par programmation (contraitement à ma première explication qui était des plus rapides...) il faut parcourir Toutes les lignes de REQ_TROUVER_CLIENT et utiliser une table mémoire (non alimentée avec les données d'un fichier).

Attention n'utiliser hExecuteRequete qu'une unique fois...

// dans le bouton une erreur d'execution de la requete abandonne le traitement
SI PAS HExécuteRequête(REQ_TROUVER_CLIENT) ALORS RETOUR
// vide la table
tablesupprimetout(Tab_ListCLi)
// Parcours du résultat de la requete.
HLitPremier(REQ_TROUVER_CLIENT)
TANTQUE PAS HEnDehors(REQ_TROUVER_CLIENT)
   // Ajoute la ligne dans la table
   tableajouteligne(Tab_ListCLi,...
   REQ_TROUVER_CLIENT.NomClient,...
   REQ_TROUVER_CLIENT.PrenomClient,...
   REQ_TROUVER_CLIENT.TypeClient)
   // résultat suivant
   HLitsuivant(REQ_TROUVER_CLIENT)
FIN
// calcul du nombre de lignes
Lb_NbResult = TableOccurrence(Tab_ListCLi)


voila...
C'est la méthode de programmation la moins rapide mais bon.

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=5&topic_id=506&post_id=1766