tejiainfo.asp

电子商务购物系统

 
<table width="100%" class="table-shangxia" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="23" bgcolor="f1f1f1">　特价商品</td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td> 
      <table width="91%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="6"></td>
        </tr>
        <tr> 
          <td height="20" class="table-xia"> 
            <%
			set rs=server.CreateObject("adodb.recordset")
			i=0
			rs.open "select top 8 bookid,dazhe,bookname from shop_books where dazhe<=0.6 order by adddate desc",conn,1,1
			if rs.eof and rs.bof then
			response.write "<br>目前没有特价商品"
			end if
			if rs.recordcount>=3 then
			rs.absoluteposition=3
			do while not rs.eof
			i=i+1
			if len(trim(rs("bookname")))>14 then
			response.write "·<a href=book.asp?id="&rs("bookid")&" target=_blank>"&left(trim(rs("bookname")),12)&"...</a>&nbsp;&nbsp;<font color=#FF6600>"&rs("dazhe")*100&"%</font><br>"
			else
			response.write "·<a href=book.asp?id="&rs("bookid")&" target=_blank>"&trim(rs("bookname"))&"</a>&nbsp;&nbsp;<font color=#FF6600>"&rs("dazhe")*100&"%</font><br>"
			end if
			if i>=6 then exit do
			rs.movenext
			loop
			end if
			rs.close
			set rs=nothing
			%>
          </td>
        </tr>
        <tr> 
          <td></td>
        </tr>
      </table>
    </td>
  </tr>
  <tr> 
    <td>&nbsp;</td>
  </tr>
</table>