Record Locks

[Wayneyh]

Hello again

My Next issue is when I open a form I want all the records to be locked or read only. If any records need to be edited the user will click a button to unlock all the records.

Can you help

Regards

Wayne

[missinglinq]

Make records Read-Only

Private Sub Form_Load()
 Me.AllowEdits = False
End Sub

Create a button to unlock record

Private Sub CmdEditRecord_Click()
 Me.AllowEdits = True
End Sub

Re-lock records when moving to a different record

Private Sub Form_Current()
 Me.AllowEdits = False
End Sub

Linq ;0)>

[Wayneyh]

Hi Missinglinq

I tried it that way but i can still edit the records.

Ant ideas?

[Wayneyh]

Hi Missinglinq

My mistake. It does work but it doesn't work for the very first record.

Is there a way to stop this?

Wayne

[NeoPa]

My mistake. It does work but it doesn't work for the very first record.

Is there a way to stop this?

Design the form in the first place with AllowEdits set to False.