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

WoOo

[VB.NET 2003 + MySQL] Aplicação a usar uma bd MySQL em servidor remoto

16 mensagens neste tópico

Saudações!

Tenho andado pra aqui a tentar criar uma aplicação em vb.net 2003 que me utilize uma base de dados mysql num servidor remoto!

Tou farto de vasculhar pelo google e já encontrei diferentes tutoriais com formas de ligação distintas e ja exprimentei umas poucas mas sem sucesso!

Alguém daqui do forum já fez algo do genero?

Abraço

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Desculpa se parecer ridicula a pergunta, mas ando nisto à pouco tempo!

Mas adicionei os dll's às referencias do projecto....fiz os imports...mas mal insiro:

DBWrapper c = new DBWrapper(EasyDb.DatabaseType.Mysql);
c.DBServer="10.0.2.32";
c.DBUser="root";			
c.DBPassword="mypwd";
c.Connect("o-comerce");

É dito logo que o DBWrapper não é um tipo de dados que possa ser utilizado!

Que estou a fazer de errado?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

o codigo que escreves-te é em c#.

estás a fazer isso em vb.net?

Dim c as DBWrapper  = new DBWrapper(EasyDb.DatabaseType.Mysql)
c.DBServer="10.0.2.32"
c.DBUser="root"		
c.DBPassword="mypwd"
c.Connect("o-comerce")

Sim, basta adicionares as dll's ao teu proj.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Sim, vb.net!

Já tinha retirado os ; mas continuava com erros!

Agora funcionou bem, mas estou com outro erro, senão faço os imports logo no inicio diz.me que DBWrapper não está definido! Se importo EasyDb e MySql, EasyDb.DatabaseType.Mysql diz-me que o tipo inteiro não pode ser convertido para EasyDb.DatabaseType!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

só te posso ajudar se colocares aqui o codigo e os erros gerados pelo IDE (VS2003), caso contrario "é brincar às adivinhas"...

coloca aqui o src code + a excepção/erro .

/ing

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ya claro!

Imports EasyDb
Imports MySql.Data
...
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim c As DBWrapper = New DBWrapper(EasyDb.DatabaseType.Mysql)
        c.DBServer = "10.0.2.32"
        c.DBUser = "root"
        c.DBPassword = "mypwd"
        c.Connect("o-comerce")
    End Sub

Os erros são:

Value of type 'Integer' cannot be converted to 'EasyDb.DatabaseType'.

The dependency 'ICSharpCode.SharpZipLib' could not be found.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

falta referires a classe ICSharpCode.SharpZipLib, nas tuas dependencias....

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ja adicionei nova class ao projecto, não diz que está em falta mas continua a dar o erro Value of type 'Integer' cannot be converted to 'EasyDb.DatabaseType'.

*da em doido*

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

:cheesygrin:

calma.

tenta :

Dim c As DBWrapper = New DBWrapper(CType(EasyDb.DatabaseType.Mysql, EasyDb.DatabaseType))

senão envia-me o projecto ...

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Continua sem aceitar!!!

Value of type 'Integer' cannot be converted to 'EasyDb.DatabaseType'.

*da cabeçadas na parede*

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas.

Esquece a classe do Inginheiro e faz download desta http://dev.mysql.com/downloads/connector/net/5.0.html

Adiciona uma  referencia ao MySql.Data

Option Explicit On
Option Strict On

Imports MySql.Data
Imports MySql.Data.MySqlClient

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim mycon As New MySqlConnection
        Dim mycom As New MySqlCommand

        mycon.ConnectionString = "Server=10.1.3.12;Port=3306;Database=test;Uid=root;Pwd=abc;"
        Try
            mycon.Open()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        mycom.Connection = mycon
        mycom.CommandType = CommandType.Text
        mycom.CommandText = "create database dinefer;"
        Try
            mycom.ExecuteNonQuery()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        mycon.Close()
    End Sub
End Class

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas.

Esquece a classe do Inginheiro e faz download desta http://dev.mysql.com/downloads/connector/net/5.0.html

Adiciona uma  referencia ao MySql.Data

Option Explicit On
Option Strict On

Imports MySql.Data
Imports MySql.Data.MySqlClient

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim mycon As New MySqlConnection
        Dim mycom As New MySqlCommand

        mycon.ConnectionString = "Server=10.1.3.12;Port=3306;Database=test;Uid=root;Pwd=abc;"
        Try
            mycon.Open()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        mycom.Connection = mycon
        mycom.CommandType = CommandType.Text
        mycom.CommandText = "create database dinefer;"
        Try
            mycom.ExecuteNonQuery()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        mycon.Close()
    End Sub
End Class

Eu tentei usar isso e não funcionou =X

Dá este erro:

Unable to connect to any of the specified MySQL hosts.

Eu substitui 10.1.3.12 pelo IP do servidor e o user name e etc

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ninguém me consegue responder o porque de dar o erro =)?

EDIT: Estive a ver e o servidor só suporta autenticação por SSL =X o que faço agora?

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Desculpem o triple post mas estou a dar em doido com isto  :wallbash: Já andei às voltas no google... saquei componentes novos e nada funciona.

Cumps

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