<%

if DateDiff("d",(Recordset1.Fields.Item("time").Value),now())<0 
then
response.Write("fd ")
else
%>
<%
=DateDiff("d",(Recordset1.Fields.Item("time").Value),now())
%>
<%

end if 
%>