access 16, add a field that will keep track on the number of changes done to a record

[akika]

Hii,




How can keep track on the number of changes done to a record in field "change_no".

Is it ok to used below code for audit... In the form & table i created fields modify_date, modify_by, create_by, create_date which are being populated.

Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.modify_date = Now()
Me.modify_by = Environ("USERNAME")


End Sub


Private Sub Form_Current()
If Me.NewRecord Then
Me.create_by = Environ("USERNAME")
Me.create_date = Now()
End If
End Sub

[June7]

Seems your structure allows only one modification to a record and that might suit your situation. But if you want to allow many edits to record, unless you create a new record for each change, there is nothing on which to base an audit.

Assuming you create a new record for each change, build a query that calculates a count of the change orders per project (or whatever your primary entity is).

Review http://allenbrowne.com/AppAudit.html

[Gicu]

You could try to initialize the change_no=1 in the Current event then in the BeforeUpdate keep incrementing (Me.change_no=Me.change_no + 1).

Cheers,