info_fenlei.asp

网上购物系统:一个经过完善设计的经典网上购物系统

<table width="174"  border="0" cellspacing="0" cellpadding="0">
     
	   <tr>
         <td height="63" valign="top">
		   <%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from btype order by btype_idorder",conn,1,1
if rs.recordcount=0 then
	response.write "暂无分类"
else
	while not rs.eof
%>
		      <TABLE cellSpacing=0 cellPadding=0 width=174 border=0>
             <TR>
               <TD width=27><IMG height=19 
                        src="img/xiao/00_menu_ff.gif" 
                        width=27></TD>
               <TD width=151 height=24><a href=Catalog_Desc.asp?action_key_order=big&btype_id=<%=rs("btype_id")%>><font color="#3399cc"><%=rs("btype_name")%></font></a>
               </TD></TR>
             <TR>
               <TD colSpan=2 height=3><IMG height=3 src="img/xiao/00_menu_line.gif" width=174></TD>
             </TR>
           </TABLE>
		    <%
	rs.movenext
	wend
end if
rs.close
set rs=nothing
%>
         </td>
  </tr>
     </table>				
<table width="5" height="5" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table>