Solved

Status bar messages

Posted on 2001-08-27
4
810 Views
Last Modified: 2008-04-02
Is there a way to stop MS-Access defaults messages, such as "Calculating...", "Run query" without hiding the status bar.

Regards,
Rene
0
Comment
Question by:rdevriend
[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
  • 2
  • 2
4 Comments
 

Accepted Solution

by:
Gatsby earned 50 total points
ID: 6428324
Hi rdevriend

Just use the below....

-- To Set The Message -------------
Call SysCmd(acSysCmdSetStatus, "HI THERE!!")

-- To Clear The Message -----------
Call SysCmd(acSysCmdClearStatus)

Gatsby

0
 

Author Comment

by:rdevriend
ID: 6428371
Gatsby

I already tried that one, but it doesn't work in the way I want. In a complex part of my program, a lot of queries (adding, deleting, updating) are performed. This process takes about 30 seconds. Each query itself shows "Calculating...", "updating", etc which causes a lot of flashing messages in the statusbar. Now, with the SysCmd, you see "Hi there" flashing between the other messages. That's why I want to get rid of the default MS-Access messages, but SysCmd is not doing that.

Any other suggestion?

regards,
rene
0
 

Expert Comment

by:Gatsby
ID: 6428387
Hi Rene

Sorry...Didn't read your question right the first time...

This will clear the status bar for some of the default messages but I don't think it will work for what you are looking for.

Call SysCmd(acSysCmdSetStatus, "  ")

Also, when running queries, don't use the DoCmd.OpenQuery method...instead use something like....

Dim db As DAO.Database
Set db = CurrentDb
Call SysCmd(acSysCmdSetStatus, "   ")
db.Execute "UPDATE tblTest SET FieldTest = 1;"
db.Close
Set db = Nothing

This won't give you the status bar.

Gatsby
0
 

Author Comment

by:rdevriend
ID: 6428549
Gatsby,
Thanks, that was the trick, using db.Execute instaed of Docmd.OpenQuery. Here are the points.

Regards,
Rene


0

Featured Post

Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

Question has a verified solution.

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

Describes a method of obtaining an object variable to an already running instance of Microsoft Access so that it can be controlled via automation.
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.
What’s inside an Access Desktop Database. Will look at the basic interface, Navigation Pane (Database Container), Tables, Queries, Forms, Report, Macro’s, and VBA code.
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…

695 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