Re: Formulaire + date

Posté par drcharly93 le 12/10/2004 15:30:01
Bonjour,

et si vous voulez calculer la date avec
nDate est un entier  
nDateDebut est un entier = <Date de debut>
POUR i=1 A nbrCopie
        nDate = DateVersEntier(nDateDebut+(i-1))
        <Fichier>.<RubriqueDate>=EntierVersDate(nDate)
	<Fichier>.<Rubrique1>= <Saisie1>
	<Fichier>.<Rubrique2>= <Saisie2>
        ...
        <Fichier>.<RubriqueN>= <SaisieN>
	HAjoute(Fic_client)
FIN

nDate = DateVersEntier(nDateDebut+(i-1))
j'utilise un entier pour prévoir les changement de mois ou d'année
-1 car la boucle commence à 1 etla date de debut n'a pas besoin d'être incrémentée.

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1376&post_id=5604