Question

错误类型:ADODB.Field (0x800A0BCD)

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的 操作要求一个当前的记录。/wow/buycar.asp, 第 137 行
<% if rs.bof and rs.eof then
%>
<tr align="center">
<td height="32"> </td>
<td width="17%" colspan="7">You have no chiose!!!</td>
<td width="9%"> </td>
</tr>
<%
else
dim totalm,id2,them1
totalm=0
do while not rs.eof

id2=rs("id_2")
set rs1=server.CreateObject("adodb.recordset")
sql1="select * from product where id="&id2
rs1.open sql1,conn,1,1
if not (rs.eof and rs.bof) then
them1=rs1("price")----第137行
'them=replace(them1,"","USD")
theno=clng(rs("number"))
them1=them1*theno
totalm=totalm+them1
%>
<tr align="center">
<td height="29"> </td>
<td><%= rs1("name") %></td>
<td><%= rs1("jieshao") %></td>
<td><%= rs1("price") %></td>
<td><%= rs1("sort") %></td>
<td><%= rs("number") %></td>
<td><%= rs("account") %></td>
<td><a href="del_buycar.asp?id1=<%= rs("id") %>"><img src="images/b-delete.gif" width="16" height="16" border="0" /></a></td>
<td> </td>
</tr>
<% end if %>
<tr align="center">
<td background="images/dot.gif" colspan="8">
<img src="images/spacer.gif" width="70" height="1"></td>
</tr>
<% rs1.close
prodid=rs("id")
PutToShopBag Prodid, ProductList
rs.movenext
loop
end if %>
我靠，自己急糊涂了，
把rs.eof 换成rs1.eof就可以了
谁回答就个谁分，
等我下次再上了。

Answer 1

操作：rs1.eof 替换rs.eof ...
可以了?!

Answer 2

晕哦 呵呵 都没人回答 这是个什么东东呀

Answer 3

没 看明白