I have an access database that uses option group buttons to select record id's.
Security for users is one 1 of 4 choices
Administrator - full access to everything
SuperUser - full access to everything minus one form
User read write access to most forms
Reviewer read only access to everything
On one form, the users select the record they want to review. Ability to read/write or read only is set in a function where their rights are set depending upon their above roles and is passed as true/false,
All of this works fine with the exception of an option group. Regardless of their role, the option group needs to be available (enabled) so they can select the records to browse. I cannot get the option group to be available. When I click on it as a reviewer (read only), it will not take the selection.
I did this for each option button but it is still locked.
Prior to this function, the read only users have
thanks
lhuffst
Security for users is one 1 of 4 choices
Administrator - full access to everything
SuperUser - full access to everything minus one form
User read write access to most forms
Reviewer read only access to everything
On one form, the users select the record they want to review. Ability to read/write or read only is set in a function where their rights are set depending upon their above roles and is passed as true/false,
Code:
Function ContactInfo(OK)
txtbox1.locked = (OK)
txtbox2.locked = Not OK
All of this works fine with the exception of an option group. Regardless of their role, the option group needs to be available (enabled) so they can select the records to browse. I cannot get the option group to be available. When I click on it as a reviewer (read only), it will not take the selection.
Code:
cboProject.enabled = true
optContract.enabled = true
optContract.locked = false
Prior to this function, the read only users have
Me.AllowEdits = False
Me.AllowAdditions = False
Me.AllowDeletions = False
How can I allow the option group to be used but do not let the readonly users modify any records?Me.AllowAdditions = False
Me.AllowDeletions = False
thanks
lhuffst