<% set rs=server.CreateObject("adodb.recordset") rs.Open "select top 5 * from cq_Release_purpose where clss=184 order by id desc",conn,1,1 if rs.RecordCount>0 then do while not rs.eof %>
◆
"> <%if len(rs("title"))>80then response.write (left(rs("title"),80)) response.write "..." else response.write (rs("title")) end if %>
<%if rs("isnew")="1" and rs("isdate")>date then%>
<%end if%> <%if rs("ishot")="1" and rs("isdate")>date then%>
<%end if%>
<%=rs("newdate")%>
<% rs.movenext loop %> <% else %>
目前没有信息！
<% end if %>
更多>>
<%end if%>
<%if rs("ishot")="1" and rs("isdate")>date then%>
<%end if%>
