Ver Mensaje Individual
  #1 (permalink)  
Antiguo 25/10/2019, 15:26
madison_sg
 
Fecha de Ingreso: noviembre-2015
Mensajes: 77
Antigüedad: 8 años, 5 meses
Puntos: 2
conectar sybase con excel vba

Hola,

Estoy tratando de conectar excel vba con sybase. Ahora llevo una semana buscando la solucion a este problema y cambie el codigo para ver que me resulta pero al ejecutarlo me tira el error 3709 the connection cannot be used to perform this connection.

Dejo el codigo a continuacion:

Código:
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
Alguien podria ayudarme por favor?
__________________
paco alonso

Última edición por madison_sg; 30/10/2019 a las 11:00