em soma

[ODIR 0]

estou com um problema estou tentando fazer uma soma matematica mas o resultado é uma soma de digitos

 

 

ex.

<%While Not objRS.EOF 						dim valoro, tem 						valoro = 0.00						tem = objRS("valor")					   						valoro = valoro + tem 						Response.Write(valoro)  %>

 

neste caso ao inves de o resultado aparecer 20,00 aparece 10 10

 

como faco para resolver isto?

 

valeu

[Mário Monteiro 179]

ele esta tratando como texto

 

force a conversão para numeros usando o CDBL

 

ASP

valoro = CDBL(valoro) + CDBL(tem)

[ODIR 0]

eu tentei assim mas continua aparecendo do mesmo jeito sera que nao tem que formatar as variaveis tipo

dim valoro as interger

 

 

agora estou tentando da seguinte maneira

 

ASP

valoro = (FormatCurrency(CDBL(valoro) + CDBL(tem)))

 

 

 

mas ta aparecendo R$ 10,00 R$ 10,00

[Ted k' 126]

Coloque o formatCurreny na resposta e ñ na soma para ver o que acontece

[Mário Monteiro 179]

é como o ted disse

[ODIR 0]

<%While Not objRS.EOF 						dim valoro 						dim tem 						valoro = 0.00						tem = objRS("valor")					   						valoro = CDBL(valoro) + CDBL(tem)						Response.Write(FormatCurrency(valoro))   %>

continua aparecendo da mesma forma sera que nao tem que formatar as variaveis

[Mário Monteiro 179]

como esta aparecendo agora?

[ODIR 0]

agora eu nao estou mais tentando so 10 + 10, esta aparecendo exatamente desta forma

R$ 50,00 R$ 50,00 R$ 50,00 R$ 40,00

[Mário Monteiro 179]

ta estanho isso

 

tira a declaração e a atribuição da do valor de dentro do loop

 

ASP

dim valoro

dim tem

valoro = 0

 

Dentro do loop poe apenas

 

ASP

tem = objRS("valor")

valoro = valoro + CDBL(tem)

 

o Response voce poe fora do loop senao vai repetir sempre mesmo

[ODIR 0]

deu certo cara valeu

 

 

mas ainda tenho mais uma duvida dentro deste codigo e a seguinte quando eu tento fazer uma consulta com variaveis se eu coloco or ela me da um resultado diferente aqui esta o codigo

 

ASP

if codgrupo <> "" and emissao <> "" and vencimento <> "" then

strQuery = "SELECT * FROM pg where codgrupo = '"&codgrupo&"' and  vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"

'Response.Write(strQuery) : Response.End()

elseif codforn <> "" and emissao <> "" and vencimento <> "" then

 

strQuery = "SELECT * FROM pg where codfornecedor = '"&codforn&"' and vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"

elseif emissao <> "" and vencimento <> "" then

strQuery = "SELECT * FROM pg where vecimento = '"&emissao&"' or vecimento = '"&vencimento&"' or vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"

'Response.Write(strQuery) : Response.End()

 

 

esta aqui aceita o or e retorna os dados exatamento como eu pedi

 

ASP

strQuery = "SELECT * FROM pg where vecimento = '"&emissao&"' or vecimento = '"&vencimento&"' or vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"

'Response.Write(strQuery) : Response.End()

 

 

porem as outras se eu coloco o or ela dao um resultado totalmente fora do esperado

 

ASP

strQuery = "SELECT * FROM pg where codgrupo = '"&codgrupo&"' and  vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"

 

com o or ficaria assim

 

ASP

strQuery = "SELECT * FROM pg where codgrupo = '"&codgrupo&"' and  vecimento = '"&emissao&"' or  vecimento = '"&vencimento&"' or vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"

 

 

oque devo fazer?

[Mário Monteiro 179]

que bom tiozinhoparabens

[ODIR 0]

a cara eu editei o post acima conforme regras do forum, e acho que voce nao viu uma duvida minha qe ficou pendente voce pode me ajudar

[Daw 0]

Acho que também funcionaria assim:

 

ASP

valoro = CCur(valoro) + CCur(tem)

[ODIR 0]

daw eu ja resolvi este problema a ques tao agora é esta

mas ainda tenho mais uma duvida dentro deste codigo e a seguinte quando eu tento fazer uma consulta com variaveis se eu coloco or ela me da um resultado diferente aqui esta o codigoASPif codgrupo <> "" and emissao <> "" and vencimento <> "" thenstrQuery = "SELECT * FROM pg where codgrupo = '"&codgrupo&"' and vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"'Response.Write(strQuery) : Response.End()elseif codforn <> "" and emissao <> "" and vencimento <> "" thenstrQuery = "SELECT * FROM pg where codfornecedor = '"&codforn&"' and vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"elseif emissao <> "" and vencimento <> "" thenstrQuery = "SELECT * FROM pg where vecimento = '"&emissao&"' or vecimento = '"&vencimento&"' or vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"'Response.Write(strQuery) : Response.End()esta aqui aceita o or e retorna os dados exatamento como eu pediASPstrQuery = "SELECT * FROM pg where vecimento = '"&emissao&"' or vecimento = '"&vencimento&"' or vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"'Response.Write(strQuery) : Response.End()porem as outras se eu coloco o or ela dao um resultado totalmente fora do esperadoASPstrQuery = "SELECT * FROM pg where codgrupo = '"&codgrupo&"' and vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"com o or ficaria assimASPstrQuery = "SELECT * FROM pg where codgrupo = '"&codgrupo&"' and vecimento = '"&emissao&"' or vecimento = '"&vencimento&"' or vecimento > '"&emissao&"' and vecimento < '"&vencimento&"' ORDER BY vecimento desc"oque devo fazer?

[Daw 0]

Tente agrupar os OR entre ().

 

Por exemplo:

(a and b ) OR (a and c) OR (a = null)

 

Vê se resolove, no mais...

Não consegui entender direito o que está gerando, tente explicar melhor.

 

[]tz ;)

[Mário Monteiro 179]

com certeza o que falta é voce usar os parenteses para especificar como é exatamente a logica de seu problema