# days left from date

hi, i need a bit of code that will count down from 90 days from a
<%=objRS("Date")%> section in a database.

any ideas?

This?

dim d, d2
d = objRS("Date")
if not isnull(d) and isdate(d) then
d2 = dateadd("D", 90, d)
response.write d2
else
response.write "Null or invalid date"
end if

quite possibly. I need to show the date on the page as well as the '# days left' so whats the code for the if i wanted to say:

for example.

'you have 84 days left'

thanks

How about this?

dim d, d2, daysLeft
d = objRS("Date")
if not isnull(d) and isdate(d) then
d2 = dateadd("D", 90, d)
daysLeft = datediff("D", Date(), d2)
response.write "You have " & daysLeft & " days left."
else
response.write "Null or invalid date"
end if

let me try it..

so it counts from the 'Date' Value?

so if the date that the entry was added was '01/01/01' and the date of viewing was '02/01/01' it would show 89 days left?

thats great, thanks