Este fórum está sendo desativado

[luanpontoalc]

Olá minha galera, beleza?

Tem algo que esta me deixando louco, estou tentando fazer uma conexão com banco de dados da nuvem (SQL SERVER).

Já tenho o Driver ODBC instalado, e eu consigo fazer o acesso através da função da aba Dados > Conexões Existentes... E importar os dados do servidor (db4free.net)

Mas quando eu tento fazer essa conexão através da macro, ele me gera um erro de [Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado.

Mas eu to utilizando os mesmos dados na conexão ODBC e nas conexões existentes do excel, e nos dois funciona perfeitamente.

Código: Selecionar todos

Option Explicit
Global Conn     As ADODB.Connection
Global RS       As ADODB.Recordset
Sub ConectarDB()

    Set Conn = New ADODB.Connection
    
    Conn.ConnectionString = "DRIVER={MySQL ODBC 8.0 DRIVER};" _
                            & "SERVER=db4free.net;" _
                            & "DATABASE=lafinances;" _
                            & "UID=adminlafinances;" _
                            & "PASSWORD=senha1234;"
    Conn.Open
    MsgBox "Conectado"
    
End Sub

Agradeço a atenção, tmjj