MYSQL REMOTO

LEANDRO 22/10/2009 10:04:36
#326046
Bom Dia a Todos, estou fazendo um programa onde tenho que acessar o mysql remotamente em um provedor.

estou usando o seguinte codigo

Option Explicit
Public WithEvents db As rdoConnection

Private Sub btnConectar_Click()
Dim Conexao As String
Dim DataBase As String
DataBase = [Ô]rumoinfo[Ô]
Conexao = [Ô]DRIVER={MySQL ODBC 3.51 Driver}; SERVER=[ô][Ô] & txtServidor.Text & [Ô][ô]; DATABASE=[Ô] & DataBase & [Ô] ;PWD=[Ô] & txtSenha.Text & [Ô]; UID=[Ô] & txtUsuario.Text & [Ô];OPTION=3[Ô]
Set db = New rdoConnection
db.Connect = Conexao
db.CursorDriver = rdUseServer
db.EstablishConnection
End Sub


e Ele da o seguinte erro

Unknown mysql server host [Ô]209.126.254.133[Ô]

fui a minha ODBC que se chama remoto, e testo a conexao por la e da certo.
LEANDRO 22/10/2009 10:30:07
#326048 
Dim Conexao As String
Dim DataBase As String
DataBase = [Ô]rumoinfo[Ô]
Conexao = [Ô]DRIVER={MySQL ODBC 3.51 Driver}; SERVER=[Ô] & txtServidor.Text & [Ô]; DATABASE=[Ô] & Trim(DataBase) & [Ô];PWD=[Ô] & txtSenha.Text & [Ô]; UID=[Ô] & txtUsuario.Text & [Ô];OPTION=3[Ô]
Set db = New rdoConnection
db.Connect = Conexao
db.CursorDriver = rdUseServer
db.EstablishConnection


Consegui, era somente o espaço que nao estava aceitando
Tópico encerrado , respostas não são mais permitidas
Voltar