为什么小弟我这段代码没有效果

为什么我这段代码没有效果？
................

dim   c_date

if   rs( "tq_date ")   =   date()   then     <===这段。。我想要数据库的时间=今天字体就显示红色
c_date   =   "red "
else
c_date   =   "#0033cc "
end   if
...............
<td> <font   color= <%=c_date%> > <%=rs( "tq_date ")%> </font> </td>

看看我的代码是不时哪里写错了？？



------解决方案--------------------
if date(rs( "tq_date ")) = date() then