asp 循环语句中再加一个循环要如何做

Question

我的意思是，先查询出来 相同ID，相同NAME的数据，然后再查询属于NAME的LXNAME
我是这么写的
<%set vs=server.createobject("adodb.recordset") vs.open "select distinct(lxxid),name from shoplx where lxxid=571",conn,1,1 do while not vs.eof %>
<%=vs("name")%>
这里结果已经只显示 接口 和核心 两条
然后让再分别显示属于接口 和核心的就不会写了。怎么都是500错误的。
<%set vsb=server.createobject("adodb.recordset")vsb.open "select * from shoplx where name="&vs("name")&"",conn,1,1
do while not vsb.eof%>
<%=vsb("lxname")%>
<%
vsb.movenext loop
vs.movenext loopvs.Closeset vs=nothingend if%>
请问应该如何写。

Answer 1

有几个错误:
1) VSB在使用时没有关闭,因为你是在循环中使用VSB变量,所以在使用结束时应该立即立即它,这样下次循环重新使用它时就不会出错了
就是在 vsb.movenext loop 之后要加上 vsb.close

2)第二错误就是循环里的SQL不对了,vsb的SQL中,应该写两个条件:
vsb.open "select * from shoplx where name='"&vs("name")&"' and lxxid=571",conn,1,1
这里如果不加入 lxxid=571 的话,是其他ID的同名也会被显示这里,显然不对,要注意name字段需要单引号

3) 不知道你最后的 end if 之前有没有 IF与之对应

Answer 2

vsb.open "select * from shoplx where name="&vs("name")&"",conn,1,1 这句改一下：
vsb.open "select * from shoplx where name='"&vs("name")&"'",conn,1,1
另外最后一句 end if不知与何对应，如前文无if,应删除。