NOMBRE DE JOURS DANS LE MOIS
Mindiell
Messages postés
558
Date d'inscription
jeudi 25 juillet 2002
Statut
Membre
Dernière intervention
5 septembre 2007
-
6 mai 2005 à 11:14
Mindiell Messages postés 558 Date d'inscription jeudi 25 juillet 2002 Statut Membre Dernière intervention 5 septembre 2007 - 6 mai 2005 à 11:14
Mindiell Messages postés 558 Date d'inscription jeudi 25 juillet 2002 Statut Membre Dernière intervention 5 septembre 2007 - 6 mai 2005 à 11:14
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/8634-nombre-de-jours-dans-le-mois
https://codes-sources.commentcamarche.net/source/8634-nombre-de-jours-dans-le-mois
6 mai 2005 à 11:14
function JoursDuMois()
d1 = Date()
d2 = d1 + 30
d3 = 30-(day(d2)-day(d1))
'Exceptions à cause du mois de Février
if d3=0 OR d3=60 then
JoursDuMois = 31
else
JoursDuMois = d3
end if
end function
Et voilà ^^