Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

H D. HeRO

[Resolvido] Problema ao realizar busca de registro no banco de da

Recommended Posts

Olá, estou fazendo um trabalho em que preciso criar um programa para controle de estoque.

Quando busco os registros no banco de dados e exibo no DataGridView na primeira vez funciona, depois quando mando realizar uma nova busca, em vez de atualizar os campos do DataGridView ele adiciona os campos novamente, exibindo registros duplicados no DataGridView.

 

Estou usando banco de dados Firebird em localhost

 

Private Sub listaproduto()
       conexao.ConnectionString = FbConexao
       conexao.Open()

       da = New FbDataAdapter("Select * from TB_PRODUTO", conexao)

       Try
           da.Fill(ds, "TB_PRODUTO")
           DataGridView1.DataSource = ds.Tables("TB_PRODUTO")
       Catch ex As Exception

       End Try
       conexao.Close()
   End Sub

 

desde já obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

Limpe o Datagrid antes de adidcionar novas colunas, e limpe o DataSource também:

 

 

Private Sub listaproduto()
       conexao.ConnectionString = FbConexao
       conexao.Open()

       da = New FbDataAdapter("Select * from TB_PRODUTO", conexao)

       Try
           da.Fill(ds, "TB_PRODUTO")

		DataGridView1.DataSource = Nothing
		DataGridView1.Rows.Clear()
		DataGridView1.Columns.Clear()

           DataGridView1.DataSource = ds.Tables("TB_PRODUTO")

	Catch ex As Exception
		exit sub
           conexao.Close()
	Finally
		conexao.Close()
	End Try
   End Sub

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

Obrigado pela ajuda, acabei resolvendo de um jeito um pouco diferente, dei um clear na tabela

 

conexao.ConnectionString = FbConexao
       conexao.Open()

       da = New FbDataAdapter("Select * from TB_PRODUTO", conexao)

       Try
           ds.Tables.Clear()
           da.Fill(ds, "TB_PRODUTO")
           DataGridView1.DataSource = ds.Tables("TB_PRODUTO")
       Catch ex As Exception
           Exit Sub
           conexao.Close()
       Finally
           conexao.Close()
       End Try
       conexao.Close()

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.