<%
set rs=server.createobject("adodb.recordset")
sql="select top 10 * from shop_books where info>0 order by bookid desc"
rs.open sql,conn,1,1
if rs("info")=0 then
response.write "没有任何供求信息！"
else
do while not rs.eof
%>

<table border="0" cellspacing="1" width="96%">
  <tr>
    <td><%
    if rs("info")=1 then
    response.write "<b>[供应]</b>"
    end if
    if rs("info")=2 then
     response.write "<b>[求购]</b>"
     end if
     %>&nbsp;<a href="xxlist.asp?id=<%=rs("bookid")%>"><%=left(rs("bookname"),8)%></a></td>
  </tr>
  <tr>
  <td background="imagess/please_dot_2.gif"></td>
  </tr>
</table>
<%
rs.movenext
loop
end if
%>
