info_newly.asp

一个ASP做的购物车

<!--首页的特价商品-->
<table width="590" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="55" height="34"><img src="images/main/th_img.gif" width="55" height="34"></td>
    <td width="535" background="images/main/th_bg.gif"><b><font color="#66CC00">最新上架商品</font></b></td>
  </tr>
</table>
<table width="590" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select Top 18 * from wq_books where newsbook=1 order by bookid desc",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "<td  align=center><font color=red size=2>对不起，暂无新品！</font></td>"
		  'response.End
		  else
		  %>
    <%
		if not rs.eof then
		i=1
		do while not rs.eof%>
    <td width="195" align="center" valign="top"> <table width="195" border="0" cellspacing="0" cellpadding="0" class="main">
        <tr> 
          <td> <%if rs("bookpic")="" then 
						response.write "<div align=center><a href=list.asp?id="&rs("bookid")&"><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
						else
					%> <div align="center"><a href=list.asp?id=<%=rs("bookid")%>><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75" alt="<%=trim(rs("bookname"))%>"></a> 
              <%end if%>
            </div></td>
          <td valign=top width="59%"><a class=a4 href=list.asp?id=<%=rs("bookid")%>><br>
            </a> <a href=list.asp?id=<%=rs("bookid")%>> 
            &nbsp; 
            <%if len(trim(rs("bookname")))>7 then
					response.write left(trim(rs("bookname")),7)&".."
					else
					response.write trim(rs("bookname"))
					end if
				%></a><br> &nbsp;市场价：<%=trim(rs("shichangjia"))%>元<br> &nbsp;会员价：<%=trim(rs("huiyuanjia"))%>元<br>
            &nbsp;VIP 价：<%if Request.Cookies("cnhww")("reglx")=2 then%><%=trim(rs("Vipjia"))%>元<%else%><font color="#FF9999">更优惠！</font><%end if%><br>
			 <table cellpadding=0 cellspacing=0>
              <tbody>
                <tr> 
                  <td width="116">&nbsp;<a href="javascript:;" onClick="javascript:window.open('shopcart.asp?id=<%=rs("bookid")%>&action=add','shouchang','width=450,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');"><img src="images/goumai.gif" width="40" height="18" border=0></a>&nbsp;<a href="javascript:;" onClick="javascript:window.open('favorites.asp?id=<%=rs("bookid")%>&action=add','shouchang','width=450,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');"><img src="images/Favorites.gif" width="40" height="18" border=0></a></td>
                </tr>
              </tbody>
            </table></td>
        </tr>
      </table></td>
    <%if i mod 3 = 0 then%>
  </tr>
  <%end if
	    rs.movenext
         i=i+1
    	 loop
		rs.close
		end if
		end if 
	%>
</table>