[Resolvido] Somar valores - select dentro de select

[Carlos Moreira 0]

Olá pessoal

 

Tenho uma paginação MYSQL onde listo meus clientes, OK!

 

e onde eu listo os cliente eu busco na tabela sites quantos sites ele possui e mostro o valor dos mesmos.

 

Mas não esta dando certo pq sera?

 

veja abaixo o código que estou usando para buscar as informações, lembrando que estou dentro de uma paginação MYSQL

 

categ = RS("id")

sqlq = "SELECT * FROM site where cliente = "& cint(categ) &" "
'Response.Write("sqlq= "& sqlq &"<br>")
Set RScateg = Conn.Execute(sqlq)
WHILE NOT RScateg.EOF
%>
<%
valor = valor + clng(replace(RScateg("valor"),",","."))
i = i+1
Count = Count + 1 
RScateg.MoveNext
WEND%>
<%=valor%>
<%
RScateg.Close
Set RScateg = Nothing
%>

o erro é que nao aparece nada e tem hora que atualizo e aparece valores absurdos

[Salgado 4]

Você está fazendo esse Loop While apenas para somar esses valores? Pode fazer com uma única função diretamente na SQL. Fica +/- assim:

Select Sum(valor) As ValorTotal, Count(valor) As QuantidadeSites From site Where cliente = "& categ &";

Com isso é só executar a SQL e recuperar os campos "virtuais" ValorTotal e QuantidadeSites que terá o somatório e a contagem dos dados.

[Carlos Moreira 0]

beleza salgado funcionou certinho!!!

 

somente agora deu erro de compatibilidade no <%=FormatCurrency(valor2, 2)%>

 

usei como esta abaixo

 

<%
categ = RS("id")
%>
<%
Set RSvalor2 = Conn.Execute("SELECT Sum(valor) as Contador FROM site where cliente="& cint(categ) &"")
valor2= RSvalor2("Contador")
%>
<%=FormatCurrency(valor2, 2)%>
				  <%
RSvalor2.Close 
Set RSvalor2 = Nothing %>