Soma De Débito E De Crédito Numa Tabela Ado

[Guest Visitante]

eu to usando um banco de dados com base ado, e queria somar os valores de crédito e de débito de uma tabela, como que eu faço??

[Graymalkin]

Você pode usar SQL, por exemplo:

crédito = cn.Execute("SELECT SUM(valor) AS total FROM tabela WHERE tipo='C').Fields("total").Value
débito = cn.Execute("SELECT SUM(valor) AS total FROM tabela WHERE tipo='D').Fields("total").Value

Isso tendo em mente que "cn" é a sua conexão (ADODB.Connection) e que os nomes dos campos e da tabela você deverá ajustar.

Abraços,

Graymalkin