Re: Requête / Critères
Posté par drcharly93 le 9/12/2005 0:55:34
Ok,
je vais tenter une approche.
Les Dates peuvent être sélectionnées à partir d'une fenêtre calendrier que vous trouverez dans les fenetres prédéfinies.
exemple pour récuperer la date à partir de la sélection dans la fenetre
txtDateDebut et txtDateFin sont des champs de saisie de type date
Pour récupérer les dates à partir d'une fenêtre,L'appel peut être fait à partir d'un bouton qui appel la fentêtre calendrier
Pour la sélection de l'état les valeurs pour être insérées dans une combo
Création de la requête
Vous pouvez alimenter une table memoire et ensuite créer via l'assistant un état à partir du contenu de la table
Le code à été saisie à la volée et peu comporter des erreurs.
je vais tenter une approche.
Les Dates peuvent être sélectionnées à partir d'une fenêtre calendrier que vous trouverez dans les fenetres prédéfinies.
exemple pour récuperer la date à partir de la sélection dans la fenetre
txtDateDebut et txtDateFin sont des champs de saisie de type date
//Pour initialiser les champs dates avecla date du jour
txtDateDebut = DateSys()
txtDateFin = DateSys()
Pour récupérer les dates à partir d'une fenêtre,L'appel peut être fait à partir d'un bouton qui appel la fentêtre calendrier
txtDateDebut = Ouvre(Calendrier)
txtDateFin = Ouvre(Calendrier)
Pour la sélection de l'état les valeurs pour être insérées dans une combo
//Initilisation de la combo cmbEtat
ListeAjoute(CmbEtat,"Réalisé")
ListeAjoute(cmbEtat,"Non Réalisé")
ListeAjoute(cmbEtat,"En Cours")
//Pour sélectionner par défaut le premier élément de la liste
listeselectplus(cmbEtat,1)
Création de la requête
Rs est une source de données
pEtat est une chaine = cmbEtat..ValeurAffichée
pDateDebut est une chaine = txtDateDebut
pDateFin est une chaine = txtDateFin
SQL = "SELECT Titre, Descriptif, DateTache, Etat FROM FichierTaches WHERE Etat = '" + pEtat + "' AND DateTache Between '" + pDateDebut + "' AAND '" + pDateFin + "'"
Si Pas HExécuteRequêteSql(Rs,HRequeteDefaut,Sql) Alors
Erreur(HErreurInfo())
Retour
Fin
Vous pouvez alimenter une table memoire et ensuite créer via l'assistant un état à partir du contenu de la table
//Pour alimenter la table
TableSupprimeTout(Table)
Pour Tous Rs
TableAjoute(Table,Rs.Titre+TAB+Rs.Descriptif+TAB+Rs.DateTache+TAB+Etat)
Fin
Le code à été saisie à la volée et peu comporter des erreurs.
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=3182&post_id=13454