top_ml.asp

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

<table width="760" border="0" cellspacing="0" cellpadding="0" align="center">
<TR>
<td height="25" bgcolor=#cc00000 align=left>
&nbsp; &nbsp; <font color=white>商品分类 == ></font>        <%
sql="select * from 56770_sort  where sy='1'"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql, conn, 1, 1
do while not rs.eof
%>
<IMG align=absMiddle height=6 src="images/nav.gif" width=8>
<a href=showsort.asp?sort_name=<%=rs("sort_name")%>><font color=white><%=rs("sort_name")%></font>  </a><%
rs.movenext
loop
rs.close
%>
</TD>
<td align="right" bgcolor=#cc00000>
<%sqlqb="select * from 56770_product"
Set rsqb= Server.CreateObject("ADODB.Recordset")
rsqb.open sqlqb, conn, 1, 1%>
<font color=white>商品数：</font><font color=yellow><%=rsqb.recordcount%> </font>
<%rsqb.close
set rsqb=nothing%></td>
</TR>
</TABLE>