我在编写通讯录删除功能的代码时
用的是如下语句

Private Sub Command3_Click() '删除联系人信息
If Adodc1.Recordset.RecordCount > 0 Then
a = MsgBox("您确实要删除这条数据吗?", vbYesNo)
If a = vbYes Then '删除当前记录
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.MoveNext
Else
Adodc1.Recordset.MoveFirst
End If
End If
End If
End Sub
可是在运行程序的时候总是Adodc1.Recordset.Delete语句报错 而且系统提示说
“多步操作产生错误 请检查每一步的状态值”
到底是什么原因啊
恳请各位指教

我使用ADODC连接数据库后...复制你的代码.测试了一下...没有问题....

就是啊 我也觉得奇怪 都说没问题 可我一运行它就报错 到底错在什么地方呢
难道是某个属性没设好还是什么铺垫没打好 对于可能出错的未知的因素 我觉得很困惑
对于报错的语句提示 斑竹能不能看出什么端倪 如果有的话 望明示 谢谢

[此贴子已经被作者于2006-7-7 17:07:48编辑过]

你在代码编辑窗口的 “通用”里加入： Option Explicit
然后运行应该能发现其他错误了

不知道楼上是否知道Option Explicit是什么!!....
这个只是要强制声明变量的意思....与ADO处理没关...

我这几天都在做图书馆管理系统。很多错误都是显示在ADO，但就是找不出来。问老师他就是加进了Option Explicit 之后就在ADO处理之前显示了很多错误，老师说这个是测试的

谢谢两位了 尤其要感谢斑竹 现在我的问题解决了 就不再麻烦了
再一次的致谢

楼主的签名我有体会.