求救?的潜套问题,下面的写法正不正确,
<%
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("redboy/redboy.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs0= Server.CreateObject("ADODB.Recordset")
set rs1= Server.CreateObject("ADODB.Recordset")
dim node_html,tongji
strSqla="select distinct parentid from tree"
rs0.open strSqla,conn,1,3
do while not rs0.eof
....
strsq1b="select * from tree where parentid='"&rs0("parentid")&"' "
//但是在这儿strsqlb的语句根本不能执行。。这是什么原因
rs1.open strsqlb,conn,1,3
do while not rs1.eof
......
rs1.movenext
loop
rs1.close
set rs1=nothing
rs0.movenext
loop
rs0.close
set rs0=nothing
%>
上面的写法正不正确,