Recordset.edit in a Loop (VB6 DAO)

Hate Myself for doing a thread out of this, The Solution:

Code:

Dim R As Integer
        Dim C As Integer
        C = 0
        R = 1
        Do Until C = FGfac.Rows - 1
        If cmdagregar.Enabled = True Then
        RST.AddNew
        Else
        RST.Edit
        End If
        RST![N° Factura] = txtnumfactura
        RST![Codigo Producto] = FGfac.TextMatrix(R, 0)
        RST![Cantidad Producto] = FGfac.TextMatrix(R, 2)
        C = C + 1
        R = R + 1
        RST.Update
If cmdagregar.Enabled = False Then
        RST.MoveNext
End If
        Loop
RST.Close

Works like a charm now