Display Query Name in Status Bar Text

[Ross]

The Status Bar says "Query Running". The query is are being run/opened
using VBA. How can I get the status bar to display the name of the query
that it is preseently processing?

Many Thanks!

Ross

 

[TC]

There's a syscmd syntax to display a message on the status bar. Use
that to display your message. /Perhaps/ Access will retain that
message, while the query runs, instead of overwiriting it. I don't
know, but it woould be easy to try.

HTH,
TC

 

[Ross]

I did a google search on SysCMD, which I am not familiar with. I found this
reference
(http://msdn.microsoft.com/library/d...en-us/vbaac11/html/acmthSysCmd_HV05186385.asp)
which says that you can use the following to control the text in the status
bar. However, the article doesn't show explicitly how to use it.

Any experience with this?

The directions describe this:

varReturn = SysCmd(acSysCmdInitMeter, " ", 100) (To eleiminate the meter
display)

varReturn = SysCmd(acSysCmdSetStatus, " ") (To elimate the status bar display)


Thanks

Ross

 

[TC]

Sorry, I don't have Access here to check.

It's one of the other parameters: syscmdsetstatus, or somesuch.

Just look it up in F1 help - it should be there, with examples.

HTH,
TC

 

[fredg]

I did a google search on SysCMD, which I am not familiar with. I found this
reference
(http://msdn.microsoft.com/library/d...en-us/vbaac11/html/acmthSysCmd_HV05186385.asp)
which says that you can use the following to control the text in the status
bar. However, the article doesn't show explicitly how to use it.

Any experience with this?

The directions describe this:

varReturn = SysCmd(acSysCmdInitMeter, " ", 100) (To eleiminate the meter
display)

varReturn = SysCmd(acSysCmdSetStatus, " ") (To elimate the status bar display)

Thanks

Ross

Dim varReturn as Variant
varReturn = SysCmd(acSysCmdSetStatus, "QueryNameHere ")
DoCmd.OpenQuery "QueryName"