tuijian.asp

来自「雨后文章系统V10.04 演示http://dajia.cashome.com/」· ASP 代码 · 共 21 行

<table>
		<tr>
          <td align="center" valign="top" scope="row"><img src="img/tuijian.gif"><br><br></td>
        </tr>
		<%
		  dim rsb
		  set rsb=server.CreateObject("ADODB.recordset")
		  rsb.open "select  top 8 * from article where tuijian=1 order by date desc",conn
		  %>
		  <%
		  while not rsb.eof
		  %>
		  <tr><td align="left">
		  ◆<a href="sort1.asp?articleid=<%=rsb("articleid")%>"><%=rsb("title")%>(<%=rsb("date")%>)</a>
		  </td></tr>
		  <%
		   rsb.movenext
		   wend
		   %>
		</table>
		<%rsb.close%>