leftdirectory.asp

21世纪人才www.51zy.net 网站源码

<div id="leftnav">
<%anclassid=request("anid")
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_anclass where anclassid="&anclassid,conn,1,1
anclassname=rs("anclass")
%><h1><a href="class.asp?lx=big&amp;anid=<%=request("anid")%>"><%=anclassname%></a></h1>
<ul>
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from shop_nclass where anclassid="&anclassid&" order by nclassidorder",conn,1,1
if rs_s.recordcount=0 then%><li>暂无小分类</li>
<%else
i=0
while not rs_s.eof
%><li><a href="class.asp?lx=small&amp;anid=<%=rs("anclassid")%>&amp;nid=<%=rs_s("nclassid")%>"><%=rs_s("nclass")%></a></li> 
<%
rs_s.movenext
wend
end if
%><%
rs_s.close
set rs_s=nothing
rs.close
set rs=nothing
%></ul>

</div>