date

[darringates]

i am trying to take a date in a date field and add the next month then get the difference in days, please help

 

[Elwin]

Dim dte as Date
Dim intDays as Integer
dte = #1/1/2004#
intDays = DateDiff("d",dte,DateAdd("m",1,dte))

-----Original Message-----
i am trying to take a date in a date field and add the

next month then get the difference in days, please help

 

[Tim Ferguson]

i am trying to take a date in a date field and add the next month then
get the difference in days, please help

It's the same as the number of days in the current month, so:

Day(DateSerial(Year(MyDate), Month(MyDate)+1,0)


Tim F