set rs=server.CreateObject("adodb.recordset") rs.open "select * from bsort order by anclassidorder",conn,1,1 if rs.recordcount=0 then response.write " 目前没有商品分类" else while not rs.eof %>
set rs_s=server.CreateObject("adodb.recordset") rs_s.open "select * from ssort where anclassid=" & rs("anclassid") & " order by nclassidorder",conn,1,1 if rs_s.recordcount=0 then else while not rs_s.eof %>
wend end if %>
set rs_s=server.CreateObject("adodb.recordset") rs_s.open "select * from ssort where anclassid=" & rs("anclassid") & " order by nclassidorder",conn,1,1 while not rs_s.eof%>
set rs_x=server.CreateObject("adodb.recordset") rs_x.open "select * from xsort where nclassid=" & rs_s("nclassid") & " ",conn,1,1 while not rs_x.eof%> rs_x.movenext wend %>
rs_s.movenext wend %>
rs.movenext wend end if rs_x.close set rs_x=nothing rs_s.close set rs_s=nothing
The content of this article is voluntarily contributed by netizens, and the copyright belongs to the original author. This site does not assume corresponding legal responsibility. If you find any content suspected of plagiarism or infringement, please contact admin@php.cn