ASP读取数据库二级菜单的代码怎么写?
我的数据库二级菜单和一级菜单都是写在一张表上的。二级菜单有个标识数字等于一级菜单的ID怎么把这个菜单列表代码写出来呀,二级菜单在一级菜单下面缩进4个字符...
我的数据库二级菜单和一级菜单都是写在一张表上的。二级菜单有个标识数字等于一级菜单的ID 怎么把这个菜单列表代码写出来呀,二级菜单在一级菜单下面缩进4个字符
展开
1个回答
展开全部
menu:
id | tit | bid
1 大类一 0
2 大类二 0
3 小类11 1
4 小类12 1
5 小类21 2
6 小类22 2
读取大类和小类
sql="select * from menu where bid=0"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
else
response.write("<ul>")
while not rs.eof
response.write("<li>"&rs("tit")&"</li>")
call readSclas(rs("id"))
rs.movenext
wend
response.write("</ul>")
end if
rs.close
function readSclas(x)
sql="select * from menu where bid="&x
rs1.open sql,conn,1,1
if rs1.eof and rs1.bof then
else
response.write("<ul>")
while not rs1.eof
response.write("<li>"&rs1("tit")&"</li>")
rs1.movenext
wend
response.write("</ul>")
end if
rs1.close
end function
id | tit | bid
1 大类一 0
2 大类二 0
3 小类11 1
4 小类12 1
5 小类21 2
6 小类22 2
读取大类和小类
sql="select * from menu where bid=0"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
else
response.write("<ul>")
while not rs.eof
response.write("<li>"&rs("tit")&"</li>")
call readSclas(rs("id"))
rs.movenext
wend
response.write("</ul>")
end if
rs.close
function readSclas(x)
sql="select * from menu where bid="&x
rs1.open sql,conn,1,1
if rs1.eof and rs1.bof then
else
response.write("<ul>")
while not rs1.eof
response.write("<li>"&rs1("tit")&"</li>")
rs1.movenext
wend
response.write("</ul>")
end if
rs1.close
end function
追问
我按照你这种方法,怎么提示超时啊?
Active Server Pages, ASP 0113 (0x80004005)
超过了脚本运行的最长时间。可以为 Server.ScriptTimeOut 属性指定新值或更改 IIS 管理工具中的相应值来更改此限制。
追答
脚本超时?这个应该与此代码无关的啊
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |