Exit Application from Switchboard

[Catalyst159]

I am using a Switchboard that contains an 'Exit Application' button. The code that the Switchboard uses for exiting the application is:
' Exit the application.

 Case conCmdExitApplication
            CloseCurrentDatabase

This does not actually Exit the Application as I would like. It only closes the db. I would like to close the db and exit Microsoft Access completely. Any help, tips, ideas or input is welcome. I appreciate any assistance. Thanks in advance.

[dsatino]

Just put this in the onclick event:

docmd.quit

[Catalyst159]

How can I tell which button it is if I used the switchboard manager to create the switchboard.

[Catalyst159]

Looks like the button is referred to as "Option 3". I am using the following in the 'OnClick' event procedure and it seems to work ok:

If MsgBox("Are you sure that you want to quit this database?", vbQuestion + vbYesNo + vbDefaultButton2) = vbYes Then
DoCmd.Quit
End If

[NeoPa]

DoCmd.Quit is provided for backwards compatibility. The recommended approach is to use the Application's Quit(Option) method, where you can choose whether or not objects are saved automatically or the operator is prompted.

[Catalyst159]

How can I make sure that the objects are saved automatically?

Would this work:

Private Sub Option3_Click()
If MsgBox("Are you sure that you want to quit this database?", vbQuestion + vbYesNo + vbDefaultButton2) = vbYes Then
Application.Quit (acQuitPrompt)
End If
End Sub

Or will you get a prompt asking to save when using (acQuitPrompt).

Or would Private this be better:

Sub Option3_Click()
If MsgBox("Are you sure that you want to quit this database?", vbQuestion + vbYesNo + vbDefaultButton2) = vbYes Then
Application.Quit (acQuitSaveAll)
End If
End Sub

[NeoPa]

You were so quick you missed me updating the post.

Actually, a very quick check (even typing the command prompts you with the available options) would have helped you realise that line #3 should be :

Call Quit(acQuitSaveAll)

PS. It seems you've realised this for yourself now. It is generally a good idea to have a little bit of a think and a check before firing off posts. Otherwise it results in a rambling mess. I'll tidy this up where I can.