Openning File

dgmorr

Registered User.
Local time
Today, 11:16
Joined
Jan 10, 2007
Messages
71
Hey guys,

If I change the startup properties to not show full menus, how do I get around that to be able to see them again?
 
Look at Application.SetOption :

http://msdn2.microsoft.com/en-gb/library/aa140014(office.10).aspx


For example in my application I get the user's original options when the application starts, and sets them while they use my application.
Then set them back to the user's Original Settings (Have to set Global Variables):

Public gblnSave_Confirm_RecordChanges As Boolean
Public gblnSave_Confirm_DocumentDeletions As Boolean
Public gblnSave_Confirm_ActionQueries As Boolean

'++++++++++++++++++++++++++++++++++++++++
'Do this start of Application
'Get user's original options setters
Call GetOptionsForDb

'Set options to false for confirmation of record editions
Call SetOptionsForDb(False, False, False)

'+++++++++++++++++++++++++++++++++++++++++++
'Stick this in any module
Public Sub SetOptionsForDb(Confirm_RecordChanges As Boolean, Confirm_DocumentDeletions As Boolean, _
Confirm_ActionQueries As Boolean)

Application.SetOption "Confirm Record Changes", Confirm_RecordChanges
Application.SetOption "Confirm Document Deletions", Confirm_DocumentDeletions
Application.SetOption "Confirm Action Queries", Confirm_ActionQueries

End Sub

'+++++++++++++++++++++++++++++++++++++++
'Stick this in any module
Public Sub GetOptionsForDb()
'Get user's Original Settings

gblnSave_Confirm_RecordChanges = Application.GetOption("Confirm Record Changes")
gblnSave_Confirm_DocumentDeletions = Application.GetOption("Confirm Document Deletions")
gblnSave_Confirm_ActionQueries = Application.GetOption("Confirm Action Queries")

End Sub

'+++++++++++++++++++++++++

'On Exit Db set user's original Application setters

Call SetOptionsForDb(gblnSave_Confirm_RecordChanges, gblnSave_Confirm_DocumentDeletions, _
gblnSave_Confirm_ActionQueries)
 
Startup your database while pressing down on the shift key.
 

Users who are viewing this thread

Back
Top Bottom