大家帮帮忙找个错误，非常感谢！

yjthink 2003-05-21 04:27:10

<%
set conn=server.createobject("adodb.connection")
conn.open"mydb"
set rs =server.createobject("adodb.recordset")
%>
<%Do while not rs.EOF%>
<%for i=1 to 31
if (rs(i)=catalogue1)or (rs(i)=catalogue2) then
for j=i+1 to 32
if (rs(j)=catalogue1)or (rs(j)=catalogue2) then
response.write rs(0)
end if
Next
end if
next%>
<%
rs.movenext
loop
rs.close
conn.close
%>
编译错误类型：ADODB.Recordset (0x800A0E78），为什么发生这个错误？

...全文

79 11 打赏收藏转发到动态举报

写回复

用AI写文章

11 条回复

切换为时间正序

请发表友善的回复…

发表回复

yjthink 2003-05-22

打赏
举报

谢谢给位热心帮忙，我要结帖了

xf_david921 2003-05-21

打赏
举报

在输入时加入" "

runke 2003-05-21

打赏
举报

先打开数据库,再打开rs.

bhys 2003-05-21

打赏
举报

没有打开数据库表。。
应该加入
sql="select * from tablename"
rs.open sql,conn,1,3

yjthink 2003-05-21

打赏
举报

我想在结果显示时，结果之间加入空格，应该怎么加？

yjthink 2003-05-21

打赏
举报

我要在 response.write rs(0)后面加上空格，应该怎么加？

csgorilla 2003-05-21

打赏
举报

还没有生成记录集，当然还不能用记录集，先产生一个记录集：
set rs=conn.execute(sql)

lvyin 2003-05-21

打赏
举报

是不是连接数据库时错了？
set conn=server.createobject("adodb.connection")
dbpath=server.mappath("database.mdb")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="& dbpath

funboy88 2003-05-21

打赏
举报

你表都没有打开，RS记录何处来呀
<%
set conn=server.createobject("adodb.connection")
conn.open"mydb"
set rs =server.createobject("adodb.recordset")
sql="select * from tablename" //加入SQL语句
rs.open sql,conn,1,3 //在这儿加上执行SQL语句的代码
%>
<%Do while not rs.EOF%>
<%for i=1 to 31
if (rs(i)=catalogue1)or (rs(i)=catalogue2) then
for j=i+1 to 32
if (rs(j)=catalogue1)or (rs(j)=catalogue2) then
response.write rs(0)
end if
Next
end if
next%>
<%
rs.movenext
loop
rs.close
conn.close
%>

jacklinchen 2003-05-21