56770_sortremai.asp
来自「本实例为一个完整的网上购物商城的完整例子程序,里面有所以的源代码.希望对大家学习」· ASP 代码 · 共 47 行
ASP
47 行
<TABLE border=0 cellPadding=0 cellSpacing=0 width=180>
<tr>
<td>
<table cellspacing=0 cellpadding=0 width=180 height="23" bgcolor="#FFC7C7">
<tr>
<td width=5> </td>
<td width="133"><b><%=csort_name%></b> 类热卖</td>
</tr>
</table>
</td>
<tr>
<td>
<table width="180" border="0" cellpadding="0" cellspacing="0" align="center" bgcolor="#FFE7E9">
<tr>
<%if csort_name="" then
sqlt="select id,product_name from 56770_product where sort_name='"&sort_name&"' order by buys desc"
else
sqlt="select id,product_name from 56770_product where csort_name='"&csort_name&"' and sort_name='"&sort_name&"' order by buys desc"
end if
Set rst=Server.CreateObject("ADODB.RecordSet")
rst.Open sqlt, conn, 1, 1
n=0
do while not rst.eof
%><tr>
<td height="20"> ·<a href="showproduct.asp?id=<%=rst("id")%>"class=a2>
<% if len(rst("product_name"))>11 then%>
<%=left(rst("product_name"), 10)%>...
<%else%>
<%=rst("product_name")%>
<%end if%>
</a></td>
</tr>
<%
i=i+1
if i>10 then exit do
rst.movenext
loop
rst.close
set rst=nothing
%>
</table>
</td>
</tr>
<tr>
<td> </td>
</tr> </table>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?