Bueno...vamos a ver...el acces efectivamente no tiene PA's pero tiene modulos que son muy utiles (si sabes programar en VBA)
Te he hecho un pequeño ejemplo para que lo veas:
Código:
Public Function Crear() As Boolean
Dim Rc As DAO.Recordset
Dim Cont As Long
Dim v_Anterior As String
Set Rc = CurrentDb.OpenRecordset("Select * from Tabla1 order by CodigoA")
If Not Rc.EOF Then
Rc.MoveLast: Rc.MoveFirst
v_Anterior = "######"
While Not Rc.EOF
If Rc!CodigoA <> v_Anterior Then
v_Anterior = Rc!CodigoA
Cont = 1
End If
CurrentDb.Execute ("UPDATE Tabla1 SET NuevoB = '" & Rc!CodigoA & CStr(Cont) & "' Where CodigoA = '" & Rc!CodigoA & "' And CodigoB = '" & Rc!CodigoB & "'")
Cont = Cont + 1
Rc.MoveNext
Wend
End If
End Function
Estoy actualizando un campo nuevo que me he creado en la tabla para poder realizar las actualizaciones (no se puede actualizar directamente en el campo porque si no no funciona el codigo).
Para ejecutarlo dale a F5 en el mismo editor del modulo donde lo has creado.
Mira a ver si lo entiendes. Si tienes dudas mandame un mp. ;)
Salud.