You use a async connection ?

your cycle saturates the cpu.

Use, and move the mouse:

DO WHILE SQLGETPROP(lnSql,"ConnectBusy")
  DOEVENTS
ENDDO

or

DO WHILE SQLGETPROP(lnSql,"ConnectBusy")
  wait windows "Wait download" TIMEOUT 0.1
ENDDO

Fabio