sold2.asp

上海购物网设计的购物系统是基于WEB开发的大型购物系统。 它以构建电子商务网站为目标

<TABLE WIDTH="259" BORDER=0 align="center" CELLPADDING=0 CELLSPACING=0>
  <%		  set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 10 id,name,pic,price1,price2 from product where isfb=0 and recommend=1 order by adddate desc",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "<tr><td align=center>对不起，请您先到后台添加商品！</td></tr>"
		  else
		  i=0
		  do while not rs.eof
		  %>
  <tr> 
    <td height="3" colspan="2" background="images/skin/default/1.gif" border="0"></td>
  </tr>
  <TR> 
    <td width="1" border="0"></td>
    <TD VALIGN=middle> 
      <TABLE WIDTH="100%" height="196" CELLPADDING=0 CELLSPACING=0>
        <TR> 
          <TD width="7" rowspan="2" align="center" VALIGN=middle>&nbsp;</TD>
          <TD width="123" height="97" rowspan="2" align="center" VALIGN=middle> 
            <A HREF=product.asp?id=<%=rs("id")%> TARGET=_blank> </A> <TABLE style="LETTER-SPACING: 1px" cellSpacing=0 cellPadding=0 
            width=112 border=0>
              <TBODY>
                <TR vAlign=top> 
                  <TD style="PADDING-LEFT: 2px; PADDING-TOP: 2px" 
                background=images/skin/default/jingpin_bg.gif height=112><A  HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><IMG ALT=<%=trim(rs("name"))%> SRC=<%if trim(rs("pic"))="" then %>
				  images/emptybook.gif
				  <% else %>
				  <% = trim(rs("pic")) %>
				<% end if%> BORDER=0 width="<% = webimg9 %>" height="<% = webimg10 %>"></A></TD>
                </TR>
              </TBODY>
            </TABLE></TD>
          <TD width="5" rowspan="2" align="center" VALIGN=middle>&nbsp;</TD>
          <TD width="122" align="center" VALIGN=top> <A HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><FONT COLOR=#FF6600><strong><%=trim(rs("name"))%></strong></FONT></A></TD>
        </TR>
        <TR>
          <TD align="center" VALIGN=middle>市场价：<%=rs("price1")%>元<BR>
            会员价：<FONT COLOR=#FF6600><%=rs("price2")%>元</FONT><br>
            节　省：<%=rs("price1")-rs("price2")%>元</TD>
        </TR>
      </TABLE>
    </TD>
  </TR>
  <%i=i+1
			  if i>=3 then exit do
			  rs.movenext
			  loop
			  end if
			  rs.close
			  set rs=nothing
				%>
</TABLE>