<%set rs=server.CreateObject("adodb.recordset") rs.open "select top 1 id,name,solded,pic,introduce,price1,price2 from product order by solded desc",conn,1,1 if rs.eof and rs.bof then response.write " " else %> 最畅销商品 对不起，请您先到商城后台添加商品。 TARGET=_blank> SRC=<%if trim(rs("pic"))="" then response.write "images/emptybook.gif" else response.write trim(rs("pic")) end if%> BORDER=0> <% response.write "" if len(trim(rs("introduce")))>30 then response.write left(trim(rs("introduce")),28)&"..." else response.write trim(rs("introduce")) end if response.write "" %> 市场价：<%=rs("price1")%>元 会员价：<%=rs("price2")%>元 ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"> &action=add','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"> <% end if rs.close set rs=nothing %>