sold.asp

上海购物网设计的购物系统是基于WEB开发的大型购物系统。 它以构建电子商务网站为目标

<table width="175" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="24"><img src="images/skin/default/ph_title.gif" width="165" height="12"></td>
  </tr>
</table>
<table width="175" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
  <tr> 
    <td bgcolor="#CCCCCC"><TABLE WIDTH="175" BORDER="0" align="center" CELLPADDING="0" CELLSPACING="0" bgcolor="#FFFFFF">
        <%
			 set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 10 id,name,solded from product where isfb=0 order by solded desc",conn,1,1
			  if rs.eof and rs.bof then
			  response.write "<tr><td align=center background=images/bg12.gif>数据库中无商品</td></tr>"
			  else
			  i=0
			  do while not rs.eof%>
        <TR BGCOLOR=<%=bgclr3%>> 
          <TD height="16"> 
            <%response.write "&nbsp;·<a href=product.asp?id="&rs("id")&" target=_blank title=此商品已成功销售"&rs("solded")&"次>"
				if len(trim(rs("name")))>20 then
				response.write left(trim(rs("name")),18)&"..."
				else
				response.write trim(rs("name"))
				end if
				response.write "</a>"
				%>
          </TD>
        </TR>
        <%i=i+1
			  if i>=10 then exit do
			  rs.movenext
			  loop
			  end if
			  rs.close
			  set rs=nothing
			  %>
        <TR> 
          <TD height="16" ALIGN="right"> <A HREF="sold.asp">更多排行&gt;&gt;&gt;</A>&nbsp;&nbsp;</TD>
        </TR>
        <tr> 
          <td height="12"></td>
        </tr>
      </TABLE></td>
  </tr>
</table>