By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
424,495 Members | 1,225 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 424,495 IT Pros & Developers. It's quick & easy.

Is there a way to read the status bar?

P: n/a
Hi Folks!

I'm wondering if there is a way to read the status bar. in my application,
I set the status bar to echo certain things to let the user know what the
program is doing. I'd like to also use that in the error, so that errors
can be more specific to the task that was being run. To do this easily (and
generically) I'd like to read the text from the status bar that I am setting
throughout the program. Currently I can't see any way to do this. If I
could it would save a lot of work.

Thanks!
Nov 13 '05 #1
Share this Question
Share on Google+
4 Replies


P: n/a
If you're controlling what's displayed in the status bar, certainly you
can write it to a variable somewhere. then reading from the variable
is trivial.

Nov 13 '05 #2

P: n/a
Thanks, but I'd like to read what's already written if I can. I have a
bunch of code already written, and if I can find a way to read from the
status bar, that will save me a lot of retrofitting.
<pi********@hotmail.com> wrote in message
news:11**********************@g14g2000cwa.googlegr oups.com...
If you're controlling what's displayed in the status bar, certainly you
can write it to a variable somewhere. then reading from the variable
is trivial.

Nov 13 '05 #3

P: n/a
Jozef wrote:
Thanks, but I'd like to read what's already written if I can. I have a
bunch of code already written, and if I can find a way to read from the
status bar, that will save me a lot of retrofitting.


Not much retrofitting, global search and replace
Find: "DoCmd.Echo True,"
Replace: "SBEcho"

Then in a module: (air code)

Public Function SBEcho(optional pvarText as variant)
Static sstrText as string
If IsMissing(pvarText) Then
SBEcho = sstrText
Else
sstrText = "" & pvarText
DoCmd.Echo True, sstrText
End If
End Function

Now you can query it just by using:
Debug.Print SBEcho()

Shouldn't take you as long as it did for me to type that in.

--
[OO=00=OO]
Nov 13 '05 #4

P: n/a
Thanks Guys, appreciate it.
"Trevor Best" <no****@besty.org.uk> wrote in message
news:42***********************@news.zen.co.uk...
Jozef wrote:
Thanks, but I'd like to read what's already written if I can. I have a
bunch of code already written, and if I can find a way to read from the
status bar, that will save me a lot of retrofitting.


Not much retrofitting, global search and replace
Find: "DoCmd.Echo True,"
Replace: "SBEcho"

Then in a module: (air code)

Public Function SBEcho(optional pvarText as variant)
Static sstrText as string
If IsMissing(pvarText) Then
SBEcho = sstrText
Else
sstrText = "" & pvarText
DoCmd.Echo True, sstrText
End If
End Function

Now you can query it just by using:
Debug.Print SBEcho()

Shouldn't take you as long as it did for me to type that in.

--
[OO=00=OO]

Nov 13 '05 #5

This discussion thread is closed

Replies have been disabled for this discussion.