<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file="include/header.asp"-->
<title><%=webname%>--商品快速分类</title>
<TABLE width="980" BORDER="0" CELLSPACING="0" CELLPADDING="0" align="center" class=table-zuoyou bgcolor="#FFFFFF" >
<TR><TD HEIGHT="30" bgcolor="#999999" width="75" class=table-shangxia><FONT color="#ffffff">&nbsp;<b>您的位置：</b></FONT></TD>
<td  class=table-shangxia>&nbsp;<a href="index.asp"><FONT color="#000000"><% = webname %></FONT></a>－&gt;<a href=procat.asp><FONT color="#000000">商品分类</FONT></a></td></TR></table>
<TABLE width="980" BORDER="0" CELLSPACING="0" CELLPADDING="0" align="center" class=table-zuoyou bgcolor="#FFFFFF" >
	  <%dim rs1
	  set rs = server.CreateObject("adodb.recordset")
	  rs.open "select categoryid,category from category order by categoryorder",conn,1,1
	  if rs.eof and rs.bof then
	  response.Write "还没有商品分类"
	  else
	  do while not rs.eof %>
	  <tr><TD width="75" valign="middle" height=28 align="center" class=table-youxia>
	  <% response.Write "<a href=cat.asp?catid="&rs("categoryid")&"><b><FONT COLOR=#333333>"&rs("category")&"</font></b></a>" %>
	  </td><td class=table-xia>&nbsp;
	  <%
	  set rs1 = server.CreateObject("adodb.recordset")
	  rs1.open "select categoryid,sortsid,sorts from sorts where sorts.categoryid="&rs("categoryid")&" order by sortsorder",conn,1,1
	 do while not rs1.eof
	  response.Write "<a href=class.asp?aid="&rs1("categoryid")&"&nid="&rs1("sortsid")&"><FONT COLOR=#333333>"&rs1("sorts")&"</font></a><FONT COLOR=#333333>·</font>"
	  rs1.movenext
	  loop
	  rs1.close
	  set rs1 = nothing %>
	  </TD></tr>
	  <%
	  rs.movenext
	  loop
	  rs.close
	  set rs = nothing
	  end if
	  %>
	  </table>
	  <!--#include file="include/footer.asp"-->
