ViewEvent

  • Thread starter Thread starter Zanstemic
  • Start date Start date
Z

Zanstemic

This is a new database in Access and I'm trying to use ViewEvent when double
clicking on a listing in a subform.

The error message is: Sub or Function not defined

I've used this in previous databases though always started with a sample
database so I'm anticipating that something is not loaded.

Any suggestions on how to get the "VeiwEvent" in an event procedure working?
 
I have used it before in a database that started with a sample supplied by
MicroSoft for registering participants in training classes.

It was supplied through MicroSofts template and sample database area. When I
looke through the database, it was not contained in the Global Module.

When I go to debug in code view and select the Function ViewEvent, it shows
be a list of items to select, would you know what these are called and where
that list is defined?

If it is a user defined function, I'm not sure where to look to find it.
 
Below is the Sub with the definition. Thanks for helping to track it down.

Private Sub ViewEvent()
On Error GoTo Err_ViewEvent
If Me.Status = 9 Then
DoCmd.OpenForm "Event", , , "[EventID] = " & Me.EventID
ElseIf Me.Status = 1 Then
DoCmd.OpenForm "Event_pd", , , "[PeopleID] = " & Me.PeopleID
Else
DoCmd.OpenForm "Registration", , , "[EventID] = " & Me.EventID
End If
Exit_ViewEvent:
Exit Sub

Err_ViewEvent:
MsgBox Err.Description
Resume Exit_ViewEvent
End Sub
 
Back
Top