DO WHILE .t. TRY lnRetVal = SQLEXEC(this.oconnection.nconnection,tcSQl,tcCursor) CATCH lnRetVal = -1 ENDTRY IF lnRetVal < 0 this.geterrormessage() IF this.oconnection.resetconnection() lnLoop = lnLoop + 1 IF lnLoop < 2 this.cerrormessage = "" DIMENSION this.aerrormessage[1] ENDIF ELSE EXIT ENDIF ENDIF IF lnLoop = 1 lnLoop = lnLoop + 1 ELSE EXIT ENDIF ENDDO>How do you check the state of a SQL connection?