WDForge.org - Forums

Re: cree des feuilles horaires

Sujet: Re: cree des feuilles horaires
par drcharly93 sur 18/8/2006 10:17:10

Bonjour,

Voici un exemple simple en manipulant le masque d'affiche d'une date

Dans cette portion de code on ajoute dans la base des date au format AAAAMMJJ

//Ici on on a déjà testé si il fallait créer le planing
i est un entier
dDateEnCours est une Date
dDateFin est une Date

dDateEnCours..Jour = 1    //Premier jour du mois
dDateFin..Jour = 31	//Défini le dernier jour du mois 31 donner automatiquement 28 pour le mois de février

POUR i = 1 A dDateFin..Jour
	dDateEnCours..Jour = i 
	HAjoute(Table1, dDateEnCours)
FIN

Dans la table d'affichage :
La colonne qui doit afficher ex: 'Mardi 01' devra être de type date
Valeur retournée : AAAAMMJJ
Masque de saisie : JJJJ JJ
Note:
JJJJ -> jour en lettre
JJ -> Numéro du jour sur 2 caractères