Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

Confirm Action Queries

Posted on 2000-05-09
8
Medium Priority
?
1,293 Views
Last Modified: 2010-10-05
I would like to turn off the three checkboxes under "Tools--Options--Edit/Find Tab--Confirm" using a macro or visual basic code.  These checkboxes turn off confirmation messages for Action Queries, Record Changes, and Document Deletions.

These settings are not saved with the database, instead they are computer specific.  I would like to be able to turn them off when starting up an application so that each user does not have to go in and manually turn them off.

I am aware of the SetWarnings method, but it seems to turn off more than what I want it to (all modal messages).  
0
Comment
Question by:Johannes030399
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
8 Comments
 
LVL 10

Accepted Solution

by:
paasky earned 150 total points
ID: 2792544
Hello Johannes,

You could try these functions:

This function is called from the startup form or Autoexec macro

Public Function Initialize() as Boolean
   Application.SetOption "Confirm Action Queries", False    
.....
End Function


And this function to quit application:

Public Function Quit_Application()
   if msgbox ("Do you want to quit",vbYesNo,"Quit?") = vbNo then exit sub
   Application.SetOption "Confirm Action Queries", True    
.....
End Function

Hope this helps,
Paasky
0
 
LVL 4

Expert Comment

by:berg1375
ID: 2792559
If you set the warnings to false on start up, you can then set them back to true when you are done with the code and startup.

0
 
LVL 10

Expert Comment

by:paasky
ID: 2792562
If you want to restore the original setting value (user may have turned warnings off), you should store the value in the table or global variable.

To get the value of this setting, here's an example:

OriginalSetting = Application.GetOption ("Confirm Action Queries")

Paasky
0
Efficient way to get backups off site to Azure

This user guide provides instructions on how to deploy and configure both a StoneFly Scale Out NAS Enterprise Cloud Drive virtual machine and Veeam Cloud Connect in the Microsoft Azure Cloud.

 
LVL 5

Expert Comment

by:KMAN
ID: 2792563
These are registry settings.  

HKEY_CURRENT_USER\Software\Microsoft\Office\8.0\Access\Settings

Confirm Action Queries
Confirm Document Deletions
Confirm Record Changes

These are DWORDs, Set to 0 for no confirmation.
0
 
LVL 10

Expert Comment

by:paasky
ID: 2792571
and then assign the original value of setting when you quit:

Public OriginalSetting As Boolean

.....

Application.SetOption "Confirm Action Queries", OriginalSetting  
0
 

Author Comment

by:Johannes030399
ID: 2792690
Thanks.  It's a little slower than I expected (hoped) it would be, but I guess there is no way around that.
0
 
LVL 5

Expert Comment

by:KMAN
ID: 2792723
Keep in mind all other Access instances will also be affected by the changes made by your application.  You might also consider doing these registry changes during an install, instead of each session.
0
 
LVL 10

Expert Comment

by:paasky
ID: 2792733
You're welcome Johannes.

Regards,
Paasky
0

Featured Post

Tech or Treat!

Submit an article about your scariest tech experience—and the solution—and you’ll be automatically entered to win one of 4 fantastic tech gadgets.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article describes two methods for creating a combo box that can be used to add new items to the row source -- one for simple lookup tables, and one for a more complex row source where the new item needs data for several fields.
Explore the ways to Unlock VBA Project Password Excel 2010 & 2013 documents. Go through the article and perform the steps carefully to remove VBA Excel .xls file.
In Microsoft Access, learn how to use Dlookup and other domain aggregate functions and one method of specifying a string value within a string. Specify the first argument, which is the expression to be returned: Specify the second argument, which …
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …

636 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question