SOMA EM TABELA
Estou tentando somar dados de uma tabela, mas, não consigo.
Vi alguns tópicos aqui mas, não consegui achar um que resolvesse.
uso este modo abaixo:
dim ass2 as string
ass2 = Format(Now, "DD/MM/YY")
sql = "Select * from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# "
Ou seja, ele busca todos os dados dos dias na tabela ValoresPagos do Campo "Data"..
Mas, preciso somar vários campos nesta tabela e ai é q entra o problema.
Nessa tabela preciso somar os campos:
TotalPagar
TotalPago
TempoPedido
TempoAcrescentado
Como atribruir e somar (Função sun) estes campos da tabela e atribuir no código sql acima?
Alguem sabe ou tem uma luz?
Vi alguns tópicos aqui mas, não consegui achar um que resolvesse.
uso este modo abaixo:
dim ass2 as string
ass2 = Format(Now, "DD/MM/YY")
sql = "Select * from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# "
Ou seja, ele busca todos os dados dos dias na tabela ValoresPagos do Campo "Data"..
Mas, preciso somar vários campos nesta tabela e ai é q entra o problema.
Nessa tabela preciso somar os campos:
TotalPagar
TotalPago
TempoPedido
TempoAcrescentado
Como atribruir e somar (Função sun) estes campos da tabela e atribuir no código sql acima?
Alguem sabe ou tem uma luz?
Exemplo em Sql Server
select
sum (
(case
when dt_recebimento is null then vl_receber+vl_juros-vl_desconto
else (null)
end)
) as vl_total_receber,
sum (
(case
when dt_recebimento is not null then vl_receber+vl_juros-vl_desconto
else (null)
end)
) as vl_total_recebido
from tb_conta_receber
where dt_vencimento between Inicial and Final
select
sum (
(case
when dt_recebimento is null then vl_receber+vl_juros-vl_desconto
else (null)
end)
) as vl_total_receber,
sum (
(case
when dt_recebimento is not null then vl_receber+vl_juros-vl_desconto
else (null)
end)
) as vl_total_recebido
from tb_conta_receber
where dt_vencimento between Inicial and Final
faça uma acumulador para você somar o campo desejado ou seja...
após você fazer a consulta somente ficam selecionados alguns registros... o total desses registro é o recordcount. Observe o código com exemplo usando ado
'a instrução de consulta seria antes deste código
dim total as single
dim valor as single
for i=0 to ado.recordsource.recordcount
valor=ado.recordset.fields("valor") '=> variável igual ao valor do campo
total=total+valor
ado.recordset.movenext '=> Move pro próximo registro selecionado na consulta
next
O código fazerá este esquema num total de vezes igual ao número de registros selecionados na consulta ( recordcount ). E a soma do valores do campo estará armazenado na várivel "total"
Renan, Muito Grato em ajudá-lo
após você fazer a consulta somente ficam selecionados alguns registros... o total desses registro é o recordcount. Observe o código com exemplo usando ado
'a instrução de consulta seria antes deste código
dim total as single
dim valor as single
for i=0 to ado.recordsource.recordcount
valor=ado.recordset.fields("valor") '=> variável igual ao valor do campo
total=total+valor
ado.recordset.movenext '=> Move pro próximo registro selecionado na consulta
next
O código fazerá este esquema num total de vezes igual ao número de registros selecionados na consulta ( recordcount ). E a soma do valores do campo estará armazenado na várivel "total"
Renan, Muito Grato em ajudá-lo
Nossa.. preciso de alguma forma, simplifica isso.
Acho que vou fazer um loop somando
Então, se eu quisesse abrir a tabela ValoresPagos sendo que busque apenas aquela data que desejo, somando o campo "TotalPagar" como ficarai a sintaxe abaixo:
sql = "Select * from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# "
tentei algumas tipo
sql = "Select * from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# and Sum(ValorPago)"
mas, não da certo...
alguem sabe a sintaxe correta?
Acho que vou fazer um loop somando
Então, se eu quisesse abrir a tabela ValoresPagos sendo que busque apenas aquela data que desejo, somando o campo "TotalPagar" como ficarai a sintaxe abaixo:
sql = "Select * from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# "
tentei algumas tipo
sql = "Select * from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# and Sum(ValorPago)"
mas, não da certo...
alguem sabe a sintaxe correta?
Aqui, tenta isso ,
Citação:sql = "Select sum(totalpagar) from ValoresPagos where Data LIKE DATE= #" & Format(ass2, "MM/DD/YYYY") & "# "
Tópico encerrado , respostas não são mais permitidas