Message de rapport:
 

Re: Nb de LUNDI

Sujet: Re: Nb de LUNDI
par Machou43 sur 1/9/2006 7:51:25

C'est trés simple

//** Déclaration des Variables **
i est un entier
NbLundis est un Entier
//** Tu fais une boucle entre tes deux dates **
Pour i = DateVersEntier(DateDebut) a DateVersEntier(DateFin) PAS 1
SI DateVersJoursEnLettres(EntierVersDate(i)) = "lundi" ALORS
NbLundis++
FIN

info("Entre ces deux dates, il y a " + NbLundis + " Lundis !")
FIN
Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2