<table width="100%" border="0" cellpadding="0" cellspacing="0" background="image/block_2_2.gif">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 bookid,bookname,chengjiaocount from shop_books order by chengjiaocount desc",conn,1,1%>
<tr>
<td height="38" background="image/left-01-1.gif"><div align="center"><strong><font color="#75710A">销 售 排 行</font></strong></div></td>
</tr>
<tr> 
<td> 
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> 
<td height="2"></td>
</tr>
<%i=0
do while not rs.eof%>
<tr> 
<td height="24" class=table-xia>　<%response.write "<a href=list.asp?id="&rs("bookid")&"  title=此商品已成功销售"&rs("chengjiaocount")&"次>"
				if len(trim(rs("bookname")))>15 then
				response.write left(trim(rs("bookname")),13)&".."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</a>"
				%>
</td>
</tr>
<%i=i+1
	if i>=10 then exit do
	rs.movenext
	loop
	rs.close
	set rs=nothing%>
<tr> 
<td height="1" ></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="10">
<tr>
<td height="16" background="image/block_3_3.gif"></td>
</tr>
</table>
</td>
</tr>
</table>