index_goodhot.asp

asp的网上卖东西的..看看还可以的吧

<TABLE cellSpacing=0 cellPadding=0 width=230 border=0>
        <TBODY>
          <TR>
            <TD>
              <TABLE cellSpacing=0 cellPadding=0 width=230 
                              border=0>
                <TBODY>
                  <TR>
                    <TD><IMG height=6 
                                src="images/mydata_right_top.gif" 
                                width=230></TD>
                  </TR>
                  <TR>
                    <TD align=middle 
                                background=images/mydata_right_bg.gif>
                      <TABLE cellSpacing=0 cellPadding=0 width=225 
                                border=0>
                        <TBODY>
                          <TR>
                            <TD align=middle>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=206 border=0>
                                <TBODY>
                                  <TR>
                                    <TD class=title_01 height=24 style="font-size: 10pt;	font-weight: bold;PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; PADDING-TOP: 5px" ><IMG height=17 
                                src="images/downrank_icon.gif" width=18 
                                align=absMiddle>最新人气排行TOP10</TD>
                                    <TD vAlign=bottom width=19><A 
                                href="bookorder.asp"><IMG 
                                height=10 alt=more 
                                src="images/more02_icon.gif" width=19 
                                border=0></A></TD>
                                  </TR>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                          <TR>
                            <TD><IMG height=2 
                                src="images/downrank_sun.gif" 
                                width=212></TD>
                          </TR>
                          <TR>
                            <TD height=5></TD>
                          </TR>
                          <TR>
                            <TD align=middle>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=220 border=0>
                                <TBODY>
								<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 * from BJX_goods order by liulancount desc",conn,1,1
i=1
do while not rs.eof%>
                                  <TR>
                                    <TD  height=20><IMG 
                                height=9 src="images/downrank_num<%=i%>.gif" 
                                width=18 align=absMiddle>
								<%response.write "<a href=goodsview.asp?bjxGid="&rs("bookid")&"  title=此商品已被浏览了"&rs("liulancount")&"次>"
				if len(trim(rs("bookname")))>19 then
				response.write left(trim(rs("bookname")),17)&".."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</a>"
				%>
								
								</TD>
                                  </TR>
								  <%i=i+1
			  if i>=11 then exit do
			  rs.movenext
			  loop
			  rs.close
			  set rs=nothing%>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                          <TR>
                            <TD 
height=5></TD>
                          </TR>
                        </TBODY>
                    </TABLE></TD>
                  </TR>
                  <TR>
                    <TD><IMG height=4 
                                src="images/mydata_right_bottom.gif" 
                                width=230></TD>
                  </TR>
                </TBODY>
            </TABLE></TD>
          </TR>
          <TR>
            <TD height=10></TD>
          </TR>
        </TBODY>
    </TABLE>