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