Wow! Thanks, Ben. Looks like a good UDF for cfLib.org!
> -----Original Message----- > From: Ben Forta [mailto:[EMAIL PROTECTED]] > Sent: Thursday, June 13, 2002 3:03 PM > To: CF-Talk > Subject: RE: Next 4 Saturdays > > > GetNextDayOfWeek() returns the next specified DOW (1-7). > GetNetxNDayOfWeek() uses the first fucntion to return a query with the > next N occurances. > Test code below. > > (I am on a slow connection, and just saw other responses come in, oh > well <g>). > > > <!--- Get the next occurrence of a DOW ---> > <CFFUNCTION NAME="GetNextDayOfWeek"> > <!--- DOW to get (1-7)---> > <CFARGUMENT NAME="dow" REQUIRED="yes" TYPE="numeric"> > <!--- Start date, defaults to today ---> > <CFARGUMENT NAME="startdate" REQUIRED="no" DEFAULT="#Now()#"> > > <!--- Get today DOW ---> > <CFSET VAR today=DayOfWeek(startdate)> > <!--- Get next occurrence of specified DOW ---> > <CFSET VAR nextday=dow-today> > <CFIF nextday LTE 0> > <CFSET nextday=nextday+7> > </CFIF> > > <!--- And return it ---> > <CFRETURN DateAdd("d", nextday, startdate)> > > </CFFUNCTION> > > <!--- Get next N occurrences of DOW (returns a query) ---> > <CFFUNCTION NAME="GetNextNDayOfWeek" RETURNTYPE="query"> > <!--- DOW to get (1-7)---> > <CFARGUMENT NAME="dow" REQUIRED="yes" TYPE="numeric"> > <!--- Number of occurrences ---> > <CFARGUMENT NAME="weeks" REQUIRED="yes" TYPE="numeric"> > <!--- Start date, defaults to today ---> > <CFARGUMENT NAME="startdate" REQUIRED="no" DEFAULT="#Now()#"> > > <!--- Create result query ---> > <CFSET VAR result=QueryNew("date")> > > <!--- Set start date ---> > <CFSET VAR tmpdate=startdate> > <!--- Loop through occurrences ---> > <CFLOOP INDEX="i" FROM="1" TO="#weeks#"> > <!--- Get next occurrence ---> > <CFSET tmpdate=GetNextDayOfWeek(dow, tmpdate)> > <!--- And add it to the query ---> > <CFSET QueryAddRow(result)> > <CFSET QuerySetCell(result, "date", tmpdate)> > </CFLOOP> > > <!--- Return the query ---> > <CFRETURN result> > > </CFFUNCTION> > > <!--- Get next Saturday ---> > <CFSET x=GetNextDayOfWeek(7)> > <CFDUMP VAR="#x#"> > > <!--- Test, get next 10 Mondays ---> > <CFSET x=GetNextNDayOfWeek(2, 10)> > <CFDUMP VAR="#x#"> > > > > > -----Original Message----- > From: Brad Roberts [mailto:[EMAIL PROTECTED]] > Sent: Thursday, June 13, 2002 2:24 PM > To: CF-Talk > Subject: Next 4 Saturdays > > > I need to display the next 4 Saturday's dates in a select box. Anyone > have any ideas for a "neat" solution? > > -Brad > > > ______________________________________________________________________ Signup for the Fusion Authority news alert and keep up with the latest news in ColdFusion and related topics. http://www.fusionauthority.com/signup.cfm FAQ: http://www.thenetprofits.co.uk/coldfusion/faq Archives: http://www.mail-archive.com/[email protected]/ Unsubscribe: http://www.houseoffusion.com/index.cfm?sidebar=lists

