Record locking

[Mark]

Hi

Having created and implemented a database, I wish to lock (prevent further
changes) a record when the data entry has been completed, by say having a
'completed' check box on the form that locks that particular record,
although new records can continue to be entered and edited (until
'completed').

How might I go about implementing this?

Cheers

[bsn]

"Mark" <ms*********@btinternet.com> skrev

Having created and implemented a database, I wish to lock (prevent further
changes) a record when the data entry has been completed, by say having a
'completed' check box on the form that locks that particular record,
although new records can continue to be entered and edited (until
'completed').

How might I go about implementing this?

U should use the Form BeforeUpdate(maybe ask a question before saving) or
Form AfterUpdate(check box = -1) event...
Bjarne

[jasmith]

Assuming that the completed checkbox is bound, create a function in
your form with the following code

Public Function LockRecord()

If me.chkComplete = True Then
me.AllowEdits = False
me.lblStatus.Caption = "Data entry is complete. Edits are locked."
Else
me.AllowEdits = True
me.lblStatus.Caption = "Whatever"
End If

End Function

In the Forms current event and the after update event of the check box
enter:

=LockRecord

You may want to add some code to confirm before locking the edits.

Jason

[jasmith]

Assuming that the completed checkbox is bound, create a function in
your form with the following code

Public Function LockRecord()

If me.chkComplete = True Then
me.AllowEdits = False
me.lblStatus.Caption = "Data entry is complete. Edits are locked."
Else
me.AllowEdits = True
me.lblStatus.Caption = "Whatever"
End If

End Function

In the Forms current event and the after update event of the check box
enter:

=LockRecord

You may want to add some code to confirm before locking the edits.

Jason