Getting run-time error '5' with resort command button

[tobydobo]

Hello,

Strange issue with my resort command button. This was working fine until I imported my client form into another database. Now Im getting an error on the first line. What gives?

Private Sub SortSite_Click()


If Me.SortSite.Caption = "Sort (Z-A)" Then

DoCmd.GoToControl "Supported Site(s)"
DoCmd.RunCommand acCmdSortAscending
Me.SortSite.Caption = "Sort (Z-A)"

Else

DoCmd.GoToControl "Supported Site(s)"
DoCmd.RunCommand acCmdSortDescending
Me.SortSite.Caption = "Sort (A-Z)"

End If

End Sub

[Robeen]

In the other database - can you re-create the button and it's On Click Event and make it work?
I know that doesn't answer your question, but I'm curious - because I don't see a reason for the code not to work.

[tobydobo]

I have not tried that....I will let you know. Thanks.