Tableau auto - calendrier

peekweek - 11 juil. 2001 à 14:52
fionalabelle Messages postés 14 Date d'inscription mercredi 25 janvier 2006 Statut Membre Dernière intervention 25 août 2006 - 4 mai 2006 à 15:15
bonjour,
je souhaite creer un formulaire automatique du mois en cours
avec la gestion des week-end, des jours de la semaine et le num de la semaine
en cfm...
merci

3 réponses

Salut
Ceci est un(des) script php pour la génération d'un calendrier que tu peux modifier facilement en cfm.

http://defis.php.free.fr/defi_php_02/
0
J'ai retrouver un code uqe j'ai fait il y a quelque temps. Il y a quelque modification à faire, mais il marche.

<!--- Initialisations --->
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<CFSET jourLettre=ListToArray("Dimanche,Lundi,Mardi,Mercredi,Jeudi,Vendredi,Samedi")>
<CFSET moisLettre=ListToArray("Janvier,Février,Mars,Avril,Mai,Juin,Juillet,Août,Septembre,Octobre,Novembre,Décembre")>

<!--- Validation des informations recus et fait la mise à jour de la date à traiter--->
<CFIF ParameterExists(traitDate) IS "No">
<CFSET traitDate=#Now()#>
<CFELSE>
<CFIF NOT IsDate(traitDate)>
<CFSET traitDate=#Now()#>
<CFELSE>
<CFSET tableauDate=#ListToArray(traitDate,"-")#>
<CFSET traitDate=CreateDate(tableauDate[1], tableauDate[2], tableauDate[3])>
</CFIF>
<CFIF ((ParameterExists(modifMois) IS NOT "No") AND (len(modifMois) GT 1) AND(#IsNumeric(right(modifMois,len(modifMois)-1))#))>
<CFIF left(modifMois,1) IS "-">
<CFSET traitDate=#DateAdd("m", -right(modifMois,len(modifMois)-1), traitDate)#>
<CFELSE>
<CFIF left(modifMois,1) IS "~">
<CFSET traitDate=#DateAdd("m", right(modifMois,len(modifMois)-1), traitDate)#>
</CFIF>
</CFIF>
<CFELSE>
<CFIF ((ParameterExists(modifAnnee) IS NOT "No") AND (len(modifAnnee) GT 1) AND (#IsNumeric(right(modifAnnee,len(modifAnnee)-1))#))>
<CFIF left(modifAnnee,1) IS "-">
<CFSET traitDate=#DateAdd("yyyy", -right(modifAnnee,len(modifAnnee)-1), traitDate)#>
<CFELSE>
<CFIF left(modifAnnee,1) IS "~">
<CFSET traitDate=#DateAdd("yyyy", right(modifAnnee,len(modifAnnee)-1), traitDate)#>
</CFIF>
</CFIF>
</CFIF>
</CFIF>
</CFIF>
<CFSET traitAnnee = #Year(traitDate)#>
<CFSET traitMois = #Month(traitDate)#>
<CFSET traitMoisNbJour = #DaysInMonth(traitDate)#>

<!--- Aller chercher les jours spécial dans la DB--->
<html>
<head>
<TITLE>Calendrier</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style>
.date { font-family: Arial, Helvetica, sans-serif; font-size: 8pt;
font-style: normal; font-weight: bold;
color: #000000;text-decoration : none;}
.erreur { font-family: Arial, Helvetica, sans-serif; font-size: 7pt;
font-style: normal; font-weight: bold; color: #FF0000;
text-decoration : none;}
.grise { font-family: Arial, Helvetica, sans-serif; font-size: 7pt;
font-style: normal; font-weight: bold; color: #AAAAAA;
text-decoration : none;}
.titre { font-family: Arial, Helvetica, sans-serif; font-size: 12pt;
font-style: normal; font-weight: bold; color: #000000;
text-decoration : none;}

</style>
<style type="text/css">
<!--

a:hover {
font-family: Arial, Helvetica, sans-serif; font-size: 8pt;
font-style: normal;
font-weight: bold;
color: #FF0000;
text-decoration : none;
}
a {
font-family: Arial, Helvetica, sans-serif;
font-size: 8pt;
font-style: normal;
font-weight: bold;
color: #000000;
text-decoration : none;
}

-->
</style>
</head>



Calendrier




<table width="210" border="0" cellspacing="1" cellpadding="1">
<!--- Ligne pour le mois --->
----,

#LSDateFormat(traitDate,\"yyyy-mm-dd\")#</CFOUTPUT>\"><

</td>
<CFOUTPUT>#moisLettre[traitMois]#</CFOUTPUT>,
#LSDateFormat(traitDate,"yyyy-mm-dd")#</CFOUTPUT>">>,

<!--- Ligne pour l'Année--->
----

#LSDateFormat(traitDate,"yyyy-mm-dd")#</CFOUTPUT>"><,
<CFOUTPUT>#traitAnnee#</CFOUTPUT>,
#LSDateFormat(traitDate,"yyyy-mm-dd")#</CFOUTPUT>">>

<!--- Ligne pour les jours de la semaines--->
Di,
Lu,
Ma,
Me,
Je,
Ve,
Sa,

<!--- DEBUT AFFICHAGE DES CELLULES DES JOURS DU MOIS --->
----

<!--- affichage des cellules vides en debut de tableau --->
<CFSET cptcel=#Evaluate((7 + DayOfWeek(CreateDate(traitAnnee,traitMois,1)) - 1) mod 7)#>
<CFLOOP index=\"i\" from=\"1\" to=\"#cptcel#\">
 ,
</CFLOOP>

<!--- flag sert a specifier qu'il s'agit de la premiere ligne --->
<CFSET flag=\"False\">

<!--- debut de boucle de 1 au nombre de jour dans le mois --->
<CFLOOP index=\"i\" from=\"1\" to=\"#traitMoisNbJour#\">
<!---commencer une nouvelle ligne lorsque l'on arrive a la 7 eme cellule (=rupture)--->
<CFSET cptcel=#Evaluate(cptcel + 1)#>
<CFIF (#Evaluate(cptcel MOD 7)# IS 1) AND (#flag# IS \"True\")>
----

</CFIF>
<CFSET flag=\"True\">
<CFOUTPUT>#i#</CFOUTPUT>,
</CFLOOP>
<!--- completer la fin du tableau par des cellules vides --->
<CFLOOP index=\"i\" from=\"1\" to=\"#Evaluate((7-(cptcel mod 7)) mod 7)#\">
 ,
</CFLOOP>



</td>
</tr>
</table>


<hr>



</html>
0
fionalabelle Messages postés 14 Date d'inscription mercredi 25 janvier 2006 Statut Membre Dernière intervention 25 août 2006
4 mai 2006 à 15:15
Salut à toi rastafa et les autres,<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />





Peux-tu me dire comment modifier le code suivant et afficher non seulement le mois actuel, mais aussi le mois qui suit le mois actuel.





Exemple :


Mai 2006





Juni 2006





Merci d’avance à tous ceux qui peuvent me repondre.





fiona
0
Rejoignez-nous