before update event

[Guest]

I have a form . there are two fields "currency" and "payee". both i use combo
to show list of currency codes and list of payees.what i am trying to do is :
on the before update event of "payee" :-
Private Sub PAYEE_BeforeUpdate(Cancel As Integer)
If [CURRENCY] <> "GBP" Then
If [PAYEE] = "copmanyname" Then
MsgBox "Invalid Currency code/Payee"
Cancel = True
End If
End If
End Sub
(for this company i want it not to accept other than GBP)
i have code on the before update event of payee .but i dont know why it will
not promt.it is moving to the next field.but , if i use text field instead of
combo. the same code will work.any one can help me with this.

 

[Guest]

Move it to the After Update event. I would also change the code a little:

Private Sub PAYEE_BeforeUpdate(Cancel As Integer)
If Me![PAYEE] = "copmanyname" Then
If Me![CURRENCY] <> "GBP" Then
MsgBox "Invalid Currency code/Payee"
Cancel = True
End If
End If
End Sub

 

[Rick Brandt]

Move it to the After Update event. I would also change the code a
little:

Private Sub PAYEE_BeforeUpdate(Cancel As Integer)
If Me![PAYEE] = "copmanyname" Then
If Me![CURRENCY] <> "GBP" Then
MsgBox "Invalid Currency code/Payee"
Cancel = True
End If
End If
End Sub

AfterUpdate cannot be cancelled so moving the code to that event won't work.

 

[Guest]

Right, sorry about that.

Move it to the After Update event. I would also change the code a
little:

Private Sub PAYEE_BeforeUpdate(Cancel As Integer)
If Me![PAYEE] = "copmanyname" Then
If Me![CURRENCY] <> "GBP" Then
MsgBox "Invalid Currency code/Payee"
Cancel = True
End If
End If
End Sub

AfterUpdate cannot be cancelled so moving the code to that event won't work.