请教高手，asp可以在循环中打开访问数据库吗?

[dai2003]

<TR><td >制造厂家</td>
<td >
<%
' 制造厂家记录集
dim rsFactory
dim rs1Fasctory
strSql = "select * from sel_Factory "
set rsFactory = conn.execute(strSql)
while not rsFactory.eof
if len(rsFactory("strFactory"))>0 then '过滤掉为空的制造厂家
set rs1Fasctory=conn.execute("select * from sel_Factory_Desc where Factory='"&rsFactory("strFactory")&"'") '如果只有一层循环,这个语句一定没有错的
response.write "<TD>"
response.write rs1Fasctory("Name")
response.write "</TD></TR>"
rs1Fasctory.close
end if
rsFactory.movenext
wend
rsFactory.close
set rsFactory = nothing
%>
</SELECT>
</td>
ie6.0的错误提示是：ADODB.recordset错误.
help me!!!!

[lions911]

可以，不过你的程序逻辑好象有点问题

[huahaoyueyuan]

不是程序问题 ，是数据库游标的问题 ，你可以这样做，把数据存在数组中，然后在重数组中循环读取执行另一个SQL语句，要不就在程序中设一下游标

[toffee]

可以在循环打开访问数据库

[海牛]

可我觉得这个程序没必要用嵌套循环！

[海牛]

改写一下Sql语句就可以了！

[海牛]

Select sel_Factory_Desc.Name From sel_Factory,sel_Factory_Desc Where Len(sel_Factory.strFactory)>0 And sel_Factory.strFactory=sel_Factory_Desc.Factory

[dai2003]

谢谢 Rick110AAA(海牛) 给了我这么多信息.
Select sel_Factory_Desc.Name From sel_Factory,sel_Factory_Desc Where Len(sel_Factory.strFactory)>0 And sel_Factory.strFactory=sel_Factory_Desc.Factory
这样不行，这样只能显示以订购材料的厂家。那没有被厂家订购的材料也要显示出来呀，本流程是这样的，所有可以被厂家订购的材料先显示出来，如果厂家已经订购了的显示该厂家的一些必要的信息。

[yaozhg]

当然可以。不过你写的我看不懂。

[ttt2]

set rs1Fasctory=conn.execute("select * from sel_Factory_Desc where Factory='"&rsFactory("strFactory")&"'") '如果只有一层循环,这个语句一定没有错的

while not rs1factory.eof

...