回 帖 发 新 帖 刷新版面

主题:[讨论]我的嵌套循环查询数据库为什么出错?

<%  dim dclass
set rs1=server.CreateObject("adodb.recordset")
rs1.Open "select * from class",conn,1,1
dclass=rs1("class")

 do while not rs1.eof 
<ul id="nav">
<li><a href="#"><Response.Write(dclass)></a>
<ul>

 dim xclass
set rs2=server.CreateObject("adodb.recordset")
rs2.Open "select * from class2 where class='"&dclass&"',conn,1,1
xclass=rs2("class2")

do while not rs2.eof 


<li><a href="#"><% Response.Write(xclass) %></a></li>


rs2.movenext 
loop

rs1.movenext 
loop %> 
如果去掉中间的嵌套就正常,加上去后网页就无法打开,也不最大是死循环还是因为什么原因,
请高手指点

回复列表 (共2个回复)

沙发


试试用完rs2之后释放

板凳


<%  dim dclass
set rs1=server.CreateObject("adodb.recordset")
rs1.Open "select * from class",conn,1,1
[color=0000FF]'dclass=rs1("class") '这句移到下面(红色部分)[/color]

 do while not rs1.eof 
[color=FF0000]dclass=rs1("class")[/color] 
<ul id="nav">
<li><a href="#"><Response.Write(dclass)></a>
<ul>

 dim xclass
set rs2=server.CreateObject("adodb.recordset")
rs2.Open "select * from class2 where class='"&dclass&"',conn,1,1
[color=0000FF]'xclass=rs2("class2") '这句移到下面(红色部分)[/color]

do while not rs2.eof 

[color=FF0000]xclass=rs2("class2") [/color]
<li><a href="#"><% Response.Write(xclass) %></a></li>


rs2.movenext 
loop

rs1.movenext 
loop %> 

我来回复

您尚未登录,请登录后再回复。点此登录或注册