<%sub main_summary()

sql="select top "&mainsummary&" summary_id,summary_title,summary_date,summary_count from summary order by summary_date ASC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" style="border-collapse: collapse">
<%
do while not rs.eof
%>
  <tr> 
    <td height="20"><img src="images/pic/star.gif" width="12" height="12" border="0"> <a href="showsummary.asp?summary_id=<%=rs("summary_id")%>" title="發(fā)表于<%=rs("summary_date")%>,已經(jīng)被閱讀<%=rs("summary_count")%>次。" target="_blank"> 
      <%if len(rs("summary_title"))>10 then
 response.write ""&left(rs("summary_title"),8)&"..."
else
 response.write ""&rs("summary_title")
end if%>
      </a></td>
  </tr>
  <%
rs.movenext
loop
if rs.eof and rs.bof then
%>
  <tr> 
    <td align="center">暫時沒有文章！</td>
  </tr>
  <%end if%>
</table>
<%
rs.close
set rs=nothing
end sub
%>