Alguien que domine los Listview que lea mi pregunta porfa

Daniel
26 de Septiembre del 2003
Tengo mi base de datos conectada al listview y voy mostrando lo que hay en las casillas... lo que nececito es sumar solo lo que hay en una columna,... y guardar todos los registros mostrados... lo he hecho con un siclo pero no me ha resultado si alguien tiene algun codigo o me puede ayudar que me escriva o me responda... ok Grasias

rafa
26 de Septiembre del 2003
Te mando un codigo para el total, adaptalo. A mi me funciona.
Dim fila As ListItem
Dim rstResTrab As New ADODB.Recordset
Dim sql As String
Dim total As Integer
sql = "select......"
lwResumen.ListItems.Clear
rstResTrab.open sql
With rstResTrab
cant = 0
While Not .EOF
Set fila = lwResumen.ListItems.Add(, , !RESULTADO)
fila.SubItems(1) = !cantidad
cant = cant + !cantidad
.MoveNext
Wend
Set fila = lwResumen.ListItems.Add(, , "-----------------------------")
fila.Bold = True
fila.SubItems(1) = "------------------"
fila.ListSubItems(1).Bold = True
Set fila = lwResumen.ListItems.Add(, , "TOTAL")
fila.Bold = True
fila.SubItems(1) = cant
fila.ListSubItems(1).Bold = True
End With

Suerte