suma columna grid según fecha

[guillebomtrasmiti]

hola, estoy atorado y no salgo de aquí, una tontería pero no me sale...tengo una columna TOTAL y otra fecha en el grid...bien las fechas se repiten...imaginen:

total fecha
55 1/1/2011
99 1/1/2011
88 3/1/2011
392 3/1/2011

bien pues necesito que se me agrupe la cantidad por fecha y el resultado de la suma me aparezca en lables...quiere decir...según este ejemplo de la fecha 1 del 1 debería tener un label con la suma y al lado en el formulario debería aparecerme otro label con la suma del día 3...así tantos labelssss como días tenga....en el grid...alguiennn?¿?¿?

[guillebomtrasmiti]

nadie sabe?

[gnzsoloyo]

La pregunta es: ¿En .Net o en una consulta a la base de datos?

[guillebomtrasmiti]

si...es vbnet...y accedo a una base de datos access

[guillebomtrasmiti]

vale más fácil, ya casi lo he resuelto pero....alguién sabe como borrar un grid?¿? para volver a cargar otra información, es que he probado todo esto y nada

datagrid.rows.clear
datagrid.datasource= nothing
datagrid.datasource = ""

alguna idea más=?

[guillebomtrasmiti]

alguien me puede decir si aquí hay algún error?¿?

Public Sub selecciontotal()

Dim adapta2 As New OleDbDataAdapter
Dim datavacio As New DataSet

Dim comados = conexion.CreateCommand
comados.CommandType = CommandType.Text

comados.CommandText = "SELECT Fecha,Anulado,Barra,NombTerminal, ROUND(Sum(Cantidad*Pts),2) AS TOTAL From [Introducción De Ventas] where Barra = @combo1 and NombTerminal = @combo2 and Anulado = 0 and Fecha between #01/01/" & ComboAno.Text & "# and #31/01/" & ComboAno.Text & "# group by Fecha,Anulado,Barra,NombTerminal"

comados.Parameters.AddWithValue("@combo1", ComboMostrador.SelectedValue.ToString)
comados.Parameters.AddWithValue("@combo2", ComboTerminal.SelectedValue.ToString)
' mes de enero
If ComboMeses.Text = ("ENERO") Then
borratextos()
adapta2.SelectCommand = comados
adapta2.Fill(datavacio, "[Introducción De Ventas]")

DgTotales.DataSource = datavacio
DgTotales.DataMember = "[Introducción De Ventas]"

End If

' mes de febrero
Dim comadosfebrero = conexion.CreateCommand
comadosfebrero.CommandType = CommandType.Text

comadosfebrero.CommandText = "SELECT Fecha,Anulado,Barra,NombTerminal, ROUND(Sum(Cantidad*Pts),2) AS TOTAL From [Introducción De Ventas] where Barra = @combo1 and NombTerminal = @combo2 and Anulado = 0 and Fecha between #01/02/" & ComboAno.Text & "# and #28/02/" & ComboAno.Text & "# group by Fecha,Anulado,Barra,NombTerminal"

comadosfebrero.Parameters.AddWithValue("@combo1", ComboMostrador.SelectedValue.ToString)
comadosfebrero.Parameters.AddWithValue("@combo2", ComboTerminal.SelectedValue.ToString)

If ComboMeses.Text = ("FEBRERO") Then
borratextos()
adapta2.SelectCommand = comadosfebrero
adapta2.Fill(datavacio, "[Introducción De Ventas]")

DgTotales.DataSource = datavacio
DgTotales.DataMember = "[Introducción De Ventas]"
DgTotales.Refresh()
End If

End Sub

[guillebomtrasmiti]

es que cuando filtro febrero me salen enero y febrero juntosssss en el datagrid=??

[HaverRamirez]

Changos que relajo tienes ahi...revisa que las variables o que el query se este generando de manera correcta.