why i can't to use the recordset.update?
when i used the following code, it said "This action is cancelled by an associated object."....
Private Sub Command4_Click()
Dim Position As Variant
Dim s As String
On Error GoTo UpdateErr
BeginTrans
Data1.Recordset.Update
CommitTrans
Data1.Refresh
Initial_Button
Exit Sub
UpdateErr:
Rollback
MsgBox Err.Description
End Sub
when i used the following code, it said "This action is cancelled by an associated object."....
Private Sub Command4_Click()
Dim Position As Variant
Dim s As String
On Error GoTo UpdateErr
BeginTrans
Data1.Recordset.Update
CommitTrans
Data1.Refresh
Initial_Button
Exit Sub
UpdateErr:
Rollback
MsgBox Err.Description
End Sub
全站熱搜
留言列表