Where is the query running from, and where are you storing the values?
What you need to do is create seperate variables for start and end time and take their values before and after the query runs. Like:
Start Sub
Dim tStart, tEnd As Date
tStart = Now()
'post to table
'Run routine
tEnd = Now()
'post to table
'or calculate DateDiff()
End Sub
I use date/time since your query may run overnight?
Did this help any?
mmcdonal
|