
Converting from Access97 to Access2000
I am converting from Access 97 to Access 2000. This code
used to work on Access 97
When I try to executed the following code, I get the
following error:
"This action was cancelled by an associated object."
Does anyone have a fix?
Dim rsAdd As Recordset
Dim CurStep%, CurPost%
gbFlag = False
Set rsAdd = Me.Steps_Subform.Form.RecordsetClone
If rsAdd.RecordCount = 0 Then
if no records in the recordset
With rsAdd
.AddNew
![Func_ID] = Me.Func_ID
![Posting] = "001"
![Steps] = "001"
![INSTRUCT] = "** New Step (Day Added) **"
.Update
End With
End if
End if
.