INCIANDO MYSQL

RICARDOGARCIA 22/02/2010 08:30:52
#334995
Esteou tentando usar o mysql, mas não estou conseguindo conectar o banco. alguem tem um topico com os passos todos (desde a instalação e onde encontrar) o mysql a string de conexão?
Estou usando VB 6 win XP
DANIKULL 22/02/2010 09:33:59
#335000
Citação:

:
Esteou tentando usar o mysql, mas não estou conseguindo conectar o banco. alguem tem um topico com os passos todos (desde a instalação e onde encontrar) o mysql a string de conexão?
Estou usando VB 6 win XP



Bom dia.

Use este manual, do próprio MySQL para instalação:
2.1.1. Instalando o MySQL no Windows

Instale também o conector ODBC:
Connector-ODBC 5.1.6

Para conectar o VB com com MySql use esta procedure:

Public Sub DataBaseConnection()
Dim StrConnection As String
Dim BancoConnection As ADODB.Connection

StrConnection = [Ô]DRIVER={MySQL ODBC 3.51 Driver};[Ô] & _
                [Ô]SERVER=[Ô] & [IP da Máquina onde está o Banco] & [Ô];[Ô] & _ [ô] Se for local use 127.0.0.1
                [Ô]PORT=3306;[Ô] & _ [ô]3306 Padrão MySql ou a que fioi usada na instalação
                [Ô]DATABASE=[Ô] & [Nome do Banco de Dados] & [Ô];[Ô] & _
                [Ô]USER=[Ô] & [Usuário] & [Ô];[Ô] & _ [ô] Se não foi criado use Root
                [Ô]PASSWORD=[Ô] & [Senha do usuário] & [Ô];[Ô] & _
                [Ô]OPTION=35[Ô]

Set BancoConnection = New ADODB.Connection
    With BancoConnection
        .CursorLocation = adUseClient
        .ConnectionString = StrConnection
        .Mode = adModeShareExclusive
        .Open StrConnection
    End With
End Sub


OK???
RICARDOGARCIA 22/02/2010 10:24:02
#335006
DANIKULL,
ok com relação a conexão....onde e como instalar o driver???
uma vez instalado nada mais a fazer? só conectar via programa?
MKING 22/02/2010 12:19:27
#335024
RICARDOGARCIA, a instalação geralmente é netx,next, finish, no caminho do seu mysql mesmo se não me engano, após é só testar a conexão via programa mesmo...
DANIKULL 22/02/2010 12:40:17
#335025
RICARDOGARCIA,

O driver ODBC sempre deve ser instalado no cliente, ok??
NATH4N 22/02/2010 16:12:28
#335047
no [Ô]OPTION=35[Ô] eu uso [Ô]OPTION=1[Ô] qual a diferenca em usar o 35
HILARIO 22/02/2010 22:26:21
#335085
Olá, Ricardo. Olha, se vc já tem o mysql instalado vá atéo site do mysl e baixe o driver para a conexão. Chama-se ODBC (a versão é de acordo com a versão do seu Mysql. Instale o driver (aquela coisa: next, next, finish...). Abra o Mysql e crie um bd (isto é, se vc já não criou). Vá em painel de controle > desempenho e manutenção > ferramentas administrativas > fonte de dados(ODBC) . Lique em Adicionar, na lista que vai aparecer selecione Mysql ODBC 3.51 driver (no caso 3.51 é a versão que eu tenho instalada). Clique em concluir. Vai aparecer uma tela do Mysql ODBC chamada conector/odbc. Data source name pode ficar em branco, description também. Em server coloque localhost, em user coloque root ou, se vc criou algum usuário na instalação do mysql, coloque o nome dele. Se vc colocou senha na instalação do mysql, coloque-a em password. Se vc fez tudo certo vai aparecer em database o nome do bd que vc criou. Selecione o dito cujo. Pra saber se tá tudo certo clique em test. Aparecendo a mensagem de que a conexão foi feita com sucesso, clique eo ok. Pronto! O Windows está conectado com o mysql, agora é só criar a conexão no seu programa.
Boa sorte.
RICARDOGARCIA 23/02/2010 10:42:15
#335113
vixi, não estou me encontrando. fiz o que o HILARIO disse, finalizei com [ô]test[Ô] e funcionou.
mas ao rodar o programa dá erro : [Mysql][ADBC 5.1 Driver]Access denied for user [ô]root[ô]@[ô]localhost[ô] (using password : YES)
no programa está :
Dim StrConnection As String
Dim BancoConnection As ADODB.Connection

StrConnection = [Ô]DRIVER={MySQL ODBC 5.1 Driver};[Ô] & _
[Ô]SERVER=127.0.0.1;[Ô] & _
[Ô]PORT=3306;[Ô] & _
[Ô]DATABASE=c:\sql\Clientes;[Ô] & _
[Ô]USER=Root;[Ô] & _
[Ô]PASSWORD=server;[Ô] & _
[Ô]OPTION=35[Ô]

Set BancoConnection = New ADODB.Connection

With BancoConnection
.CursorLocation = adUseClient
.ConnectionString = StrConnection
.Mode = adModeShareExclusive
.Open StrConnection
End With

eu usei o programa MySQL Workbench 5.1 OSS para criar o banco de dados. que criei só pra teste. com dois campos
onde estou pipocando???
DANIKULL 24/02/2010 23:40:00
#335291
RICARDOGARCIA, boa noite.

Você checou se o serviço do MySQL está ativo??
Pode ser que esá tudo instalado mais o serviço deve estar com conexão manual.

Detalhe: A senha deve ser a mesma usada na configuração do Servidor e outra coisa, onde está DataBase, você coloca o nome do banco de dados só, não precisa do path.

Ok.
HILARIO 25/02/2010 00:45:19
#335295
Ricardogarcia, experimenta fazer assim:
Nas declarações gerais:
Public mycom As New ADODB.Command
Public seubancodedados As New ADODB.Connection
Public suatabela As New ADODB.Recordset

No evento form load coloque assim:
sql = [Ô]select * from suatabela[Ô]
seubancodedados.Open [Ô]DSN=seubancodedados[Ô]

With mycom
Set .ActiveConnection = suatabela
.CommandType = adCmdText
.CommandText = sql
End With

With suatabela
.LockType = adLockPessimistic
.CursorType = adOpenKeyset
.CursorLocation = adUseClient
.Open mycom
End With
while not suatabela.eof
list1.additem suatabela!campo
suatabela.movenext
wend
suatabela.Close
HILARIO 25/02/2010 00:55:04
#335296
Esqueci de dizer, esse código funciona com ADO. Project > references > Microsoft Activex Data Objects 2.8 library.
Página 1 de 2 [17 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar