Re: Fenêtre de recherche
Posté par drcharly93 le 23/1/2004 11:36:13
Bonjour AngelMJ,
J'ai pas pris le temps de lire le fil de la discussion, mais voici une idée.
Tu creer un champs de Saisie pour la recherche 'RECH_Client'
tu créer une table vierge 'tbl_Clients'
tu Créer un bouton pour la recherche 'cmdRecherche'
ru créer un libellé pour le nombre de ligne retournées 'lblNbLignes'
dans le code du bouton cmdRecherche
Voir l'aide en ligne sur le mot clé ConstruitTableFichier pour l'amélioration d l'affichage et de la présentation de la table.
voila un exemple simple ou il ne te reste qu'a modifier le nom du fichier, le contenu des rubriques et la condition
J'ai pas pris le temps de lire le fil de la discussion, mais voici une idée.
Tu creer un champs de Saisie pour la recherche 'RECH_Client'
tu créer une table vierge 'tbl_Clients'
tu Créer un bouton pour la recherche 'cmdRecherche'
ru créer un libellé pour le nombre de ligne retournées 'lblNbLignes'
dans le code du bouton cmdRecherche
Rs est une source de donnees
Sql est une chaine
sFichier est une Chaine = "Clients"//Nom du fichier source
sRubrique est une chaine "Nom, Prenom" //Liste des rubrique à afficher dans la table
sCondition est une chaine = " WHERE Nom LIKE '" +REC_Client + "%'"
sTri est une chaine = " ORDER BY Nom"
Sql = "SELECT " + srubrique + " FROM " + sCondition + sTri
SI PAS HexecuteRequeteSQL(Rs,hRequeteDefaut,Sql) ALORS
ERREUR(HerreurInfo())
RETOUR
FIN
TableSupprimeTout("tbl_Clients")
ConstruitTableFichier(Rs,"tbl_Clients")
lblNbLigne="["+tbl_Clients..Occurrence+"] Client(s) trouvé(s)"
Voir l'aide en ligne sur le mot clé ConstruitTableFichier pour l'amélioration d l'affichage et de la présentation de la table.
voila un exemple simple ou il ne te reste qu'a modifier le nom du fichier, le contenu des rubriques et la condition
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=5&topic_id=506&post_id=1802