Question

请问这段ASP代码日期的问题

<div class='slide_content'><div class='tabslider'>
<ul>
<div id="content">
<dt id="entry-list" style="display: block;">
<%set rs1=server.createobject("ADODB.Recordset")
sql1="select Top 50 ID,Title,ClassID,ArtDescription,DateAndTime,CopyFrom,author from "&tbname&"_Article

where yn = 0 order by DateAndTime desc,ID Desc"
rs1.open sql1,conn,1,3
If Not rs1.Eof Then
do while not (rs1.eof or err)
%>

<dl><h3 class="title"><a href="<%=m_apath(rs1("ID"),0)%>"><%=rs1("Title")%></a></h3><h4

class="updated"></h4>
<div class="description"><%=left(LoseHtml(rs1("ArtDescription")),100)%>…</div>
<div class="actions"><a href="tel:<%=rs1("author")%>" class="link3"><font color="#111111"><b><%=rs1

("author")%></b></font></a><span><font color="#ff8800"><%=rs1("CopyFrom")%></font></span><span><font color="#009933"><

%=getclass(rs1(2),"classname")%></font></span><span class="goto-top"><%=month(rs1("DateAndTime"))%>-<%=day(rs1

("DateAndTime"))%></span></div></dl>
<%
rs1.movenext
loop
end if
rs1.close
set rs1=nothing
%>

</dt></div>

</ul>

这一段代码是日期：
<span class="goto-top"><%=month(rs1("DateAndTime"))%>-<%=day(rs1

("DateAndTime"))%></span>

如何实现当天发布的文章显示日期是红色状态，求大神。
还有这一段：
<span class="goto-top"><%=month(rs1("DateAndTime"))%>-<%=day(rs1("DateAndTime"))%></span></div></dl>

麻烦大神看看这个页面的代码，一个是首页的 一个是列表的
希望2个页面 当天发布的文章 日期显示是红色，过了当天 日期自动变成黑色。

Answer 1

<%if datediff("d",now,rs1("DateAndTime"))=0 then%>
<span class="goto-top"><font color="#FF0000"><%=month(rs1("DateAndTime"))%>-<%=day(rs1("DateAndTime"))%></font></span></div></dl><%else%>
<span class="goto-top"><%=month(rs1("DateAndTime"))%>-<%=day(rs1("DateAndTime"))%></span></div></dl>

<%end if%>

追问

还有这一段好像不行，因为 这个是
-

追答

按我上面改就行了,rs1("DateAndTime") 改成rs(2,i)