set talk on
set talk window noshow && This is a tip from Mike Y to prevent any unwanted user messages to the screen
select ...
set talk off

>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