?? mostsold.asp
字號:
<table width="165" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 1 id,name,solded,pic,introduce,price1,price2 from product where isfb=0 order by solded desc",conn,1,1
if rs.eof and rs.bof then
response.write " <tr><td>對不起,請您先到商城后臺添加商品。</td></tr>"
else
%>
<tr>
<td height="24" colspan="2"><img src="images/skin/default/cx_title.gif" width="165" height="12"></td>
</tr>
<tr>
<td width="23%"> <div align="center"><A HREF=product.asp?id=<%=rs("id")%> TARGET=_blank>
</A><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="60" height="60"></A> </div></td>
<td>
<% response.write "<a href=product.asp?id="&rs("id")&" target=_blank title=此商品被出售"&rs("solded")&"次>"
if len(trim(rs("introduce")))>30 then
response.write left(trim(rs("introduce")),28)&"..."
else
response.write trim(rs("introduce"))
end if
response.write "</a>"
%>
<BR>
會員價:<FONT COLOR=#FF6600><%=rs("price2")%></FONT>元 <br>
<% end if
rs.close
set rs=nothing %>
</td>
</tr>
</table>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -