Updating a field value to null errors out

This should be a piece of cake for you experts - and maybe it's just too early for me but the attached snippet is causing an error I haven't been able to zero in on as yet.
In Access 2002, I have a table where the client name is often repeated. The goal is to replace the name with a null/space for every record except 1. I don't want to delete any record, only erase the value in the name and SSN fields.

The loop works as it should but the error is occuring on the rst.Fields("FULLNAME") = "" line

Can someone tell me what I'm doing wrong with the attached?Start Free Trial

1:
2:
3:
4:
5:
6:
7:
8:
9:

If lngClient = rst.Fields("CLIENT") Then
                rst.MoveNext
                If lngClient = rst.Fields("CLIENT") Then
                    rst.Fields("FULLNAME") = ""
                    rst.Fields("SSN") = ""
                    rst.Update
                End If
                Exit Do
            End If