Actualizar Datagridview

[celsoreis]

Boas tenho outra grande questão...

EU tenho um programa que é um gestor de stocks e tenho um form para inserir produtos e tenho outro que os vai listar... O meu problema é que quando acabo de inserir um novo produto o datadridview não actualiza e para ele actualizar tenho de para de correr o programa e voltar a ligar... Como faço para ele actualizar logo assim que acabo de inserir um produto

A

[Retsu9]

tenta Datagrid.Refresh()

se nao der, crias um procedimento para listar os dados e cada vez que editas/inseres um novo registo chamas esse procedimento

[celsoreis]

Crio esse procedimento dentro do datagridview ou no botão que clico para adicionar ?

[Retsu9]

Procedimento que recebe a datagrid que qeres preencher:

Public Sub carregar_mesas(ByVal DG As DataGridView)
 DG.Rows.Clear()
 query = "Select * From mesas"
 dr = executar_query_Reader(query)
 While dr.Read
	 Dim n As Integer = DG.Rows.Add()
	 DG.Rows.Item(n).Cells(0).Value = dr("ID_mesa")
	 DG.Rows.Item(n).Cells(1).Value = dr("N_lugares")
	 If dr("Ocupada") = True Then
		 DG.Rows.Item(n).Cells(2).Value = "Ocupada"
		 DG.Rows.Item(n).Cells(2).Style.ForeColor = Color.Red
	 ElseIf dr("Reservada") = True Then
		 DG.Rows.Item(n).Cells(2).Value = "Reservada"
		 DG.Rows.Item(n).Cells(2).Style.ForeColor = Color.Orange
	 Else
		 DG.Rows.Item(n).Cells(2).Value = "Disponivel"
		 DG.Rows.Item(n).Cells(2).Style.ForeColor = Color.Green
	 End If
 End While
 con.Close()
End Sub

quando queres carregar a datagrid ou depois de fazers um insert\delete\update basta chamares assim:

carregar_mesas(DG_mesas)

Edited May 6, 2015 at 03:29 PM by apocsantos
geshi

[celsoreis]

Procedimento que recebe a datagrid que qeres preencher:

Public Sub carregar_mesas(ByVal DG As DataGridView)
 DG.Rows.Clear()
 query = "Select * From mesas"
 dr = executar_query_Reader(query)
 While dr.Read
	 Dim n As Integer = DG.Rows.Add()
	 DG.Rows.Item(n).Cells(0).Value = dr("ID_mesa")
	 DG.Rows.Item(n).Cells(1).Value = dr("N_lugares")
	 If dr("Ocupada") = True Then
		 DG.Rows.Item(n).Cells(2).Value = "Ocupada"
		 DG.Rows.Item(n).Cells(2).Style.ForeColor = Color.Red
	 ElseIf dr("Reservada") = True Then
		 DG.Rows.Item(n).Cells(2).Value = "Reservada"
		 DG.Rows.Item(n).Cells(2).Style.ForeColor = Color.Orange
	 Else
		 DG.Rows.Item(n).Cells(2).Value = "Disponivel"
		 DG.Rows.Item(n).Cells(2).Style.ForeColor = Color.Green
	 End If
 End While
 con.Close()
End Sub

Este código meto na datagridview certo ?

quando queres carregar a datagrid ou depois de fazers um insert\delete\update basta chamares assim:

carregar_mesas(DG_mesas)

e este código meto no botão adicionar certo ?

Edited May 6, 2015 at 09:52 PM by celsoreis

[Retsu9]

tens um botao adicionar, dentro dele fazes tudo o que tens para fazer...insert into ... isso tudo

no fim depois do registo inserido fazes isso sim