Inquiridor
CONTAR REGISTROS DISTINTOS

Discussão Geral
-
Olá,
Preciso de uma ajuda em uma consulta ao meu banco de dados Access à partir de um projeto VB6.
Preciso contar os dados de um campo, onde esses dados sejam distintos um do outro. já tentei usar count(distinct ID) porém aparece um erro informando que falta argumentos.
Exemplo:
ID
1
1
2
2
3
4
Está contando duas vezes os dados repetidos.
Segue código utilizado:
rs.Open "Select Data_Cad, count(ID) as rID, count(Cod_Item) as rItens, sum(Val_Total) as rValor_Venda, sum(Val_Lucro) as rValor_Lucro from TBL_PDV WHERE Data_Cad between # " & VBA.Format(dtpInicial.Value, "mm/dd/yyyy") & "# and #" & VBA.Format(dtpFinal.Value, "mm/dd/yyyy") & "#group by Data_Cad ", db, 3, 3
- Editado Everton_Delmiro sexta-feira, 11 de dezembro de 2015 03:24
- Tipo Alterado Marcos SJ segunda-feira, 21 de dezembro de 2015 12:02 Pergunta Inicial respondida/Costumer rejected solution
Todas as Respostas
-
use o count(distinct ID):
rs.Open "Select Data_Cad, count(distinct ID) as rID, count(Cod_Item) as rItens, sum(Val_Total) as rValor_Venda, sum(Val_Lucro) as rValor_Lucro from TBL_PDV WHERE Data_Cad between # " & VBA.Format(dtpInicial.Value, "mm/dd/yyyy") & "# and #" & VBA.Format(dtpFinal.Value, "mm/dd/yyyy") & "#group by Data_Cad ", db, 3, 3
att
William John Adam Trindade
Analyste-programmeur
----------------------------------------------------------
-
-
Qual é a base de dados? SQL Server?
Att
William John Adam Trindade
Analyste-programmeur
----------------------------------------------------------
-
-
Neste caso nao existe count(distinct).
Access é um banco limitado que nao utiliza o SQL Padrao.. para simular o count distinct voce vai ter que fazer:
http://www.geeksengine.com/article/access-distinct-count.html
basicamente voce vai ter que fazer um subquery:
select count(id) as ids from ( select distinct id from table )
William John Adam Trindade
Analyste-programmeur
----------------------------------------------------------
-
-
Boa tarde,
Preciso muito desta ajuda...como adapto esse meu código com uma subquery para contar ID distinto?
rs.Open "Select Data_Cad, count(ID) as rID, count(Cod_Item) as rItens, sum(Val_Total) as rValor_Venda, sum(Val_Lucro) as rValor_Lucro from TBL_PDV WHERE Data_Cad between # " & VBA.Format(dtpInicial.Value, "mm/dd/yyyy") & "# and #" & VBA.Format(dtpFinal.Value, "mm/dd/yyyy") & "#group by Data_Cad ", db, 3, 3
- Editado Everton_Delmiro sábado, 12 de dezembro de 2015 20:03
-
-
Sua pergunta inicial já foi respondida?
Atenciosamente
Marcos Roberto de Souza Junior
Esse conteúdo e fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as respostas que resolveram o seu problema. Essa e uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.
-
-
Sua pergunta inicial foi essa?
Você pode marcar a resposta da sua pergunta inicial e prosseguir com os detalhes mesmo com a resposta marcada.
Marcos Roberto de Souza Junior
Esse conteúdo e fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as respostas que resolveram o seu problema. Essa e uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.
- Editado Marcos SJ terça-feira, 15 de dezembro de 2015 11:48
-
-
-
-