Help req about Error 3167

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi
I am trying to copy all the values from the recordset's currect record into
an array. But the code gives me an error saying "Record is deleted" with
Error Code 3167. My code is as follows:

Dim Old_History(30) As Variant 'This is a global variable

Following is code from a button. HistorySymptoms is a subform on the screen
with some fields of datatype Memo. Most of the time it crashes on those
fields, but not sure why?

For counter = 0 To 29

If IsNull(Me.HistorySymptoms.Form.RecordsetClone.Fiel ds(1 + counter).Value)
= False Then
Old_History(counter) = Me.HistorySymptoms.Form.RecordsetClone.Fields(1 +
counter).Value
End If
Next counter

Only I am using the application so no chance of deletion from someone else.
Any help would be appreciated.
RMA
 
Back
Top