Calendrier - Mois courant et mois suivant [Résolu]

fionalabelle 14 Messages postés mercredi 25 janvier 2006Date d'inscription 25 août 2006 Dernière intervention - 5 mai 2006 à 08:34 - Dernière réponse : nickadele 1253 Messages postés mercredi 7 août 2002Date d'inscription 10 avril 2013 Dernière intervention
- 5 mai 2006 à 17:51
Salut à vous,
J’ai trouvé le code ci-dessous sur cette page, et j’aimerai le modifé de facon qu’il affiche non seulement le mois actuel, mais aussi le mois suivant. Mais je n'arrive pas à le faire. Car je suis nouvelle en ce qui concerne le language ColdFusion.


Est-ce-que quelqu’un pourrait m’aider ? <?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" />


Exemple :
Mai 2006


Juni 2006





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


fiona

<!--- 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>
Afficher la suite 

Votre réponse

5 réponses

nickadele 1253 Messages postés mercredi 7 août 2002Date d'inscription 10 avril 2013 Dernière intervention - 5 mai 2006 à 13:21
+3
Utile
Sans trop me prendre la tête, voici une petite adaptation :
le début du code jusque Body reste inchangé...
faudra certainement afgrandir la fenetre popup lors de l'appel...


<table width="100%" border="0" cellpadding="0" cellspacing="0" class="content" bgcolor="#BgMenu#">
----, <<</td>
#MonthasString(Month(dateOnClick))#,
>>,
,
<<,
#Year(dateOnClick)#,
>>

</td>
</tr>
<tr>
<td>
Su,
Mo,
Tu,
We,
Th,
Fr,
Sa,

<cfloop index=\"j\" from=\"1\" to=\"6\" step=\"1\">
----

<cfloop index=\"i\" from=\"1\" to=\"7\" step=\"1\">
<cfif (i eq J1) and (j eq 1) or (Jour GTE 1) and (Jour LT NbJ)>
<cfset Jour=Jour+1>
<cfif (Jour EQ Day(dateOnClick)) and (Mois EQ month(dateOnClick)) and (Annee EQ year(dateOnClick))>
#Jour#
<cfelse>
#Jour#
</cfif>
<cfelse>

</cfif>,
</cfloop>

</cfloop>

</td>
<td>&nbps</td>
<cfset Jour=0>
<cfset Currentdate = Dateadd('m', 1, Currentdate) />
<cfset Mois=#Month(Currentdate)#><!--- Le mois de la date du jour --->
<cfset Annee=#Year(Currentdate)#><!--- Le annee de la date du jour --->
<cfset J1=DayofWeek("#Month(Currentdate)#/01/#Year(Currentdate)#")>
<cfset NBJ=DaysInMonth(Currentdate)> <!--- Nombre de Jour --->

<td>
Su,
Mo,
Tu,
We,
Th,
Fr,
Sa,

<cfloop index=\"j\" from=\"1\" to=\"6\" step=\"1\">
----

<cfloop index=\"i\" from=\"1\" to=\"7\" step=\"1\">
<cfif (i eq J1) and (j eq 1) or (Jour GTE 1) and (Jour LT NbJ)>
<cfset Jour=Jour+1>
#Jour#
<cfelse>

</cfif>,
</cfloop>

</cfloop>

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


</html>
</cfoutput>
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de nickadele
nickadele 1253 Messages postés mercredi 7 août 2002Date d'inscription 10 avril 2013 Dernière intervention - 5 mai 2006 à 17:51
+3
Utile
fionalabelle,

pour rappel ce site est à vocation d'aider les gens qui sont bloqué face à un problème, pas de leur pondre du code source à la demande.
Donc je te répondrai tout simplement, fait une boucle itérative de 0 à 24 et le tour est joué!

Merci !

Nickadele
----------------------------------------------
non, ma belle ne s'appel pas Adèle
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de nickadele
syndrael 2382 Messages postés lundi 4 février 2002Date d'inscription 29 décembre 2012 Dernière intervention - 5 mai 2006 à 09:37
0
Utile
Bonjour,

Ma réponse ne va po te plaire, mais c'est loin d'être le bon code, il y
a des instructions obsolètes et puis c'est beaucoup de code pour pas
grand chose. Je regrette de ne po avoir le temps sinon je te le ferai,
je pense que des personnes dévouées te consacreront plus de temps que
moi. Je te conseille de tout recommencer..

S.
Commenter la réponse de syndrael
fionalabelle 14 Messages postés mercredi 25 janvier 2006Date d'inscription 25 août 2006 Dernière intervention - 5 mai 2006 à 10:16
0
Utile
bonjour syndrael,
j'avai confondue de code. C'est plutot celui ci que j'essaye de modifier pourqu'il me presente deux mois au meme moment.
Pardon aide moi, car je suis vraiement bloqué.

Merci

<cfset title="-[ Calendar ]-"><!--- Texte du titre --->
<cfset BgColor="64aaDC"><!--- Couleur de fond de page --->
<cfset bgcarac="aaa4DC"><!--- Couleur de fond de page --->
<cfset BgMenu="64aaDC"><!--- Couleur de fond pour la selection du mois et de l annee --->
<cfset BgDayAlpha="0066aa"><!--- Couleur de fond des jours en lettre --->
<cfset BgDayNumb="CCCCCC"><!--- Couleur de fond des jours en chiffre --->
<cfset WCase="30"><!--- Largeur de la case --->
<cfset HCase="30"><!--- Hauteur de la case --->


<cfparam name="dateOnClick" default="#Now()#"><!--- Date du jour, elle sera utiliser pour faire des calculs --->
<cfparam name="Currentdate" default="#Now()#"><!--- Date du jour --->
<cfset Jour=0>
<cfset Mois=#Month(Currentdate)#><!--- Le mois de la date du jour --->
<cfset Annee=#Year(Currentdate)#><!--- Le annee de la date du jour --->
<cfset J1=DayofWeek("#Month(dateOnClick)#/01/#Year(dateOnClick)#")>
<cfset NBJ=DaysInMonth(dateOnClick)> <!--- Nombre de Jour --->


<cfoutput>
<html>
<head>
<title>#title#</title>
<style>
A:visited { color: FFFFFF; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
A:hover { color: 33AA55; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
A:link { color: FFFFFF; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
A:active { color: 33AA55; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
.currentday { color: FF0000; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
.currentday:visited { color: FF0000; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
.currentday:hover { color: 33AA55; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
.currentday:link { color: FF0000; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
.currentday:active { color: 33AA55; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
.content { color: FFFFFF; font-size: 9pt; font-family: Verdana; font-weight : bold; text-decoration: none }
</style>
<script>
function dayClick() {
alert('#month(dateOnClick)#-#Jour#-#year(dateOnClick)#');
}
</script>
</head>



<table width="100%" border="0" cellpadding="0" cellspacing="0" class="content" bgcolor="#BgMenu#">
----, &lt;&lt;</td>
#MonthasString(Month(dateOnClick))#,
&gt;&gt;,
&nbsp;,
&lt;&lt;,
#Year(dateOnClick)#,
&gt;&gt;

</td>
</tr>
<tr>
<td>
Su,
Mo,
Tu,
We,
Th,
Fr,
Sa,

<cfloop index=\"j\" from=\"1\" to=\"6\" step=\"1\">
----

<cfloop index=\"i\" from=\"1\" to=\"7\" step=\"1\">
<cfif (i eq J1) and (j eq 1) or (Jour GTE 1) and (Jour LT NbJ)>
<cfset Jour=Jour+1>
<cfif (Jour EQ Day(dateOnClick)) and (Mois EQ month(dateOnClick)) and (Annee EQ year(dateOnClick))>
#Jour#
<cfelse>
#Jour#
</cfif>
<cfelse>
&nbsp;
</cfif>,
</cfloop>

</cfloop>

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



</html>
</cfoutput>
Commenter la réponse de fionalabelle
fionalabelle 14 Messages postés mercredi 25 janvier 2006Date d'inscription 25 août 2006 Dernière intervention - 5 mai 2006 à 14:20
0
Utile
Merci nickadele de ton aide.<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />





Peux-tu s’il te plait me dire avec quelle function je peux afficher toutes les heures d’un jour précis ?





Par exemple quand j’utilise la fonction hour, il ne m’affiche que l’heure actuelle, mais j’ai besoin que toutes les heures de la journée soit affiché.





Exemple :


L’heure actuelle est #TimeFormat(Now())#.


On se trouve à l’heure #Hour(Now())#, Minute #Minute(Now())#


Et Seconde #Second(Now())# de ce jour.





Resultat:


L’heure actuelle est 02:00 PM. On se trouve à l’heure 14, Minute 0 Et Seconde 57 de ce jour.





Je voudrais afficher pour aujourd’hui :


00h


01h


02h


03h


.


.


.


.


23h
Commenter la réponse de fionalabelle

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.