Falla en la conexión de excel bva con sybase
Estoy tratando de realizar una conexión entre excel vba y sybase que es una base de datos, sin embargo; al ejecutar el código para ver que se conecte me manda el error 3709 the connection cannot be used to perform this operation is either closed or invalid context.
El código es el siguiente:
Sub dos() Set conn = New ADODB.Connection Set rs = New ADODB.Recordset conn.ConnectionString = "Driver={SQL Anywhere 17};Server=dggbi01-iq;Port=10000;Database=iqdm;Uid=l00404846;Pwd=wZkX#xCAs_u27V;" rs.Open "select * from LGL_DM_MUDA_ALL_METRICS_SUM_F_V ", conn, adOpenStatic, adLockReadOnly, adCmdTable With ThisWorkbook.Worksheets("test") .Visible = True .Range("a1:b1").Value = Array("PROJ_NUM", "PROJ_EN_NAME") .Range("A2").CopyFromRecordset rs .Activate End With rs.Close: Set rs = Nothing conn.Close: Set conn = Nothing End Sub
1 respuesta
Respuesta de kumbus