T
Topcat668
Error Text:
This action can't be carried out while processing a form or report event.
Code:
rivate Sub Command2_Enter()
On Error GoTo Err_Command2_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmDaysAttending"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "Switchboard", acSaveNo
Exit_Command2_Click:
Exit Sub
Err_Command2_Click:
Debug.Print Err.Description & " " & Err.Number & " " & Err.HelpContext
Resume Exit_Command2_Click
End Sub
I'm trying to use a switchboard form to control access to different forms.
I am closing the switchboard when a user clicks to go into a different form.
The frmDaysAttending does not have any code that runs in any of the form
events or detail events.
The data behind the form is derived from a query linking four tables
together. These links are defined in the Relationships area.
Tim
This action can't be carried out while processing a form or report event.
Code:
rivate Sub Command2_Enter()
On Error GoTo Err_Command2_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmDaysAttending"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "Switchboard", acSaveNo
Exit_Command2_Click:
Exit Sub
Err_Command2_Click:
Debug.Print Err.Description & " " & Err.Number & " " & Err.HelpContext
Resume Exit_Command2_Click
End Sub
I'm trying to use a switchboard form to control access to different forms.
I am closing the switchboard when a user clicks to go into a different form.
The frmDaysAttending does not have any code that runs in any of the form
events or detail events.
The data behind the form is derived from a query linking four tables
together. These links are defined in the Relationships area.
Tim