; sql_classlist_1="select sortid,sort,reid,sml,sjsum,queue,sortid from www654cn_SORT where reid="&rs_classlist("sortid")&" order by queue,sortid"
rs_classlist_1.open sql_classlist_1,conn,1,1
if rs_classlist_1.eof then
Get_classlist=Get_classlist&"<li class=""child""><img class=""c"" src=""../css/s.gif"" alt=""展开|折叠"" /><a href="""&rs_classlist("sml")&".htm"">"
Get_classlist=Get_classlist&""&rs_classlist("sort")&""
Get_classlist=Get_classlist&"</a> <span class=""unum"">("&rs_classlist("sjsum")&")</span>"
Get_classlist=Get_classlist&"</li>"&vbcrlf
else
if rs("reid")=rs_classlist("sortid") then '判断分类是否子分类,是 打开 该子分类的父分类
Get_classlist=Get_classlist&"<li class=""open""><img class=""s"" src=""../css/s.gif"" alt=""展开|折叠"" />"
else
Get_classlist=Get_classlist&"<li class=""close""><img class=""s"" src=""../css/s.gif"" alt=""展开|折叠"" />"
end if
Get_classlist=Get_classlist&"<a href="""&rs_classlist("sml")&".htm"">"&rs_classlist("sort")&"</a>"
Get_classlist=Get_classlist&" <span class=""unum"">("&rs_classlist("sjsum")&")</span>"
Get_classlist=Get_classlist&"<ul>"
do while not rs_classlist_1.eof
Get_classlist=Get_classlist&"<li class=""child""><img class=""c"" src=""../css/s.gif""/>"
Get_classlist=Get_classlist&"<a href="""&rs_classlist_1("sml")&".htm"">"&rs_classlist_1("sort")&"</a>"
Get_classlist=Get_classlist&" <span class=""unum"">("&rs_classlist_1("sjsum")&")</span>"
Get_classlist=Get_classlist&"</li>"&vbcrlf
rs_classlist_1.movenext
if rs_classlist_1.eof then exit do
loop
Get_classlist=Get_classlist&"</ul>"
end if
rs_classlist_1.close
set rs_classlist_1=nothing
rs_classlist.movenext
if rs_classlist.eof then exit do
loop
Get_classlist=Get_classlist&"</ul>"&vbcrlf
Get_classlist=Get_classlist&"</li>"&vbcrlf
Get_classlist=Get_classlist&"</ul>"&vbcrlf
rs_classlist.close
set rs_classlist=nothing
Get_WWW654CN_SORT_classlist=Ge
个人网站设计之上网导航设计(十一)相关范文