Although not a great solution, we use SET TALK ON.

The following is another solution, though it may slow the query down somewhat.

Create a program, for example Test.prg:

pn_Count = pn_Count + 1
IF MOD( pn_Count, 10 ) = 0 && This is .T. every 10 records.
   * Update progress bar here.
   ? pn_Count
ENDIF

RETURN .T.

Code your select as follows:

PRIVATE pn_Count
pn_Count = 0
SELECT * FROM MyTable WHERE Test() AND (...other conditions...)

>Hello!
>I wish to give al better look to my forms when I run a large query using ADO.
>Now I show a 'wait window nowait after' the sql code and another at the end.
>How can I grab the status of the query and use it to assign the progress bar value?
>Thanks...
>Pedro