Access97 to 2000 - TechRepublic
General discussion
January 7, 2002 at 09:35 PM
jim.brown

Access97 to 2000

by jim.brown . Updated 24 years, 3 months ago

the following code i use sucesfully in Access97, it basically minimize the database window leaving the form, but when i try and run this in Access2000 it fails

The Code is:

Option Compare Database
Option Explicit

Private Sub Form_Open(Cancel As Integer)
‘ Minimize the database window and initialize the form.

On Error GoTo Form_Open_Err

‘ Minimize the database window.
DoCmd.SelectObject acForm, “%formname%”, True
DoCmd.Minimize

‘ Move to the switchboard page that is marked as the default.
Me.Filter = “[ItemNumber] = 0 AND [Argument] = ‘Default’ ”
Me.FilterOn = False

Form_Open_Exit:
Exit Sub

Form_Open_Err:
MsgBox Err.Description
Resume Form_Open_Exit

End Sub

I don’t do to much programming and this one has been driving me nuts

This discussion is locked

All Comments