FLEXGRID

USUARIO.EXCLUIDOS 19/04/2004 13:53:07
#21352
Boa Tarde Galera do Vb Mania!
Estou com difuculdades, abaixo explico o código :

Set rsProv = Db.OpenRecordset(sql, dbOpenSnapshot)
        Do While rsProv.EOF = False
            Confere = False
                For I = 1 To flxProv.Rows - 1
                    If DateValue(flxTeste.TextMatrix(I, 0)) = DateValue(rsProv!Pagto) Then
                        flxTeste.TextMatrix(I, 5) = IIf(IsNull(rsProv!Valor), 0, rsProv!Valor)
                             Confere = True
                    Exit For
                    End If
                Next
               
               rsProv.movenext     
        Loop

Set rsProv = Nothing

O RecordSet está armazenado os valor (( Pagto = Data e Valor = ##,##), ou seja, os valores divididos por data Ex : 19/03/2004 = 100,00 20/03/2004 300,00, mas quando as datas se repetem ( 19/03/2004 = 100 e 19/03/2004 = 200 ) o grid acaba guardando apenas o ultimo valor...Não sei como faço para o grid somar os valores ao invés de substituir pelo ultimo....
Alguém tem alguma idéia ???
Desde - já agradeço a todos ....

Abraço,
Marcelo
RXGOMES 19/04/2004 15:07:26
#21373 Resposta escolhida
Tenta usar a seguinte instrução

select data,sum(pagto) valor from tabela where condição group by data
Tópico encerrado , respostas não são mais permitidas
Voltar