MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

2 participantes

    Consulta SQL - Comando RowSource

    avatar
    gildosantoss
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 6
    Registrado : 17/10/2019

    Consulta SQL - Comando RowSource Empty Consulta SQL - Comando RowSource

    Mensagem  gildosantoss 17/1/2022, 19:17

    Bom dia




    Preciso transcrever essa instrução SQL para um botão de pesquisa, mais quando uso o RowSourse . no formulario não exibe nada

    SELECT Entrada_Pessoas.Id_Entrada, Pessoa.Nome_Pessoa, Empresa.Nome_Empresa, Entrada_Pessoas.Tipo_Acesso, Veiculo.Veiculo, Veiculo.Placa, Veiculo.Placa2, Entrada_Pessoas.Setor, Entrada_Pessoas.Data_Entrada, Entrada_Pessoas.[Hora Chegada], Entrada_Pessoas.Hora_Entrada, Entrada_Pessoas.Data_Saida, Entrada_Pessoas.Hora_Saida, Entrada_Pessoas.NumeroNota, Entrada_Pessoas.PesoNota, Entrada_Pessoas.PesoBalanca, Entrada_Pessoas.PesoSaida, Entrada_Pessoas.Vigilante, Entrada_Pessoas.Obs
    FROM Tipo_Veiculo INNER JOIN ((Empresa INNER JOIN (Veiculo INNER JOIN Entrada_Pessoas ON Veiculo.Id_Veiculo = Entrada_Pessoas.Id_Veiculo) ON Empresa.Id_Empresa = Entrada_Pessoas.Id_Empresa) INNER JOIN Pessoa ON (Pessoa.Id_Pessoa = Entrada_Pessoas.Id_Pessoa) AND (Empresa.Id_Empresa = Pessoa.ID_Empresa)) ON Tipo_Veiculo.Id_Tipo_Veiculo = Veiculo.Id_Tipo_Veiculo;


    Private Sub Comando117_Click()



    Me.Lista43.RowSource = "SELECT Entrada_Pessoas.Id_Entrada, Pessoa.Nome_Pessoa, Empresa.Nome_Empresa, Entrada_Pessoas.Tipo_Acesso, Veiculo.Veiculo, Veiculo.Placa, Veiculo.Placa2, Entrada_Pessoas.Setor, Entrada_Pessoas.Data_Entrada, Entrada_Pessoas.[Hora Chegada], Entrada_Pessoas.Hora_Entrada, Entrada_Pessoas.Data_Saida, Entrada_Pessoas.Hora_Saida, Entrada_Pessoas.NumeroNota, Entrada_Pessoas.PesoNota, Entrada_Pessoas.PesoBalanca, Entrada_Pessoas.PesoSaida, Entrada_Pessoas.Vigilante, Entrada_Pessoas.Obs" & _
    "FROM Tipo_Veiculo INNER JOIN ((Empresa INNER JOIN (Veiculo INNER JOIN Entrada_Pessoas ON Veiculo.Id_Veiculo = Entrada_Pessoas.Id_Veiculo) ON Empresa.Id_Empresa = Entrada_Pessoas.Id_Empresa) INNER JOIN Pessoa ON (Pessoa.Id_Pessoa = Entrada_Pessoas.Id_Pessoa) AND (Empresa.Id_Empresa = Pessoa.ID_Empresa)) ON Tipo_Veiculo.Id_Tipo_Veiculo = Veiculo.Id_Tipo_Veiculo;"
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3533
    Registrado : 21/04/2011

    Consulta SQL - Comando RowSource Empty Re: Consulta SQL - Comando RowSource

    Mensagem  Marcelo David 20/1/2022, 18:58

    Boa tarde,
    se no construtor (QBE) de consultas do Access essa SQL retorna resultados passando ela para RowSource da Caixa de listagem também deveria retornar.

    Se não testou na QBE, teste por favor e caso não resulte, posta aqui para vermos o que se passa.


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Clique aqui e conheça o treinamento.
    Consulta SQL - Comando RowSource Marcel11

      Data/hora atual: 18/5/2022, 23:41