-------
fecha=date()
if rs.Fields("modificacion")=fecha then
fechi="red"
else
fechi="blue"
end if
--------
Aclaración: siempre me aparece en azul

PD: lo muestro así:
Código:
<font color="""&fechi&""">"&rs.Fields("modificacion")&"</font>