I have been trying to improve the speed of my database by implementing a Persistent Connection.

In order for the persistent connection to work, I need to keep this form open and kept Invisible.

I have been trying several ways to make the form invbisible to no avail. The form is currently opened by the 'StartUp' function under the Tool menu.

Can someone tell me where I am makign the error? Thanks!

Form name is system_version_check

Private Sub Form_Open(Cancel As Integer)
OpenAllDatabases True
On Error GoTo ErrorHandler
Dim StrVerClient As String
Dim StrVerServer As String
Dim stDocName As String

' Populate module level variables when form loads.
StrVerClient = Nz(DLookup("[ver_clt]", "[tbl_version_client]"), "")
StrVerServer = Nz(DLookup("[ver_ser]", "[tbl_version_server]"), "")
If (StrVerClient <> StrVerServer) Then
MsgBox "Your version of WAD is not up to date, please contact your database administrator", vbOKOnly, "Outdated WAD version"

Me.Visible = False

stDocName = "menu_main"
DoCmd.OpenForm stDocName

End If
ExitHere:
Exit Sub
ErrorHandler:
MsgBox "Take note of the error number and description" & vbCrLf & Err.Number & vbCrLf & Err.Description & vbCrLf & "Contact your database administator with that information", vbOKOnly, "Unplanned Error"

Resume ExitHere
End Sub

Start the form invisible from the AutoExec Macro.

__________________
HTH RuralGuy (RG for short) aka Allan Bunch MS Access MVP 2007 acXP WinXP Pro

II have been trying to do that to no avail.

The AutoExec macro command OpenForm does not allow the acHidden function..

So I tried with me.visible = false at the beginning of the code in form open also to no avail.

This has to be simple.. butI really dont get it..

At the bottom of the macro form is the Window Mode and Hidden is one of the choices. What version os Access are you using?

__________________
HTH RuralGuy (RG for short) aka Allan Bunch MS Access MVP 2007 acXP WinXP Pro

Access 2003.

When I select in the macro 'Hidden', the code in the form is not running.. Meaning that in the example provided, the message box is not appearing if the version are not identical..

You can open a form whose only purpose is to open your hidden form, and then close that.

For example, on the Auto Exec macro, open a splash form, then on the On Load event of the splash form, open the hidden form using:

DoCmd.OpenForm "frmMainForm", , , , , acHidden

Then put a 3 or 5 second timer interval on the splash form, then on the On Timer event, close the splash form and open your main user interface or switchboard.

Did that help?

__________________
mmcdonal

Look it up at: http://wrox.books24x7.com

Put the OpenForm outside of the If...End If code to see if it will open the form.

__________________
HTH RuralGuy (RG for short) aka Allan Bunch MS Access MVP 2007 acXP WinXP Pro