• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

DiguiVirus

Conectar a MySQL

7 mensagens neste tópico

Boas.

Já pesquisei na net, voltei a pesquisar e pesquisei outra vez e não encontrei a resposta.

Alguém me pode explicar, como se conecta a uma base de dados MySQL através do Visual Basic?!

Queria um programa que fosse buscar info a uma MySQL db.

Ideas?! :D

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Conheces o Google (costuma dar muito jeito nestes casos)?

Normalmente basta fazer uma procura simples, por exemplo, VB6 + MySQL e encontras soluções para o que pretendes.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Conheces o Google (costuma dar muito jeito nestes casos)?

Normalmente basta fazer uma procura simples, por exemplo, VB6 + MySQL e encontras soluções para o que pretendes.

E se lesse o meu post?

Fiz cerca de 15 paginas de pesquisa, ja me doem os olhos... E nada...

Não me tomem por arrogante, mas o teu post foi desnecessário...

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

experimenta pesquisar por ODBC, talvez encontres alguma coisa assim... depois é só sacar o devido programa do site do mysql... mas não te posso ajudar muito, não é o meu forte ligações a bases de dados em visual basic (sem ser .net pior ainda)

Cumps :D

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Desculpa a resposta, mas é que fazem perguntas que se respondem com uma simples pesquisa e já não é a primeira vez que perguntam isto aqui.

Vais ter de usar a ODBC (Open Database Connectivity), neste caso MySQL Connector/ODBC (MyODBC).

Eu encontrei resposta ao teu problema no segundo resultado da pesquisa (Visual Basic 6 code for connecting to a MySQL database using the MySQL ODBC driver).

Private Sub cmdConnectMySQL_Click()

Dim cnMySql As New rdoConnection
Dim rdoQry As New rdoQuery
Dim rdoRS As rdoResultset

set up a remote data connection using the
MySQL ODBC driver.
change the connect string with your username,
password, server name and the database you
wish to connect to.

cnMySql.CursorDriver = rdUseOdbc
cnMySql.Connect = "uid=YourUserName;pwd=YourPassword;
    server=YourServerName;" & _
    "driver={MySQL ODBC 3.51 Driver};
    database=YourDataBase;dsn=;"
cnMySql.EstablishConnection

set up a remote data object query
specifying the SQL statement to run.

With rdoQry
    .Name = "selectUsers"
    .SQL = "select * from user"
    .RowsetSize = 1
    Set .ActiveConnection = cnMySql
    Set rdoRS = .OpenResultset(
            rdOpenKeyset, rdConcurRowVer)
End With
    
loop through the record set processing the
records and fields.

Do Until rdoRS.EOF
    With rdoRS

     your code to process the fields
     to access a field called username you would
     reference it like !username
        rdoRS.MoveNext
    End With
Loop

close record set
close connection to the database

rdoRS.Close
cnMySql.Close

End Sub

Não sei se funciona, mas não custa nada tentar. :D

0

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