grrr
this is it
Missed a line
================================
function weekOfMonth(date)
{
weekStart = 1 - DayOfWeek(DateFormat(date, "yyyy-mm-") & "1");
week = 0;
for (i=weekStart; i LTE DaysInMonth(date); i=i+1)
{
if ((i+DayOfWeek(Date)) MOD 7 EQ 0)
{week = week + 1;}
if (DateFormat(date,"d") EQ i)
{break;}
}
return week;
}
=================================
Regards
Steve Onnis
Domain Concept Designs
+61 422 337 685
+61 3 9431 4249
http://www.domainconceptdesigns.com <http://www.domainconceptdesigns.com/>
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
http://www.cfcentral.com.au
<http://www.cfcentral.com.au/> [EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]>
("If you think it can't be done, you haven't asked me!") - Steve Onnis
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Steve Onnis
Sent: Friday, February 14, 2003 11:33 PM
To: CFAussie Mailing List
Subject: [cfaussie] Nice UDF
Handy little UDF to work out what week of the month a date is
Thought I would post it for ye group
-----------------------------------------------
function weekOfMonth(date)
{
weekStart = 1 - DayOfWeek(DateFormat(date, "yyyy-mm-") & "1");
week = 0;
for (i=weekStart; i LTE DaysInMonth(date); i=i+1)
{
if (i MOD 7 EQ 0)
{week = week + 1;}
if (DateFormat(date,"d") EQ i)
{break;}
}
return week;
}
-----------------------------------------------
Regards
Steve Onnis
Domain Concept Designs
+61 422 337 685
+61 3 9431 4249
http://www.domainconceptdesigns.com <http://www.domainconceptdesigns.com/>
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
http://www.cfcentral.com.au
<http://www.cfcentral.com.au/> [EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]>
("If you think it can't be done, you haven't asked me!") - Steve Onnis
---
You are currently subscribed to cfaussie as: [EMAIL PROTECTED]
To unsubscribe send a blank email to [EMAIL PROTECTED]
MX Downunder AsiaPac DevCon - http://mxdu.com/
---
You are currently subscribed to cfaussie as: [email protected]
To unsubscribe send a blank email to [EMAIL PROTECTED]
MX Downunder AsiaPac DevCon - http://mxdu.com/
