hot.asp

来自「上海购物网设计的购物系统是基于WEB开发的大型购物系统。 它以构建电子商务网」· ASP 代码 · 共 40 行

<table width="170" border="0" align="center" cellpadding="0" cellspacing="1">
  <tr> 
    <td><TABLE WIDTH="100%" height="100%" BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0">
        <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 10 id,name,viewnum from product where isfb=0 order by viewnum desc",conn,1,1
		  if rs.eof and rs.bof then
			  response.write "<tr><td align=center background=images/bg12.gif>数据库中无商品</td></tr>"
		  end if
        	i=0
			  do while not rs.eof%>
        <TR> 
          <TD height="16"> 
            <%response.write "&nbsp;·<a href=product.asp?id="&rs("id")&" target=_blank title=此商品被浏览"&rs("viewnum")&"次>"
				if len(trim(rs("name")))>20 then
				response.write left(trim(rs("name")),16)&"..."
				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
			  rs.close
			  set rs=nothing
			  %>
        <TR> 
          <TD height="16" ALIGN="right"> <A HREF="hot.asp">更多排行&gt;&gt;&gt;</A>&nbsp;&nbsp;</TD>
        </TR>
        <tr> 
          <td height="12"></td>
        </tr>
      </TABLE></td>
  </tr>
</table>