Add incrementing numbers into a field.

[dimmslider]

Hey there.

I have a recordset with a bunch of users and passwords. What I wanna do is add an ID to each record... basically nubers from 1 to whatever.

It just goves random errors. Sometimes it does it right, although gives a EOF error on the last record(yet numbers the lot correctly)

Here's what I'm trying:

adoPrimaryRS.MoveFirst
For i = 1 To adoPrimaryRS.RecordCount
    adoPrimaryRS.Fields(0) = i
   If Not adoPrimaryRS.EOF Then adoPrimaryRS.MoveNext
Next
adoPrimaryRS.Update

Where am I going wrong?