发布网友 发布时间:2022-07-14 22:28
共1个回答
热心网友 时间:2023-10-10 17:23
无限级菜单代码 //boardid 文章id(自动增长) parentid 父级id 默认为0 (0代表最高级) boardtype 菜单名. 其他字段省 ---------------------------------------------- | boardid | type | parentid | ---------------------------------------------- 核心代码: //先取出最高级(parentid=0)的分类 <% set rs1=server.createobject("adodb.recordset") sql1="select * from board where parentid=0 order by id" rs1.open sql1,conn,1,1 if rs1.eof or rs1.bof then response.write"还没论坛分类!" else while not rs1.eof id1=rs1("id") type1=rs1("boardtype") parentid1=rs1("parentid") call recursion(id1,type1,parentid1) rs1.movenext wend end if rs1.close set rs1=nothing %> <% sub recursion(id,m_boardtype,m_parentid) 递归调用函数,生成一个类别代码 set rs=server.createobject("adodb.recordset") sql="select * from board where parentid="&id rs.open sql,conn,1,1 while not rs.eof id0=rs("id") type0=rs("boardtype") parentid0=rs("parentid") call recursion(id0,type0,parentid0) rs.movenext wend rs.close set rs=nothing %>