Deleting of one field the second data for another field is updated in forms

[tekerin]

Hello,

I have a form that is linked to a table. Example:
<Customer Name>
<ID>
<Approval Button>
<Approval Status>


Currently, the <Approval Button> (noted as AppBtn below) is only shown when the person loading access has a logon ID that matches the "Developer" status. This has been defined in separate module and is working properly. This was added so that when records are added, it's only live when a "Developer" checks off the approval button, and "Developer" status is dependent on logon ID to the terminal.

What I am trying to do, and stuck on, is that once a Developer approves the entry through checking the approval button, any user has the ability to change the data, and the updated entry does not need to be re-approved. What do I need to do to say if the data in <Customer Name>, <ID> was changed, then the <Approval Status> will become null again?

Thanks



--- Code used to "hide" the Approval Button----
Private Sub Form_Load()
Me.AppBtn.Visible = False
If Developer = True Then
Me.AppBtn.Visible = True
End If
End Sub
-----------------------------------------------

[June7]

Want the approval button only if the form is on a new record? Or only when Approval Status is null? In any case, only when the user is Developer?

[tekerin]

I currently have the approval button for all records which I think would work because it allows the developer to uncheck any records in the future if choose to. An example of what I am trying to do right now:

<customer name> = tekerin, <id> = tek, <approval btn> - only June7 can access, and was checked off by June7, in access table, this field would then show as "-1" as it's linked to a checkbox, <approval status> = yes, this status is basically linked to <approval btn>, and if the value = -1, then it will read yes, otherwise no

all this above is working fine so far, but i was hoping to add an extra layer of security where <customer name> or <id> if any parts of it was updated, even adding a space or deleting a letter, it would automatically trigger <approval btn> to be 0, or null again, and of course <approval status> would also resulting in being updated.

thanks again

[June7]

Maybe use the BeforeUpdate event of control or form.

Code in the Load event could simply be:

Me.AppBtn.Visible = Me.Developer = True

[tekerin]

Woah, you are a genius and life saver! I added this to the critical fields that I wanted reaprpovals when values are updated and it's working now.

Private Sub Customer_Name_AfterUpdate()
AppBtn = 0

End Sub