MYSQL E VB 6.0

USUARIO.EXCLUIDOS 05/08/2007 21:44:42
#229564
Boa Noite,

estou tentando utilizar o MySQL junto com o VB + ADO 2.8.

Estou utilizando as propriedades dos componentes para criar as conexões, no entanto está aparendo uma mensagem sugerindo que a sintaxe está incorreta. Alguém poderia me ajudar ?

Mensagem:
"Run-time error '-2147217900 (80040e14)':

[MySQL][ODBC 3.51 Driver][mysqld-5.0.45-community-nt]You have an error in your SQL sintax; check the manual that corresponds to your MySQL server version for the right syntax to use near 'comissoes' at line 1"

A versão do MySQL é 5.0.45 e ODBC é 3.51.17

O Código em VB é o seguinte:

  
Set m_Connect = New ADODB.Connection
Dim v_ConnectionString As String
v_ConnectionString = _
    "DRIVER={MySQL ODBC 3.51 Driver};" & _
    "user=" & "root" & ";" & _
    "password=" & "minha_senha" & ";" & _
    "database=" & "empresa" & ";" & _
    "mode=" & adModeReadWrite & ";" & _
    "server=localhost;" & _
    "option=2;"
m_Connect.Open v_ConnectionString

' Carregando Tabela de Acordos
Set t_Comissoes = New ADODB.Recordset
With t_Comissoes
    .Source = "comissoes"
    .ActiveConnection = m_Connect
    .LockType = adLockOptimistic
    .CursorType = adOpenStatic
    .CursorLocation = adUseClient
End With
Call t_Comissoes.Open


Obrigado.

PS.: A senha e o usuário digitados diretamente no console do Mysql funcionam, usado no programa para gerenciar os bancos de dados também funciona. Já instalei uma versão antiga do Mysql 5.0.0Alpha que funcionava a muito tempo atrás, já tentei uma versão antiga do MyODBC também... E nada.
USUARIO.EXCLUIDOS 05/08/2007 22:57:02
#229566
kra se tento acessar via dsn

eu acesso assim e dah certim, e para rede é mais facil de conf

se vc num souber usar dsn me add no msn q eu te explico
USUARIO.EXCLUIDOS 05/08/2007 23:11:45
#229567
Via DNS eu sei... Só que quero minimizar o trabalho de configuração no cliente... Além de poder "esconder" detalhes dentro do meu código.

Vlw.
USUARIO.EXCLUIDOS 05/08/2007 23:23:47
#229568
tenta isso 

Private Sub cmdOK_Click()
On Error GoTo trataErro
Set bd = New ADODB.Connection
bd.ConnectionTimeout = 60
bd.CommandTimeout = 400
bd.CursorLocation = adUseClient
bd.Open "DRIVER={MySQL ODBC 3.51 Driver};" _
                      & "user=" & TxtSenha(O) _
                      & ";password=" & TxtSenha(1) _
                      & ";database=" & sNomeBase _
                      & ";server=" & 
sserv _
                      & ";option=" & (1 + 2 + 8 + 32 + 2048 + 16384)


End Sub



axo q esse funfa
USUARIO.EXCLUIDOS 05/08/2007 23:45:49
#229569
Funcionou não. Está quase igual ao meu, exceto pela soma dos options.
USUARIO.EXCLUIDOS 06/08/2007 00:25:32
#229570
vixe kra vo fica te devendo

pq eu conecto via dsn, esse codigo eu tinha ele aqui

falo
USUARIO.EXCLUIDOS 06/08/2007 08:26:56
#229585
Ola Elmaia,


Entra ae http://www.connectionstrings.com/ ae tem todas as formas de conexão qual a string a utilizar.

Espero ter ajudado


Agraço

Lucas - lucas@consermaq.com
MEYB.JULLYS 06/08/2007 10:29:07
#229606
Bom dia amigo, este erro não é de conexão não, pelo menos não é o que vc informa que a mensagem que vc esta recebendo.
o problema esta no SQL que vc esta usando para listar comisões.
Passa ai o SQL para a galera olhar

espero ter ajudado.
Tópico encerrado , respostas não são mais permitidas
Voltar