Permission to edit

S

SF

Hi,

I have the following code bound to a bottun on a subform, It work great. Is
it possible to modify this code to allow another person supervisor (eg
fOSUserName() = HiSuper) to edit the record beside the owner

If Forms![frmProject]![SubForm].Form![Owner] = fOSUserName() Then
Me.AllowEdits = True
Else
MsgBox "You are not the owner of this project", vbOKOnly +
vbInformation, "No permission"
End If


SF
 
T

Tom van Stiphout

Sure. Change the first line to:
If Forms![frmProject]![SubForm].Form![Owner] = fOSUserName() or If
Forms![frmProject]![SubForm].Form![Owner] = "HiSuper" Then

-Tom.
Microsoft Access MVP
 
Top