CARREGAR DATAGRIDVIEW COM DADOS DO MYSQL

JRABELO 16/09/2012 04:55:52
#409761
Bom dia Pessoal,

Alguém poderia me ajudar a carregar os dados do Banco Mysql no Datagridview.

Consegui fazer com o Access, conforme abaixo.

[txt-color=#0000f0]Public
Sub CarregaDatagrid()

Dim da As New OleDbDataAdapter([Ô]SELECT NOME,SOBRENOME,DATA FROM cliente[Ô], cnn)
Dim dt As New DataTable
da.Fill(dt)
dtgTeste.DataSource = dt
da.Dispose()
cnn.Close()

End Sub

[/txt-color]



Como seria com o Mysql ???


Att,
ALTAIR148 16/09/2012 07:55:38
#409762
Assim:

Public 
Sub CarregaDatagrid()

        Dim da As New MysqlDataAdapter([Ô]SELECT NOME,SOBRENOME,DATA FROM cliente[Ô], cnn)
        Dim dt As New DataTable
        da.Fill(dt)
        dtgTeste.DataSource = dt
        da.Dispose()
        cnn.Close()

End Sub
JRABELO 16/09/2012 11:33:31
#409764
Então dessa forma já tinha feito gera o erro abaixo:

erro gerado no código [txt-color=#0000f0]da.Fill(dt)[/txt-color]

Fill: SelectCommand.Connection property has not been initialized.
JRABELO 16/09/2012 11:36:07
#409765
Olha aqui o erro:
ALTAIR148 16/09/2012 13:13:54
#409768
Um exemplo básico, basta adaptar.

  Dim instrucaoSQL As String = [Ô]select * from tb_estabelecimentos where Estabelecimento_CNPJ = [ô][Ô] & Produtor.Produtor_CNPJ & [Ô][ô][Ô]
            Dim objCommand = New MySqlCommand(instrucaoSQL, Conexao.GetConexao)
            Dim objDataSet As New DataSet
            Dim objSqlDataAdapter As MySqlDataAdapter = New MySqlDataAdapter(objCommand)
            objSqlDataAdapter.Fill(objDataSet)
     KryptonDataGridView1.DataSource = objDataSet.tables(0)
JRABELO 16/09/2012 22:56:09
#409778
Pelo que entendi esse código para consultar e mostrar no Datagridview.

Estou apenas querendo exibir os dados os dados do Mysql no Datagridview dentro do evento LOAD do Windows Form.

Estou usando a um PUBLIC SUB.

Public Sub CarregaDatagrid()

Dim da As New MySqlDataAdapter([Ô]SELECT NOME,SOBRENOME,DATA FROM cliente[Ô], cnn)
Dim dt As New DataTable
da.Fill(dt)
dtgTeste.DataSource = dt
da.Dispose()
cnn.Close()

End Sub[txt-color=#0000f0] [/txt-color]
OMAR2011 17/09/2012 07:30:03
#409780
Acredito que seja mais abetura do banco este erro citado acima.
Quanto ao código do Altair funciona normamente.Se quer carregar
no Load form,então não precisa declara uma sub como pública.
Verifica se a sua Conexão com o banco esteja CORRETA.
No meu teste deu certo
Valeu.
ALTAIR148 17/09/2012 07:31:59
#409781
E qual o problema amigo? Realmente o código que lhe mandei é para consultar, mas basta adaptar a SQL, que funciona do jeito que você quer..
JRABELO 18/09/2012 00:05:59
#409854
Já descobir meu erro!

[txt-color=#0000f0]Public Sub CarregaDatagrid()

[txt-color=#007100] connection() [ô]O erro estava aqui, faltava a conexão com o Banco Mysql.[/txt-color]
Dim da As New MySqlDataAdapter([Ô]SELECT NOME, SOBRENOME, DATA, DTCADASTRO FROM PESSOA [Ô], cnn)
Dim dt As New DataTable
da.Fill(dt)
dtgTeste.DataSource = dt
da.Dispose()
cnn.Close()

End Sub[/txt-color]

[txt-color=#0000f0]Public Sub connection()

strcnn = [Ô]server=localhost;user id=root;password=1234;database=test1[Ô]
cnn = New MySqlConnection(strcnn)

End Sub
[/txt-color]
JRABELO 18/09/2012 00:08:10
#409855
Estou encerrando o Tópico, obrigado a todos pela ajuda!!!
Tópico encerrado , respostas não são mais permitidas
Voltar