[Last Call] Learn how to a build a cloud-first strategyRegister Now

x
?
Solved

Status bar messages

Posted on 2001-08-27
4
Medium Priority
?
821 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
  • 2
  • 2
4 Comments
 

Accepted Solution

by:
Gatsby earned 200 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

NEW Veeam Agent for Microsoft Windows

Backup and recover physical and cloud-based servers and workstations, as well as endpoint devices that belong to remote users. Avoid downtime and data loss quickly and easily for Windows-based physical or public cloud-based workloads!

Question has a verified solution.

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

We live in a world of interfaces like the one in the title picture. VBA also allows to use interfaces which offers a lot of possibilities. This article describes how to use interfaces in VBA and how to work around their bugs.
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.
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…

825 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