Question

vb，提示“对象打开时，不允许操作”，怎么回事？

我有一个程序 For i = 1 To 800
rs2.MoveNext
Next
For i = 801 To rs2.RecordCount
rs.AddNew
rs!班号 = rs2!班号
For j = 1 To 100
strsql = "Select * from 班级 where ID=" & rs2!Id - j
rs3.Open strsql, conn, 3, 3（运行到这里时，提示对象打开时，不允许操作），请问是哪里错了？

Answer 1

For j = 1 To 100
strsql = "Select * from 班级 where ID=" & rs2!Id - j
rs3.Open strsql, conn, 3, 3（运行到这里时，提示对象打开时，不允许操作），请问是哪里错了？ 你程序没贴完，不知道是不是这时的错误。你是要在FOR循环中打开RS3，那么在NEXT之前要关闭RS3，要不下次循环就要报这个错误

Answer 2

哈哈，，你有没有在编辑数据 库，有的话就会提示，数据在打开的时候是不能用open 33 来操作的