[Resolvido] Somatiorio não está funciomando

[Adilson_Web_2007 0]

Olá pessoal estou com um problema e não estou conseguindo resolver.

 

Eu tenho um select que faz a soma de uma determinada coluna, ai eu pego esse valor e somo com o valor digitado num campo pelo usuário, eu converto o valor do campo com a função CDbl para fazer a somatoria ate aqui beleza

 

ai eu pego esse valor somado e verifico se o valor somado é maior que o valor declarado.

 

Assim:

 

 

Esse é o select

sql_conta ="select Sum(peso) as total_ac from import_di   where item_seq ='"&id&"' and numero_ac='"&numero&"'"
set rs_conta =ConexaoDataBase.Execute(sql_conta)
[code]

Eu faço uma verificação 

[code]
if  rs_conta("total_ac") <> "" then
resto = FormatNumber(rs_conta("total_ac"),5,true)
else
resto =  rs_conta("total_ac")
end if

Ai eu faço isso:

 

somatoria = resto + CDbl(peso)

Ai eu verifico se a somatoria é maoir que o valor declarado

 

if (somatoria  >  di) then
acao
end if

di é o valor declarado.

 

So que ele não entra nessa condição. o valor passa ele deixa passar.

[hargon 64]

Tenta assim:

if (cDbl(somatoria) > cDbl(di)) then

 

Se não funcionar, manda escrever o valor de somatória e di para vê o que está armazenado em cada um.

[Adilson_Web_2007 0]

Deu certo muito obrigado

[hargon 64]

Muito bom. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif