Prueba de conexion de Gestar a base de datos externas

Este instructivo indica como realizar pruebas de conexion desde el application server de Gestar, con el fin de determinar los parametros que luego se usaran en la integracion.

Los parametros necesarios son 2:

• Cadena de conexion OLEDB
• Consulta SQL necesaria para extraer el set de datos

En el application server de Gestar, crear un archivo con extension .VBS y pegar el siguiente codigo.
Cambiar el valor de las variables sCnn y sSql con los parametros correctos y ejecutarlo. El script mostrara un mensaje si la prueba es exitosa.

' Ejemplo de cadena de conexion a SQL Server
' Para obtener los parametros de conexion OLEDB a otra base
' de datos consulte la documentacion del fabricante

sCnn = "Provider=SQLOLEDB;Data Source=MyServer;Initial Catalog=MyDb;User Id=MyUser;Password=MyPass"
sSql = "select * from CLIENTES"
Set cnn = CreateObject("ADODB.Connection")
cnn.Open sCnn
Set rcs = cnn.Execute(sSql)
rcs.Close
cnn.Close
MsgBox "Prueba exitosa"