Visual-Foxpro & Informix
Saludos cordiales,
Tengo una aplicación en Visual-Foxpro(Versión 5) que se conecta a una Base de Datos Informix, resulta que esta es una aplicación que corre permanentemente y el problema se presenta cuando la conexión se pierde, hay que bajar la aplicación y levantarla nuevamente, un problema cuando hay que tener un operador permanentemente monitoreando una aplicación que puede permanecer estable muy buen tiempo, pero cuando no allí esta el operador, por consiguiente necesito saber si hay forma de que la aplicación pueda comprobar la conexión a la base de datos y si esta no encontrara o se hubiera perdido, pueda realizarse nuevamente la reconexión o conexión a la base de datos, agradeceré desde sus comentarios.
Tengo una aplicación en Visual-Foxpro(Versión 5) que se conecta a una Base de Datos Informix, resulta que esta es una aplicación que corre permanentemente y el problema se presenta cuando la conexión se pierde, hay que bajar la aplicación y levantarla nuevamente, un problema cuando hay que tener un operador permanentemente monitoreando una aplicación que puede permanecer estable muy buen tiempo, pero cuando no allí esta el operador, por consiguiente necesito saber si hay forma de que la aplicación pueda comprobar la conexión a la base de datos y si esta no encontrara o se hubiera perdido, pueda realizarse nuevamente la reconexión o conexión a la base de datos, agradeceré desde sus comentarios.
1 respuesta
Respuesta de jeoffrey
-1
Cualquier conexión ODBC se puede controlar con la siguiente instrucción
STORE SQLCONNECT('nombreconexionODBC', 'sa') TO CnBpt
IF CnbPT <= 0
= MESSAGEBOX('Error en la conexion BPT.', 16, 'SQL Connect Error')
**-- en ves del quit se puede generar nuevamente la conexion y volver a validar ...
CREATE CONNECTION BPT DATASOURCE "nombreodbcvfp" USERID "sa" DATABASE tubasededatos
* QUIT
Endif
Se ejecuta cada vez que se vaya a correr un proceso ... en tu programa ...
Es decir cada vez verificar la conexión ..
STORE SQLCONNECT('nombreconexionODBC', 'sa') TO CnBpt
IF CnbPT <= 0
= MESSAGEBOX('Error en la conexion BPT.', 16, 'SQL Connect Error')
**-- en ves del quit se puede generar nuevamente la conexion y volver a validar ...
CREATE CONNECTION BPT DATASOURCE "nombreodbcvfp" USERID "sa" DATABASE tubasededatos
* QUIT
Endif
Se ejecuta cada vez que se vaya a correr un proceso ... en tu programa ...
Es decir cada vez verificar la conexión ..
Lo que no deseo es tener que abrir y cerrar varias veces la conexión para el numero de operaciones que tengo esto significaría un alto costo de tiempo.
