Somando valores em ASP

[kania 0]

Bom dia pessoal,

 

Estou desenvolvendo um apalicação que envolve calculos dentro do BD da seguinte forma:

 

 

tenho dentro do BD as colunas

 

credito, credito bloqueado, debito, tipo de transação

 

Preciso fazer a soma total da coluna credito bloqueado e debito para depois fazer a diferença entre os dois ( tipo debito e crédito), o meu problema é que não estou sabendo como somar todos os valores da colunas eu fiz o uma rotina porem ela não eta somando, onde estou errando?

 

Set tx = Server.CreateObject("adodb.recordset")
SQL = "select * from extrato where nome='"&nome&"'"
tx.Open SQL,Conn,3,3

total = tx.recordcount
   x = 0
   do while x < total
   
if tx("tipo_operacao") = "dep_cvs" then
total_desb = Tx("credito_bloqueado")
end if

if tx("tipo_operacao") = "transf_cc" then
total_transf = Tx("debito")
end if

credito = total_desb - total_transf

[mbarreto 0]

Set tx = Server.CreateObject("adodb.recordset")

sql = select sum(credito_bloqueado) as total_desb, sum(debito) as total_transf from extrato where nome='"&nome&"'"

tx.Open SQL,Conn,3,3

 

if not tc.eof then

credito = tx("total_desb") - tx("total_transf")

end if