473,320 Members | 1,883 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,320 software developers and data experts.

MS-Access 2003 How can I show time to complete query?

I have an Access 2003 front end connected to an Oracle back end
database. Much of the usage is ad-hoc and I need a way to show the user
the length of time it took to complete the last query run. (Some
queries are nested of course.)

Is there a way of showing a simple: "Procedure finished in 3min45sec or
even 3:45" in the message bar at the bottom? Or perhaps a small applet
window in the corner? I'm not sure what the most effective way to
display it is yet, but I know I need to display and log the info.

Anyone have any ideas? Could I somehow set a module or procedure to at
the beginning of each procedure involving queries save the begin time,
then at the completion of the procedure save the end time and then
subtract one from the other and show it in a non-intrusive spot?
Thanks in advance,

JN

Nov 13 '05 #1
3 2161
Invoking the following procedure will (1) open the query <qryname> and
(2) display the elapsed time in the status bar.

Sub RunQueryWithTime(qryname As String)
Dim qrystart As Date
qrystart = Now()
DoCmd.OpenQuery qryname
SysCmd acSysCmdSetStatus, "Procedure finished in " & Format(Now() -
qrystart, "n:ss")
End Sub

You'll need to run the following to clear the status bar message:
SysCmd acSysCmdClearStatus

Nov 13 '05 #2
That's great!
Any way to get that to run for ALL queries? Like a class or something?

Nov 13 '05 #3
That looks great.

In your opinion, is there a way to get the above to work for ALL
queries within a given database? Or do I have to incorporate the above
code into each query I write?

Nov 13 '05 #4

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

9
by: CY FOK | last post by:
Hi I am planning to open a software company to develop client-server apps and web applications for my client. Now, i am in a difficult situation to determine what is the best platform i should use...
3
by: Jules | last post by:
So with MS looking towards Longhorn Indigo messaging, for Service based Applications Integration, its brief dalience with adoption of industry wide Web Service standards is over. This is a major...
5
by: Don Wash | last post by:
Hi All! I do not find any relevant newsgroups to post this question so I just posted to this VB DotNet and General DotNet groups. I'm trying to create a VB.NET application that will scan...
3
by: Christian McArdle | last post by:
REQUEST FOR DISCUSSION (RFD) unmoderated group comp.os.ms-windows.programmer.64bit This is a formal Request For Discussion (RFD) to create comp.os.ms-windows.programmer.64bit as an unmoderated...
2
by: Mikey | last post by:
Sample VB .NET source code to create mailing labels or customized letters using MS Word MailMerge This VB .NET source code will start MS Word and call methods and set properties in MS Word to...
0
by: DolphinDB | last post by:
The formulas of 101 quantitative trading alphas used by WorldQuant were presented in the paper 101 Formulaic Alphas. However, some formulas are complex, leading to challenges in calculation. Take...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: Vimpel783 | last post by:
Hello! Guys, I found this code on the Internet, but I need to modify it a little. It works well, the problem is this: Data is sent from only one cell, in this case B5, but it is necessary that data...
1
by: PapaRatzi | last post by:
Hello, I am teaching myself MS Access forms design and Visual Basic. I've created a table to capture a list of Top 30 singles and forms to capture new entries. The final step is a form (unbound)...
0
by: Shællîpôpï 09 | last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
0
by: Faith0G | last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.