Reply To: Wait … to see !

[MA]

Use utilities.DoEvents() inside the loop to process any pending messages in Windows application message queue. If the query not completed after some waiting period then you may need to exit from the loop…

qwend = false
waitCounter = 0

‘ Wait for the end of the Query
Do While not qwend

‘ Exit after 30 seconds and issues a HALT to the GroupWise Search Engine
if (waitCounter > 30) then
QW.Stop()
utilities.doevents
exit do
end if

‘qwend = QW.Completed
if not qwend then
utilities.Timer(1)
waitCounter = waitCounter + 1
utilities.doevents
end if

loop

Thanks
MA