Ir para o conteúdo
Kyryus

VB6 e MySQL

Mensagens Recomendadas

Demoins    0
Demoins

e este o codigo! substitui o user, pass, database e server pelos teus dados. depois e so usares o rs como recordset e o conexao como base de dados.... facil e rapido ^^

Set conexao = New ADODB.Connection
Set rs = New ADODB.Recordset
conexao.ConnectionTimeout = 60
conexao.CommandTimeout = 400
conexao.CursorLocation = adUseClient
conexao.Open "DRIVER={MySQL ODBC 3.51 Driver};" _
                      & "user=user" _
                      & ";password=pass" _
                      & ";database=database" _
                      & ";server=server" _
                      & ";option=" & (1 + 2 + 8 + 32 + 2048 + 16384)
Set rs.ActiveConnection = conexao

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade