Record Locked Status

[Gary_Mc_Mahon]

Hi,

I have created on open and on close events in my main form to edit lock the records on open and remove the locks when the form is closed. The reason for this is that when toggling between screens I had problems when I leave the edit record locks on permanently.

What I'd like to do is display a message on the form screen when the record is actually locked.

Any tips with the syntax. Is current event the right one??

Private Sub Form_Current()

If 'record is locked' then
Msgbox("Record is locked for editing")
Else
End If

End Sub

Cheers
Gary

 

[Cbrine]

Gary,
You could try opening the record and monitoring for the error that occurs because the record is locked. Don't know if this will help you or not.

 

[bat17]

As you are all ready running code you could just create a label on the form giving the warning and turn its visibility on and off at the same time as you change the locks.

Peter