Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

EdiSimoes

Select count.

Mensagens Recomendadas

EdiSimoes

Ola a todos do forum,

preciso de ajuda nessa query,

preciso contar itens de uma TB buscando uma condição que esta em outra TB, o código esta ai:

 Dim Con As New OleDbConnection
        Con.ConnectionString = My.Settings.CNS1
        Con.Open()
        Dim Comando As New OleDbCommand
        Comando.CommandText = "Select * (Select Count(*) FROM rodando as RO where A.NumeroFrota = RO.caminhao_rodando FROM Cad_Caminhao as A)"
        Comando.CommandType = CommandType.Text
        Comando.Connection = Con
        lblIntRod.Text = IIf(IsDBNull(Comando.ExecuteScalar), "", (Comando.ExecuteScalar))
        Con.Close()

EDIT: GeSHi adicionado


Edi Carlos Simões

Estudante de Análise e Desenvolvimento de Sistemas

edisimoes@bol.com.br

http://www.desenvolvenetma.com.br

http://analisedesistemas.bl.ee

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Andrepereira9

Boas

Explica-te melhor


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
HIT_Braga

Boas,

Porque não fazes primeiro a busca pelos parâmetros e depois contas o resultado. Acho bem mais fácil e apenas mais uma linha de código.

Sds,


" Elogios não me elevam, ofensas não me rebaixam, sou o que sou e não o que acham! "

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
EdiSimoes

Fiz assim mais ta dando esse erro, "Tipo de dados imcompatível na expressão de critério." se puderem me ajudar.

  Private Sub calculaCaminhao()
        Dim Con As New OleDbConnection
        Con.ConnectionString = My.Settings.CNS1
        Con.Open()
        Dim Comando As New OleDbCommand
        Comando.CommandText = "SELECT COUNT(rodando.caminhao_rodando) FROM rodando INNER JOIN Cad_Caminhao ON rodando.caminhao_rodando = Cad_Caminhao.NumeroFrota WHERE NumeroFrota = 'Cana Inteira'"
        Comando.CommandType = CommandType.Text
        Comando.Connection = Con
        lblIntRod.Text = IIf(IsDBNull(Comando.ExecuteScalar), "", (Comando.ExecuteScalar))
        Con.Close()

    End Sub


Edi Carlos Simões

Estudante de Análise e Desenvolvimento de Sistemas

edisimoes@bol.com.br

http://www.desenvolvenetma.com.br

http://analisedesistemas.bl.ee

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
EdiSimoes

Ola Caça,

veja bem,

tenho uma tabela TB_rodando, onde preciso contar os caminhões  que  estão rodado, só que tem um porém, eu tenho caminhão de cana inteira e cana picada, e esses dados estão em outra TB, e preciso separar essas duas categorias.


Edi Carlos Simões

Estudante de Análise e Desenvolvimento de Sistemas

edisimoes@bol.com.br

http://www.desenvolvenetma.com.br

http://analisedesistemas.bl.ee

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Caça

Substitui a tua query por esta

SELECT COUNT([rodando].[caminhao_rodando]) AS Total
FROM [rodando]
INNER JOIN [Cad_Caminhao] 
ON [rodando].[caminhao_rodando] = [Cad_Caminhao].[NumeroFrota]
WHERE [Cad_Caminhao].[NumeroFrota] = 'Cana Inteira'


Pedro Martins

Não respondo a duvidas por PM

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Caça

O tipo de dados de

[rodando].[caminhao_rodando]

é igual ao de

[Cad_Caminhao].[NumeroFrota]

?


Pedro Martins

Não respondo a duvidas por PM

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Caça

E então, o que é que eu te estava a dizer?

"Cana Inteira" é um numero?

[Cad_Caminhao].[NumeroFrota] = 'Cana Inteira'


Pedro Martins

Não respondo a duvidas por PM

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
EdiSimoes

Eu até te entendo Caça, mais veja bem,

tb_Cad_Caminhao

campo.NUmeroFrota                    campo.Tipo

631                                              Cana Inteira

632                                                Cana Picada


Edi Carlos Simões

Estudante de Análise e Desenvolvimento de Sistemas

edisimoes@bol.com.br

http://www.desenvolvenetma.com.br

http://analisedesistemas.bl.ee

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
EdiSimoes

Achei o grilo aqui Caça,

vc tinha razão,

mais tinha que ser invertido, sem precisar mudar o tipo de campo, fiz assim deu certo, muito obrigado, e desculpe a falta de atenção minha.

[Cad_Caminhao].[Tipo] = 'Cana Inteira'


Edi Carlos Simões

Estudante de Análise e Desenvolvimento de Sistemas

edisimoes@bol.com.br

http://www.desenvolvenetma.com.br

http://analisedesistemas.bl.ee

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.