G
Guest
New to coding - I'm getting a RunTime error 3426_This action was cancelled
by an associated object.
The code looks like this ( Debug high lites the AddNew Line)
Private Sub txtDateReturnedtoVHO_AfterUpdate()
'Write additional Record to tblVendorRepair
Me.RecordsetClone.AddNew
Me.RecordsetClone!fldOrderDetailID = Mid(Me.txtRMANumber, 5)
Me.RecordsetClone!fldDateToVHO = txtDateReturnedtoVHO
Me.RecordsetClone!fldRMANumber = txtRMANumber
Me.RecordsetClone!fldReasonForReturn = txtReasonForReturn
Me.RecordsetClone!fldNCWarranty = -1
Me.RecordsetClone.Update
MsgBox ("Record Written To TblVendorRepair")
The strange part is that at work (Win 2000 and office xp) its ok, at home
(Win XP, office 2000) it doesnt work. However. I put together another PC
at work using win 2000 and office 200 and it doesn't work on that system
either. I checked the references and I made them the same.
by an associated object.
The code looks like this ( Debug high lites the AddNew Line)
Private Sub txtDateReturnedtoVHO_AfterUpdate()
'Write additional Record to tblVendorRepair
Me.RecordsetClone.AddNew
Me.RecordsetClone!fldOrderDetailID = Mid(Me.txtRMANumber, 5)
Me.RecordsetClone!fldDateToVHO = txtDateReturnedtoVHO
Me.RecordsetClone!fldRMANumber = txtRMANumber
Me.RecordsetClone!fldReasonForReturn = txtReasonForReturn
Me.RecordsetClone!fldNCWarranty = -1
Me.RecordsetClone.Update
MsgBox ("Record Written To TblVendorRepair")
The strange part is that at work (Win 2000 and office xp) its ok, at home
(Win XP, office 2000) it doesnt work. However. I put together another PC
at work using win 2000 and office 200 and it doesn't work on that system
either. I checked the references and I made them the same.