No action button

[dlewicki]

I have a button which is supposed to load a form on the click event, however, nothing happens. Here's the code...


Private Sub home_Click()
On Error GoTo Err_home_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "sample switchboard"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_home_Click:


Exit Sub
Err_home_Click:
MsgBox Err.Description
Resume Exit_home_Click

End Sub

Cna anyone help?

[RuralGuy]

Do you have a form named "sample switchboard"?

[dlewicki]

Yes, I have a form by that name.

[dlewicki]

This piece of code is also being used by other forms (on a button click) to bring it back to the sample switchboard form. The code is working in the other places but not in this place.

[RuralGuy]

When you look at the property sheet for the "Home" button, do you see "[Event Procedure]"? Push the "..." button there. Does it take tou to the code? Put a MsgBox in the code to make sure the code is actually executing.

[dlewicki]

Thanks for the help. I found the problem... the security issue button popped up on the database and I granted permissions.

[RuralGuy]

That's great! Are you ready to follow the link in my sig and mark this thread as Solved.