Re: Modifier le libéllé d'un onglet en fonction de valeurs d'un fichier
Posté par drcharly93 le 2/10/2006 11:55:40
Bonjour,
Pour l'année 2 solutions
1) on récupère l'année courante et on décrément sur une boucle
Pour récupérer le nombre d'enregistrement par client via une Sql
Code saisie à la volée et pouvant comporter des erreurs
Pour l'année 2 solutions
1) on récupère l'année courante et on décrément sur une boucle
dDate est une Date
i est un entier
j est un entier
POUR i = dDate..Année - 5 A dDate..Année
//j représente le numéro de l'onglet à manipuler
j++
//i contient l'année calculée
Onglet1[j]..Libellé = i
FIN
Pour récupérer le nombre d'enregistrement par client via une Sql
Rs est une source de données
Sql est une chaine
Sql = "SELECT COUNT (IDTicket) AS NB FROM Ticket WHERE IDClient = " + varIDClient + " AND [Date] Between '" + Onglet1..Valeur + "0101" + "' AND '" + Onglet1..Valeur + "1231"
SI PAS HExecuteRequeteSQL(Rs,HRequeteDefaut,Sql) Alors
Erreur(HErreurInfo())
RETOUR
FIN
HLitPremier(Rs)
//Rs.Nb contient le nombre de ticket créer pour le client varIDClient correspondant à l'année cliquée sur l'onglet
Code saisie à la volée et pouvant comporter des erreurs
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=4615&post_id=19155