Any other events cause errors in already working events

[dniezby]

Any thoughts on why if I add a different trigger event for the same object I get errors?

I have a On Current event for a form and I wanted to do something On Dirty but it gives me an error....And NOT in my current code. It's pointing out stuff in earlier code that DOES work until I put in the new OnDirty code?

[rzw0wr]

Examples of code and events, please.

Dale

[dniezby]

Well, it's wasn't really code specific. It was meant as a WTF...But I supposed I could put something up here as an example.

Okay; this code works. It's in a textbox on my member's page that displays a running total on the member's detail page.

=DSum("player_points","plr_transactions","member=" & [ID_memtbl])

Now, if I add anything like:

Private Sub Form_Dirty()

record_modified = Now()
End Sub

When I run the form, the code above that WORKS, suddenly doesn't.

I also have some more code that the form uses:

Private Sub Form_Current()
'Check to see if someone erased the memberID and it's blank.
    If IsNull(Me!member_id) Then
    'Alert the user that the member ID has been deleted.
        MsgBox "The ID of this player is missing or has been deleted. We will assign a new one."
    ' Assign the member a new ID
     Me!member_id = DMax("member_ID", "members") + 1
'If the memberID is new record then find the last ID entered and increment it.
   If Me!member_id = 0 Then Me!member_id = DMax("member_ID", "members") + 1
   End If
End Sub

This code ALSO works UNTIL I put in more code in a different Subroutine.

[dniezby]

HA OMG I'm such an idiot sometimes. I figured out what was going on.

I wanted to update show an example to someone about how to use an updating timestamp to show when a record was edited or modified last and forgot to put in:
(cancel as Integer)