Status bar messages

Is there a way to stop MS-Access defaults messages, such as "Calculating...", "Run query" without hiding the status bar.

Regards,
Rene
rdevriendAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
GatsbyConnect With a Mentor Commented:
Hi rdevriend

Just use the below....

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

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

Gatsby

0
 
rdevriendAuthor Commented:
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
 
GatsbyCommented:
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
 
rdevriendAuthor Commented:
Gatsby,
Thanks, that was the trick, using db.Execute instaed of Docmd.OpenQuery. Here are the points.

Regards,
Rene


0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.