none
Select Count RRS feed

  • Pergunta

  • Quero uma consulta que me retorne 3 COUNT da mesma coluna

    Como faço a consulta:

    SELECT        COUNT(numeroDeAcertos) AS Quatro, COUNT(numeroDeAcertos) AS Cinco, COUNT(numeroDeAcertos) AS Seis
    FROM            dbo.Concursos_Apostas
    HAVING        (COUNT(numeroDeAcertos) = 6) AND (COUNT(numeroDeAcertos) = 4) AND (COUNT(numeroDeAcertos) = 5)


    Sergio Ivanenko

    segunda-feira, 3 de setembro de 2018 18:39

Respostas

  • Deleted
    terça-feira, 4 de setembro de 2018 10:06
  • Nenhuma forma funcionou, apresentaram o mesmo erro.

    Resolvi assim:

        Private Sub apurarAcerto()
            Dim csA As New cs_Apostas
            Dim dt As New DataTable
    
            dt = csA.listaAcertos(My.Settings.conecaoBD)
    
            Dim filtro As String
    
            'Apura numero de acertos = 4 ----------------------------------------------------------------------------------
            filtro = "numeroDeAcertos" & "= 4"
            Dim drc As DataRow() = dt.Select(filtro)
            lbl_4Acertos.Text = drc.Length
    
            'Apura numero de acertos = 5 ----------------------------------------------------------------------------------
            filtro = "numeroDeAcertos" & "= 5"
            drc = dt.Select(filtro)
            lbl_5Acertos.Text = drc.Length
    
            'Apura numero de acertos = 6 ----------------------------------------------------------------------------------
            filtro = "numeroDeAcertos" & "= 6"
            drc = dt.Select(filtro)
            lbl_6Acertos.Text = drc.Length
    
        End Sub
    


    Sergio Ivanenko


    • Marcado como Resposta Ivanenko sexta-feira, 7 de setembro de 2018 14:45
    • Editado Ivanenko sexta-feira, 7 de setembro de 2018 14:45
    sexta-feira, 7 de setembro de 2018 14:44

Todas as Respostas

  • Deleted
    segunda-feira, 3 de setembro de 2018 19:16
  • Não deu certo.


    Sergio Ivanenko

    terça-feira, 4 de setembro de 2018 02:49
  • Deleted
    terça-feira, 4 de setembro de 2018 10:06
  • Nenhuma forma funcionou, apresentaram o mesmo erro.

    Resolvi assim:

        Private Sub apurarAcerto()
            Dim csA As New cs_Apostas
            Dim dt As New DataTable
    
            dt = csA.listaAcertos(My.Settings.conecaoBD)
    
            Dim filtro As String
    
            'Apura numero de acertos = 4 ----------------------------------------------------------------------------------
            filtro = "numeroDeAcertos" & "= 4"
            Dim drc As DataRow() = dt.Select(filtro)
            lbl_4Acertos.Text = drc.Length
    
            'Apura numero de acertos = 5 ----------------------------------------------------------------------------------
            filtro = "numeroDeAcertos" & "= 5"
            drc = dt.Select(filtro)
            lbl_5Acertos.Text = drc.Length
    
            'Apura numero de acertos = 6 ----------------------------------------------------------------------------------
            filtro = "numeroDeAcertos" & "= 6"
            drc = dt.Select(filtro)
            lbl_6Acertos.Text = drc.Length
    
        End Sub
    


    Sergio Ivanenko


    • Marcado como Resposta Ivanenko sexta-feira, 7 de setembro de 2018 14:45
    • Editado Ivanenko sexta-feira, 7 de setembro de 2018 14:45
    sexta-feira, 7 de setembro de 2018 14:44
  • Deleted
    sexta-feira, 7 de setembro de 2018 18:18
  • Jose Diz.

    Me desculpe, testei novamente, ambas funcionaram. De qualquer forma, foi bom, porque mostra outras maneiras de obter o resultado esperado.

    Obrigado


    Sergio Ivanenko


    • Editado Ivanenko domingo, 9 de setembro de 2018 00:36
    domingo, 9 de setembro de 2018 00:35