[Resolvido]Conectar MySql no Access

Olá, 

Boa noite.

Estou tentando conectar um banco de dados MySql no access, mas estou com dificuldades.
No servidor web que contratei, criei um banco de dados básico para ver se eu conseguiria conectar via Access, por meio de uma conexão ODBC.

Aparentemente, fiz tudo o que era necessário, pois: a) criei o banco; b) criei o usuário; c) concedi os privilégios ao usuário o vinculando ao banco criado.

Pois bem, depois inclui um host de acesso remoto com %.

Apesar disso, ao tentar criar a conexão ODBC só está retornando erro da imagem anexa não sendo possível conenctar, mas tudo que digito aparentemente está correto.

O erro que aparece quando tento testar a conexão é:
Connection Failed
[MySQL][ODBC 5.3(w) Driver] Can´t connect to MySQL server on '...arps.adv.br' (10060):

Poderiam me ajudar?

Olá Alan Rodrigo,

Normalmente não se coloca o www. , retire e teste.
Caso se mantenha, verifique junto do provedor do host se permite ligações remotas ao MySQL.
O número da porta e o nome do host.

Quanto ao restantes procedimentos, aparentemente estão corretos.

Abraço

Olá Alan Rodrigo,

Eu faço conexões odbc com o código abaixo, que consegui em algum forum, apenas adaptei incluindo a porta para conectar externamente.

Lembro que no site onde o banco esta hospedado você deverá dar direito a acesso remoto, instalar o mysql connector, não há necessidade de criar a conexão manual como a que você esta fazendo.

Criar uma macro com o nome autoexec, com a ação ExecutarCódigo e o nome da funçao MYSQLEXT()

No código mude os XXXXXXXX pelos dados corretos.

Código:

Function AttachDSNLessTable(stLocalTableName As String, stRemoteTableName As String, stServer As String, stDatabase As String, Optional stUserName As String, Optional stPassword As String, Optional strPort As String)
On Error GoTo AttachDSNLessTable_Err
Dim td As TableDef
Dim stConnect As String

' deletar as tabelas se ja existirem

For Each td In CurrentDb.TableDefs
    If td.Name = stLocalTableName Then
        CurrentDb.TableDefs.Delete stLocalTableName
    End If
Next

If Len(stUserName) = 0 Then
'/ / Use autenticação confiável se stUsername não é fornecido.
' stConnect = "ODBC; DRIVER ={SQL SERVER};SERVER=" & stServer & ";DATABASE=" & stDatabase & ";Trusted_Connection=Yes"
stConnect = "ODBC; DRIVER ={MySQL ODBC 5.3 ANSI Driver};SERVER=" & stServer & ";DATABASE=" & stDatabase & ";Trusted_Connection=Yes"
Else
'/ / AVISO: Isto irá poupar o nome de usuário e a senha com as informações da tabela vinculada.
stConnect = "ODBC;DRIVER={MySQL ODBC 5.3 ANSI Driver};SERVER=" & stServer & ";DATABASE=" & stDatabase & ";UID=" & stUserName & ";PWD=" & stPassword & ";Option=3;" & ";Port=" & strPort
End If

Set td = CurrentDb.CreateTableDef(stLocalTableName, dbAttachSavePWD, stRemoteTableName, stConnect)
CurrentDb.TableDefs.Append td
AttachDSNLessTable = True
Exit Function

AttachDSNLessTable_Err:

AttachDSNLessTable = False
MsgBox "AttachDSNLessTable encontrou um erro inesperado: " & Err.Description

End Function

Function MYSQLEXT()
Dim strPasswd As String
Dim strServer As String
Dim strUser As String
Dim strDB As String
Dim strPort As String

'conexão local de produção
strPasswd = "XXXXXXXXX" ' Senha do servidor
strUser = "XXXXXXXXX" ' Usuario do servidor
strServer = "XXXXXXXXX" 'IP do servidor (no meu caso uso sql8.main-hosting.eu)
strDB = "XXXXXXXXX" 'Banco de Dado
strPort = "3306" 'Porta do servidor


Rem error
On Error Resume Next 'Tratamento de erro

'Essa tabela devem ser ligados

'AttachDSNLessTable("NOME DESTINO", "NOME ORIGEM", strServer, strDB, strUser, strPasswd, strPort)
Set dummy = AttachDSNLessTable("XXXXXXXXX", "XXXXXXXXX", strServer, strDB, strUser, strPasswd, strPort)

End Function


Espero ter ajudado.
Bom trabalho

Pessoal, agradeço pelo pronto retorno.

Vou verificas os conselhos, retorno em breve.

Bom dia, pessoal.

Em contato com a empresa que mantenho a hospedagem, fui informado que eles não permitem conexão externa aos bancos de dados mysql.

Assim, com esse servidor estou impossibilitado, vou ter que procurar outro servidor de hospedagem que aceita essa conexão.

Alguém conhece algum para indicar?

Olá, se já tem tudo a funcionar nesse fornecedor, pergunte se não tem um aditivo ou se tem algum plano com essa funcionalidade.

Em alternativa, no google facilmente encontra um fornecedor alternativo.
Tenha atenção em ser um fornecedor de renome (não ser daqueles que fecha de repente) e localização do datacenter (servidores) existe muita revenda.

Se for para o Brasil, caso não encontre, nos USA que fica perto não falta bons serviços.

Abraço

Deixe-me entender pessoal.

Vocês estão falando que precisa de acesso remoto pra se conectar numa BD mySQL?

Acesso remoto para mim, é o que se faz com windows Server, onde se abre sessões  para

acessar remotamente.

Fazia isso com cliente com rede interna + 3 lojas.

Se estão falando de coisa diferente, por favor, deem uma luz a esse noob.

Agora, utilizei por pouco tempo o mySQL no host do UOL, fazia a conexão odbc,  então, não vinculado.

E diga-se de passagem vincular BD na net, é pedir pra perder dados.

O contrário, a conexão direta, é feita a cada operação, encerrando-se no ato.

Achei muito prático isso.

[ ]'s

Olá a todos,

Noob, eu nunca fiz nada para banco de dados em MySql, apenas alguns testes e ajuda alguns colegas.

Quando o MySql está disponível num serviço de alojamento (hospedagem) na web, normalmente tem o acesso às portas de ligação (conexão) remoto desligadas.
Em alguns casos o serviço é pago como extra.
Por vezes também tem barramento por IP às ligações, sendo necessário configurar o IP que vai ter acesso.

Alguns links sobre o tema (copiar e colar no browser):

uolhost.uol.com.br/faq/v2/revenda/nao-consigo-conectar-remotamente-no-banco-de-dados-mysql-criado-em-minha-revenda-o-que-pode-estar-acontecendo.html

support.hostgator.com/articles/cpanel/how-to-connect-to-the-mysql-database-remotely

Abraço

Obrigado Alvaro

Lembrei que na época também fiz um arquivo.udl.

Arquivos .UDL (Universal Data Link) é uma maneira simples e rápida para testar conexões com o SQL Server ou ainda criar Connections Strings.

Caso interesse a alguém:

marcelodba.wordpress.com/2012/03/23/testando-conexo-no-sql-com-arquivo-udl/

[ ]'s

Olá Noob,

Intressante sua partilha, descinhecia dessa forma, obrigado.

Não falta matéria para o colega Alan Rodrigo testar, também tem a dica do colega Giovanni Paiva com o DNSless. Ficamos aguardar retorno.

Abraço a todos.