USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Group by
Maxcim
GUARULHOS
SP - BRASIL
Postada em 30/09/2005 11:05 hs            
olá amigos.
 
estou com uma duvida de como usar a instrução GROUP BY.
tenho uma tabela onde gravo todas as locaçoes (detalhes de uma comanda)
e precisop fazer uma comsulta sobre o ranking de locaçoes...
então devo somar o mumero de lancamentos para cada cliente , agrupar por cliente e classificar pela soma de lancamentos, do maior para o menor.
 
parece facil, mas não consegui usar o group by...
 
conto com a ajuda de voceis
 
 
     
Daniel
Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 30/09/2005 11:09 hs            
SEGUE UM EXEMPLO DE UMA SQL EM QUE TOTALISO OS PEDIDOS POR CLIENTE E COLOCO EM ORDEM DECRESCENTE DE VALOR
 
SELECT Pedidos.Cod_Cli, Sum(Pedidos.Tot_Pedido) AS SomaDeTot_Pedido
FROM Pedidos
GROUP BY Pedidos.Cod_Cli
ORDER BY Sum(Pedidos.Tot_Pedido) DESC;

dsmn
     
VACA
LIMEIRA
SP - BRASIL
Postada em 30/09/2005 11:22 hs            
entretanto se vc tiver mais de um campo q naum seja o sum vc tem q coloca-lo no group by, naum sei pq mais sei q se naum for assim naum dah certo ex:

SELECT Pedidos.Cod_Cli, Pedidos.Nome_Cli, Sum(Pedidos.Tot_Pedido) AS SomaDeTot_Pedido
FROM Pedidos
GROUP BY Pedidos.Cod_Cli, Pedidos.Nome_Cli
ORDER BY Sum(Pedidos.Tot_Pedido) DES

"Quando estou fraco, aí então é que sou Poderoso"
     
Maxcim
GUARULHOS
SP - BRASIL
Postada em 30/09/2005 11:25 hs            
valeu Daniel. obrigado
 
     
Maxcim
GUARULHOS
SP - BRASIL
Postada em 30/09/2005 13:09 hs            
gente, a query ficou assim, no banco dedados roda normalmente, mas quando rodo pelo vb dá erro... " nenhum valor foi fornecido para um ou mais paremnetrosnecessarios"
 
SELECT codigocli, SUM(tbl_locacao_DETALHES.qtd) AS total_Locacao From tbl_locacao_DETALHES GROUP BY tbl_locacao_DETALHES.codigocli ORDER BY  SUM(tbl_locacao_DETALHES.qtd)  DESC;
     
Daniel
Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 30/09/2005 13:20 hs            
Se a conecção for por dao fica assim:
 
Dim Base_Export As Database
Dim Rs_Soma as Recordset
Db_Export$ = C_Cam_Rede$ & "EXPORTACAO.mdb"
Set Base_Export = Wk.OpenDatabase(Db_Export, False, False)
Set Rs_Soma = Base_Export.OpenRecordset("SELECT codigocli, SUM(tbl_locacao_DETALHES.qtd) AS total_Locacao From tbl_locacao_DETALHES GROUP BY tbl_locacao_DETALHES.codigocli ORDER BY  SUM(tbl_locacao_DETALHES.qtd)  DESC;")
valor =Rs_Soma("total_Locacao")

dsmn
     
Página(s): 1/2      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página