John Eget
joeget at vgernet.net
Sun Dec 9 21:07:19 CST 2007
Anyone
I have a database that works fine in 2003, but when I open it in 2007 I get an error code popup when I open my splash screen that states "Invalid procedure call or argument". I have isolated it (at least I think so) to the following area within the Splash Screen:
Private Sub Form_Open(Cancel As Integer)
On Error GoTo Form_Open_Error
' Check to see if EASILOOK Back End XP is available.
If modRefreshTableLinks.CheckLinks() = False Then
' Try to relink the tables; if it fails, shut down EASILOOK Front End XP Application.
If modRefreshTableLinks.RelinkTables() = False Then
DoCmd.Close acForm, "frmSplash"
'Closes EASILOOK Front End XP Application
DoCmd.Quit
End If
End If
Call SetEnabledState(True) 'Enables application close and exit capability
'Call SetEnabledState(False) 'Disables application close and exit capability
Form_Open_Exit:
Exit Sub
Form_Open_Error:
MsgBox Err.Description
CloseCurrentDatabase
Resume Form_Open_Exit
End Sub
If i comment out the Call SetEnabledState area the form works fine.
I also have a module that states:
Public Function SetEnabledState(blnState As Boolean)
Call CloseButtonState(blnState)
Call ExitMenuState(blnState)
End Function
I am at a loss as to why this is happening.
My Tool-References are as follows:
Visual Basic for Applications
Microsoft Access 12.0 Object Library
Microsoft DAO 3.6 Object Library
Microsoft ActiveX Data Objects 2.5 Library
Microsoft Visual Basics for Applications Extendibility 5.3
OLE Automation
All of the above works perfectly in 2003
Anyone have any ideas??