56770_dg.asp

本实例为一个完整的网上购物商城的完整例子程序,里面有所以的源代码.希望对大家学习有用.

<TABLE border=0 cellPadding=0 cellSpacing=0 width=180>
<tr>
<td width="100%" height="1" bgcolor="#FFC7C7"></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0" align="center" height="63">
<tr>
<td height="*" valign="top"style="LINE-HEIGHT: 210%" bgcolor="#FFE7E9">
<b>热门搜索</b><%
sql="select top 10 * from search order by cs DESC"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql, Conn, 1, 1
do while not rs.eof %>
<a href="searchshop.asp?product_name=<%=rs("gjc")%>" target="_blank"><%=rs("gjc")%></a>
<%rs.movenext
loop
rs.close
set rs=nothing%>
</td>
</tr>
</table>
</td>
</tr>
</table>