又出错了,在线等上10分钟

[mhxz568]

<% do while not rs.eof
set rs1=server.CreateObject("adodb.recordset")
exec1="select * from Medicine where MedicineID="&rs("MedicineID")
rs1.open exec1,conn,1,1%>
……
<% rs1.close
set rs1=nothing
rs.movenext
loop
%>
又是老问题
错误类型：
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/mhxz567/shoppingcart.asp


rs里有记录的,我用rs.movenext 调试过!

[mhxz568]

因为SQL不强,怕出错

[sy_binbin]

<% rs1.close
set rs1=nothing
rs.movenext
loop
%>
？？？？？？？


<%
rs.movenext
loop
rs1.close
set rs1=nothing
%>

这样试试

[qujianwei2006]

rs1 有判断吗?

是不是rs1的错

[mhxz568]

我调试了下,把rs的循环拿到,rs1是正常显示的

[mhxz568]

还没解决,上面的办法行不通哦!

[sy_binbin]

RS1？？
RS？？有点迷糊了

[叮咚叮咚叮叮咚]

错误行是哪个，可能rs1没有记录吧
exec1="select * from Medicine where MedicineID="&rs("MedicineID")

[subasan]

<% do while not rs.eof
set rs1=server.CreateObject("adodb.recordset")
exec1="select * from Medicine where MedicineID="&rs("MedicineID")
rs1.open exec1,conn,1,1
if rs1.eof or rs1.eof then
response.write ("无数据")
response.end()%>
……
<% rs1.close
set rs1=nothing
rs.movenext
loop
%>

[subasan]

少了个 end if

[sky0120]

rs1.open exec1,conn,1,1
if not rs1.eof then
....
end if
rs1.close

[mhxz568]

伤心,还是不行

[sy_binbin]

最好先把记录集搞明白了！
RS1和RS都是干什么的？？

[mhxz568]

加了判断了,还是不行


把rs1 拿掉
运行结果也是这样
<%do while not rs.eof%>
<tr><td><%=rs("MedicineID")%></td></tr>
<%rs.movenext
loop
%>
错误类型：
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/mhxz567/shoppingcart.asp


现在问题很清楚了吧??
看起来好象是rs的问题
我调试了下,把rs的循环拿掉,rs1是正常显示的,那也说明rs不可能是空的啊?
等待解决!!!

[mhxz568]

rs是一个购物车表:里面记录购物车里的药品信息
rs1是一个药品表:里面记录药品信息的

[mhxz568]

rs里有药品ID
通过这个药品ID
rs1可以取得rs中的详细药品信息

[sy_binbin]

??

那为什么不写成SQL语句呢

"select * from 表1 as a,表2 as b where a.id=b.id and b.id="&id