COMPARAR OS ULTIMOS 6 REGISTROS DE UMA TABELA,
Esses são os primeiros 6 Registros do meu banco de dados.
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 1,[ô]29.09.2003[ô],2,3,5,6,9,10,11,13,14,16,18,20,23,24,25
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 2,[ô]06.10.2003[ô],1,4,5,6,7,9,11,12,13,15,16,19,20,23,24
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 3,[ô]13.10.2003[ô],1,4,6,7,8,9,10,11,12,14,16,17,20,23,24
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 4,[ô]20.10.2003[ô],1,2,4,5,8,10,12,13,16,17,18,19,23,24,25
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 5,[ô]27.10.2003[ô],1,2,4,8,9,11,12,13,15,16,19,20,23,24,25
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 6,[ô]03.11.2003[ô],1,2,4,5,6,7,10,12,15,16,17,19,21,23,25
preciso comparar esses 6 registros e dizer quais os números que se repetiram e quantas vezes
Exemplo:
1 =1 2
2 = 0
3 = 5
Sei que vou utilizar um select count mas como monta ele não sei.
Se tiver alguma maneira mais simples tbm aceito.
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 1,[ô]29.09.2003[ô],2,3,5,6,9,10,11,13,14,16,18,20,23,24,25
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 2,[ô]06.10.2003[ô],1,4,5,6,7,9,11,12,13,15,16,19,20,23,24
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 3,[ô]13.10.2003[ô],1,4,6,7,8,9,10,11,12,14,16,17,20,23,24
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 4,[ô]20.10.2003[ô],1,2,4,5,8,10,12,13,16,17,18,19,23,24,25
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 5,[ô]27.10.2003[ô],1,2,4,8,9,11,12,13,15,16,19,20,23,24,25
CONCURSO,DATA, N1, N2, N3, N4, N5, N6, N7, N8, N9, N10, N11, N12, N13, N14, N15 VALUES 6,[ô]03.11.2003[ô],1,2,4,5,6,7,10,12,15,16,17,19,21,23,25
preciso comparar esses 6 registros e dizer quais os números que se repetiram e quantas vezes
Exemplo:
1 =1 2
2 = 0
3 = 5
Sei que vou utilizar um select count mas como monta ele não sei.
Se tiver alguma maneira mais simples tbm aceito.
select concurso, count(consurso) as Qtde from tabela group by concurso
sera isso?
este codigo retorna a quantidade de linhas encontradas para cada concurso
duvidas post novamente... ate+
sera isso?
este codigo retorna a quantidade de linhas encontradas para cada concurso
duvidas post novamente... ate+
Fiz o select na banco inteiro assim:
select n1,
count(n1) as
Qtde from lotofacil
group by n1
retorno
N1 - Qtde
1 - 525
2 - 216
3 - 75
4 - 24
5 - 11
6 - 2
Ate ai ok mas como faço o mesmo para somar as 15 colunas ao mesmo tempo e trazer o resultado.
select n1,
count(n1) as
Qtde from lotofacil
group by n1
retorno
N1 - Qtde
1 - 525
2 - 216
3 - 75
4 - 24
5 - 11
6 - 2
Ate ai ok mas como faço o mesmo para somar as 15 colunas ao mesmo tempo e trazer o resultado.
Kelvin, ver se este exemplo resolve o problema.
tb4.Open [Ô]SELECT Resultado1.CODIGO, Resultado1.CONC, Resultado1.[Data Sorteio], Resultado1.N1, Resultado1.N2, Resultado1.N3, Resultado1.N4, Resultado1.N5, Resultado1.N6, Resultado1.N7, Resultado1.N8, Resultado1.N9, Resultado1.N10, Resultado1.N11, Resultado1.N12, Resultado1.N13, Resultado1.N14, Resultado1.N15 From Resultado1 WHERE (((Resultado1.[Data Sorteio]) Between ([Resultado1].[Data Sorteio])=#9/29/2003# And #11/3/2003#)) And n1=[Ô] & Text5 & [Ô] Or n2=[Ô] & Text5 & [Ô] Or n3=[Ô] & Text5 & [Ô] Or n4=[Ô] & Text5 & [Ô] Or n5=[Ô] & Text5 & [Ô] Or n6=[Ô] & Text5 & [Ô] Or n7=[Ô] & Text5 & [Ô] Or n8=[Ô] & Text5 & [Ô] Or n9=[Ô] & Text5 & [Ô] Or n10=[Ô] & Text5 & [Ô] Or n11=[Ô] & Text5 & [Ô] Or n12=[Ô] & Text5 & [Ô] Or n13=[Ô] & Text5 & [Ô] Or n14=[Ô] & Text5 & [Ô] Or n15=[Ô] & Text5 & [Ô] ;[Ô]
Para saber quantidade de registros.
MsgBox [Ô]Foram encontrados[Ô] & MSFlexGrid1.Row & [Ô]Registro(s)[Ô]
LblReg(0) = MSFlexGrid1.Row & [Ô]Registro(s)[Ô]
Importo os dados da págima da caixa com os resultados.
Ele não estão em ordem crescente.
Faço deste jeito.
Valeu
Para saber quantidade de registros.
MsgBox [Ô]Foram encontrados[Ô] & MSFlexGrid1.Row & [Ô]Registro(s)[Ô]
LblReg(0) = MSFlexGrid1.Row & [Ô]Registro(s)[Ô]
Importo os dados da págima da caixa com os resultados.
Ele não estão em ordem crescente.
Faço deste jeito.
Valeu
Tenho um banco de dados.(FireBird)
Em um listview eu tragos os ultimos 6 registros do banco. preciso de um comando que analise o seguinte.
analisar as 15 colunas da tabela e me dizer quantos e quais os números que se repetem o comando
select n1,
count(n1) as
Qtde from lotofacil
group by n1
analiza somente uma coluna tem como analizar varias ao memso tempo?
Em um listview eu tragos os ultimos 6 registros do banco. preciso de um comando que analise o seguinte.
analisar as 15 colunas da tabela e me dizer quantos e quais os números que se repetem o comando
select n1,
count(n1) as
Qtde from lotofacil
group by n1
analiza somente uma coluna tem como analizar varias ao memso tempo?
Bom ja descobri que posso usar da seguinte maneira.
[Ô]select count(*) from lotofacil t where (t.n1 = 1 or t.n2 = 1 or t.n3 = 1 or t.n4 = 1 or t.n5 = 1 or t.n6 = 1 or t.n7 = 1 or t.n8 = 1 or t.n9 = 1 or t.n10 = 1 or t.n11 = 1 or t.n12 = 1 or t.n13 = 1 or t.n14 = 1 or t.n15 = 1)[Ô]
Bom agora tenho que descobri como faço pra executar esse códido 25 vezes sem pesar no programa.
Ou se tem uma forma mais fácil de executar isso no programa
[Ô]select count(*) from lotofacil t where (t.n1 = 1 or t.n2 = 1 or t.n3 = 1 or t.n4 = 1 or t.n5 = 1 or t.n6 = 1 or t.n7 = 1 or t.n8 = 1 or t.n9 = 1 or t.n10 = 1 or t.n11 = 1 or t.n12 = 1 or t.n13 = 1 or t.n14 = 1 or t.n15 = 1)[Ô]
Bom agora tenho que descobri como faço pra executar esse códido 25 vezes sem pesar no programa.
Ou se tem uma forma mais fácil de executar isso no programa
Acho que você não entendeu a consulta.Basta digitar um número
na caixa de texto a consulta irá verficar nos 15 campos do registro onde
vai esta o número digitado.
Em um registro não pode repetir um número,ai onde a consulta verifica o
campo onde está o referido número digitado e quantos registro está
na mesma condição.
Verifica.
Cara eu faço isto mais com a mega sena.
Valeu.
na caixa de texto a consulta irá verficar nos 15 campos do registro onde
vai esta o número digitado.
Em um registro não pode repetir um número,ai onde a consulta verifica o
campo onde está o referido número digitado e quantos registro está
na mesma condição.
Verifica.
Cara eu faço isto mais com a mega sena.
Valeu.
Maluco,é a mesma coisa.
Olha a outra consulta.
tb4.Open [Ô]select TOP 6 * From Lotofacil Where n1=[Ô] & Text5 & [Ô] Or n2=[Ô] & Text5 & [Ô] Or n3=[Ô] & Text5 & [Ô] Or n4=[Ô] & Text5 & [Ô] Or n5=[Ô] & Text5 & [Ô] Or n6=[Ô] & Text5 & [Ô] Or n7=[Ô] & Text5 & [Ô] Or n8=[Ô] & Text5 & [Ô] Or n9=[Ô] & Text5 & [Ô] Or n10=[Ô] & Text5 & [Ô] Or n11=[Ô] & Text5 & [Ô] Or n12=[Ô] & Text5 & [Ô] Or n13=[Ô] & Text5 & [Ô] Or n14=[Ô] & Text5 & [Ô] Or n15=[Ô] & Text5 & [Ô] [Ô]
Com caixa de texto o consulta dinâmoca e a mesma coisa e pode digitar
qualquer número.
Muito mais eficiente.
Valeu.
Olha a outra consulta.
tb4.Open [Ô]select TOP 6 * From Lotofacil Where n1=[Ô] & Text5 & [Ô] Or n2=[Ô] & Text5 & [Ô] Or n3=[Ô] & Text5 & [Ô] Or n4=[Ô] & Text5 & [Ô] Or n5=[Ô] & Text5 & [Ô] Or n6=[Ô] & Text5 & [Ô] Or n7=[Ô] & Text5 & [Ô] Or n8=[Ô] & Text5 & [Ô] Or n9=[Ô] & Text5 & [Ô] Or n10=[Ô] & Text5 & [Ô] Or n11=[Ô] & Text5 & [Ô] Or n12=[Ô] & Text5 & [Ô] Or n13=[Ô] & Text5 & [Ô] Or n14=[Ô] & Text5 & [Ô] Or n15=[Ô] & Text5 & [Ô] [Ô]
Com caixa de texto o consulta dinâmoca e a mesma coisa e pode digitar
qualquer número.
Muito mais eficiente.
Valeu.
Não pretendo fazer uma busca automática localizando diretamente do banco ao carregar o formulário.
Exemplo.
ao carregar o formulário vai localizar quantos 1 tem no banco e colocar no txt1 quantos 2 e colocar no txt2 e assim Sucessivamente.
Exemplo.
ao carregar o formulário vai localizar quantos 1 tem no banco e colocar no txt1 quantos 2 e colocar no txt2 e assim Sucessivamente.
Tópico encerrado , respostas não são mais permitidas