Calendar

Calendar.cfm

<cfoutput>
<table border="1" width="100%" height="100%">
   <tr>
   <cfloop index="x" from="1" to="7">
      <th>#dayOfWeekAsString(x)#</th>
   </cfloop>
   </tr>
</cfoutput>

<cfset firstOfTheMonth = createDate(year(now()), month(now()), 1)>
<cfset dow = dayofWeek(firstOfTheMonth)>
<cfset pad = dow - 1>


<tr>


<cfif pad gt 0>
   <cfoutput><td colspan="#pad#">&nbsp;</td></cfoutput>
</cfif>

<cfset days = daysInMonth(now())>
<cfset counter = pad + 1>
<cfloop index="x" from="1" to="#days#">
   <cfif x is day(now())>
      <cfoutput><td bgcolor="yellow"></cfoutput>
   <cfelse>
      <td>
   </cfif>
   
   <cfoutput>
   #x#</td>
   </cfoutput>
   
   <cfset counter = counter + 1>
   <cfif counter is 8>
      <cfoutput></tr></cfoutput>
      <cfif x lt days>
         <cfset counter = 1>
          <tr>
         </cfif>
   </cfif>
</cfloop>

<cfif counter is not 8>
   <cfset endPad = 8 - counter>
   <cfoutput>
   <td colspan="#endPad#">&nbsp;</td>
   </cfoutput>
</cfif>
</table>