效果:
http://HdhCmsTestjinqiao2010.gov.cn/giftscool/sort.asp
代码如下:
test
全部商品分类
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
%>
wend
%>
rs.movenext
wend
end if
rs_x.close
set rs_x=nothing
rs_s.close
set rs_s=nothing
rs.close
set rs=nothing
%>
全部商品分类
查看更多关于仿京东菜单栏求救_html/css_WEB-ITnose的详细内容...
声明:本文来自网络,不代表【好得很程序员自学网】立场,转载请注明出处:http://haodehen.cn/did113026