<% set rs = server.CreateObject("adodb.recordset") rs.open "select categoryid,sortsid,sorts from sorts where sorts.categoryid="&catid&" order by sortsorder",conn,1,1 if rs.eof and rs.bof then %>
暂无此商品小类
<%else do while not rs.eof %> <% rs.movenext %> <% if rs.eof then exit do else %> <% rs.movenext end if loop end if rs.close set rs = nothing %>
<% = strcat %>商品分类
&nid=<% = rs("sortsid") %>><% = rs("sorts") %> ·&nid=<% = rs("sortsid") %>><% = rs("sorts") %>