shangping_j.asp

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

<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
<td height="30" colspan="2" bgcolor="#f4f4f4">↓↓精品热卖</td>
	        <%set rs=server.createobject("adodb.recordset")
		rs.open "select Top 6 * from BJX_goods where bestbook=1 order by bookid desc",conn,1,1
		if rs.recordcount=0 then 
		%>
  </tr>
              <%
		else
		while not rs.eof
		%>
  <tr> 
    <td width="50%" valign=top>
	<table width="100%" border="0" cellspacing="0" cellpadding="2" align="center">
        <tr> 
          <td height="24" colspan="2">　<img src="images/ring01.gif" width="9" height="9"> 
            <%response.write "<a class=a4 href=goodsview.asp?bjxGid="&rs("bookid")&" ><font color=#FF6600>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
          </td>
        </tr>
        <tr> 
          <td width="40%" class="table-xia"> <TABLE height=99 cellSpacing=0 cellPadding=0 width=99 border=0 align="center">
              <TBODY>
                <TR> 
                  <TD background=images/xt_bj.gif align=center> 
                    <%if rs("bookpic")="" then 
response.write "<div align=center><a href=goodsview.asp?bjxGid="&rs("bookid")&" ><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                    <a href=goodsview.asp?bjxGid=<%=rs("bookid")%> ><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a> 
                    <%end if%>
                  </TD>
                </TR>
              </TBODY>
            </TABLE></td>
          <td width="60%" class="table-xia">
		  <a href=goodsview.asp?bjxGid=<%=rs("bookid")%> ><font color="#800000"><u></u></font></a>
		                                <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                <tr> 
                                  <td><font color="#999999"> 
                                    <%if len(trim(rs("bookcontent")))>25 then
	response.write left(trim(rs("bookcontent")),20)&"...."
	else
	response.write trim(rs("bookcontent"))
	end if%>
                                    </font></td>
                                </tr>
                              </table>
                          市场价：<s><%=formatnumber(rs("shichangjia"),2)&"元"%></s><br>
                          会员价：<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
						  VIP 价：<font color=#FF0000><%=formatnumber(rs("Vipjia"),2)&"元"%></font><br>
		  </td>
        </tr>
      </table>
<%rs.movenext%>
	</td>
    <td width="50%" valign="top" class="table-zuo">
			            <%if rs.eof then%>
                    <%else%>
	<table width="100%" border="0" cellspacing="0" cellpadding="2" align="center">
        <tr> 
          <td height="24" colspan="2">　<img src="images/ring01.gif" width="9" height="9"> 
            <%response.write "<a class=a4 href=goodsview.asp?bjxGid="&rs("bookid")&" ><font color=#FF6600>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
          </td>
        </tr>
        <tr> 
          <td width="40%" class="table-xia"> <TABLE height=99 cellSpacing=0 cellPadding=0 width=99 border=0 align="center">
              <TBODY>
                <TR> 
                  <TD background=images/xt_bj.gif align=center> 
                    <%if rs("bookpic")="" then 
response.write "<div align=center><a href=goodsview.asp?bjxGid="&rs("bookid")&" ><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                    <a href=goodsview.asp?bjxGid=<%=rs("bookid")%> ><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a> 
                    <%end if%>
                  </TD>
                </TR>
              </TBODY>
            </TABLE></td>
          <td width="60%" class="table-xia">
		  <a href=goodsview.asp?bjxGid=<%=rs("bookid")%> ><font color="#800000"><u></u></font></a>
		                                <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                <tr> 
                                  <td><font color="#999999"> 
                                    <%if len(trim(rs("bookcontent")))>25 then
	response.write left(trim(rs("bookcontent")),20)&"...."
	else
	response.write trim(rs("bookcontent"))
	end if%>
                                    </font></td>
                                </tr>
                              </table>
                          市场价：<s><%=formatnumber(rs("shichangjia"),2)&"元"%></s><br>
                          会员价：<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
						  VIP 价：<font color=#FF0000><%=formatnumber(rs("Vipjia"),2)&"元"%></font><br>
		  </td>
        </tr>
      </table>
	  				<%rs.movenext%>
				<%end if%>
				</td>
  </tr>
          <%
		wend
		end if%>
</table>