FW_OpenAdoConnection reconnect

[cdmmaui]

Hello Everyone,

Is it possible to determine if FW_OpenAdoConnection is still alive before a FW_OpenRecordSet call and if it is NOT, is there a way to reestablish connection? Here is my sample code establishing connection.

oCn := FW_OpenAdoConnection( "MSSQL,"+xSOURCE+","+xDATABASE2+","+xUSERID+","+XPASSWORD, .T. )
if oCn == nil
? "Failed to connect to Server"
return nil
endif

Thank you!

[nageswaragunupudi]

Please check the value of oCn:State.
If the value is 0, the connection is closed. If the value >= 1 the connection is open and the actual value depends on the current activity.

If oCn is closed we can try reconnect by oCn:Open()

This is a sample code to check the connection status and try to reconnect.

Code: Select all  Expand view  RUN

function Check( oCn )

   if oCn:State == 0
      TRY
         oCn:Open()
      CATCH
         ? "Can not reconnect"
      END
   endif
   
return ( oCn:State > 0 )

If still the connection can not be re-established, the possible reasons can be loss of internet connection, or physical network issues. This indicates the need for the user to physically remedy the situation and retry the operaration.

[cdmmaui]

Thank you Rao

[nageswaragunupudi]

Code: Select all  Expand view  RUN

oCn := FW_OpenAdoConnection( "MSSQL,"+xSOURCE+","+xDATABASE2+","+xUSERID+","+XPASSWORD, .T. )

We can also write like this:

Code: Select all  Expand view  RUN

oCn := FW_OpenAdoConnection( { "MSSQL", xSOURCE, xDATABASE2, xUSERID, XPASSWORD }, .T. )

[Maurizio]

Hello Rao
how to specify the port with FW_OpenAdoConnection() ?

Maurizio

[nageswaragunupudi]

"ServerAddress:port"

eg:

Code: Select all  Expand view  RUN

190.30.20.20:3306

[Maurizio]

Thank you Rao