没有cancelupdate取消添加,就再次添加,出现addnew is error建议:使用事件来完成
COMMITTRANS以后出错了要ROLLBACK 啊
第一问我想知道,为什么开始引发错误的是Update,现在却是AddNew? 再次AddNew时,因为数据库已经处于AddNew之后状态,所以出错。第二,我想知道,增加rsCnn_tbl_cq.CancelUpdate这么一句,为什么添加数据不成功? 取消了添加,当然不成功了。建议你用下面的代码,如果重复数据之后还有正确数据,将继续执行:on error goto ErrorHandler With rsCnn_tbl_cq .AddNew !cq_cq = CStr(cobCq_cq) !cq_weizi = txtCq_weizi .Update End With rsCnn_tbl_cq.Requery Exit Sub ErrorHandler: If Err.Number = -2147467259 Then Resume Next Else msgbox "......" exit sub End If
再次AddNew时,因为数据库已经处于AddNew之后状态,所以出错。第二,我想知道,增加rsCnn_tbl_cq.CancelUpdate这么一句,为什么添加数据不成功?
取消了添加,当然不成功了。建议你用下面的代码,如果重复数据之后还有正确数据,将继续执行:on error goto ErrorHandler
With rsCnn_tbl_cq
.AddNew
!cq_cq = CStr(cobCq_cq)
!cq_weizi = txtCq_weizi
.Update
End With
rsCnn_tbl_cq.Requery
Exit Sub
ErrorHandler:
If Err.Number = -2147467259 Then
Resume Next
Else
msgbox "......"
exit sub
End If