iheeo_sellrank.asp

来自「易和阳光购物商城 v1.3 | 功能简介 增加了防注入文件」· ASP 代码 · 共 69 行

<TABLE cellSpacing=1 cellPadding=5 width=185 border=0 class="wenbenkuang">
                <TBODY>
                  <TR>
                    <TD bgColor=#fafafa>
                      <TABLE class=sub_basic cellSpacing=0 cellPadding=0 
                              width=173 border=0>
                        <TBODY>
                          <TR>
                            <TD>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=173 border=0>
                                <TBODY>
                                  <TR>
                                    <TD width=22><B><IMG height=16 
                                src="images/sub_gesi_icon.gif" width=17 
                                align=absMiddle> </B></TD>
                                    <TD class=title_01 height=24>最新销售排行TOP10</TD>
                                    <TD vAlign=bottom align=right width=30 
                                height=24>　</TD>
                                  </TR>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                          <TR>
                            <TD><IMG height=2 
                                src="images/mydata_left_sunimg.gif" 
                                width=173></TD>
                          </TR>
                          <TR>
                            <TD height=5></TD>
                          </TR>
                          <TR>
                            <TD align=middle>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=167 border=0>
                                <TBODY>
								<%set rs=server.CreateObject("adodb.recordset")
	  rs.open "select top 10 * from BJX_goods order by chengjiaocount desc",conn,1,1%>
	  <%i=0
do while not rs.eof%>
								
                                  <TR>
                                    <TD width=8><IMG height=5 
                                src="images/sub_catleft_bullet.gif" width=3 
                                align=absMiddle></TD>
                                    <TD><%response.write "<a href=product.asp?Iheeoid="&rs("bookid")&"  title=此商品已成功销售"&rs("chengjiaocount")&"次>"
				if len(trim(rs("bookname")))>17 then
				response.write left(trim(rs("bookname")),16)&".."
				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%>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                        </TBODY>
                    </TABLE></TD>
                  </TR>
                </TBODY>
            </TABLE>