MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Erro na consulta

    avatar
    ___Ricco___
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 01/10/2019

    [Resolvido]Erro na consulta Empty [Resolvido]Erro na consulta

    Mensagem  ___Ricco___ em 21/4/2020, 13:53

    Bom dia caros colegas de fórum,

    Peguei aqui no fórum um exemplo de pesquisa porem quando fui adaptar ao meu projeto,
    a mesma não funciona a pesquisa filtra qualquer campo ao digitar, não sei o que fiz de errado que a
    que não funciona.
    Espero contar com a ajuda dos colegas, e desde já já agradeço pela atenção dispensada

    Link do projeto - https://www.dropbox.com/s/mm35n94xpm887qz/ABR.accdb?dl=0
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2306
    Registrado : 22/11/2016

    [Resolvido]Erro na consulta Empty Re: [Resolvido]Erro na consulta

    Mensagem  DamascenoJr. em 21/4/2020, 14:51

    Veja o fez de errado.
    strSql = "SELECT ... FROM ... ORDER BY tbl_aluno.id_aluno;  WHERE " & _
    ...
    "ORDER BY id_aluno;"


    A cláusula Order By duas vezes.
    Ponto e vírgula significa fim da instrução. Então ele deve existir apenas uma vez e no fim.

    O correto
    Código:
    strSql = "SELECT tbl_aluno.id_aluno, tbl_aluno.aluno_nome, tbl_empresa.empresa_nome, tbl_curso.aluno_curso FROM tbl_empresa INNER JOIN (tbl_aluno INNER JOIN tbl_curso ON tbl_aluno.id_aluno = tbl_curso.aluno_id) ON tbl_empresa.id_empresa = tbl_curso.empresa_id WHERE " & _
    "strConv(id_aluno, 2, 1042) like '*" & StrConv(Nz(Me!txtFunc.Text), 2, 1042) & "*' " & _
    "OR strConv(aluno_nome, 2, 1042) like '*" & StrConv(Nz(Me!txtFunc.Text), 2, 1042) & "*' " & _
    "OR strConv(empresa_nome, 2, 1042) like '*" & StrConv(Nz(Me!txtFunc.Text), 2, 1042) & "*' " & _
    "OR strConv(aluno_curso, 2, 1042) like '*" & StrConv(Nz(Me!txtFunc.Text), 2, 1042) & "*' " & _
    "ORDER BY id_aluno;"

    Sugiro o estudo de instruções SQL. São muito importantes.

    Veja também que fiz uso da função Nz para prevenir valores nulos. Também sugiro o estudo desta função.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    ___Ricco___
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 01/10/2019

    [Resolvido]Erro na consulta Empty Re: [Resolvido]Erro na consulta

    Mensagem  ___Ricco___ em 21/4/2020, 15:08

    Amigo quase deu certo , quando uso a pesquisa os dados se invertem
    tente usa-la com o código que me passou por gentileza
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2306
    Registrado : 22/11/2016

    [Resolvido]Erro na consulta Empty Re: [Resolvido]Erro na consulta

    Mensagem  DamascenoJr. em 21/4/2020, 15:12

    A filtragem acontece normalmente
    Anexos
    [Resolvido]Erro na consulta AttachmentABR.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.2 Mb) Baixado 8 vez(es)


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    ___Ricco___
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 01/10/2019

    [Resolvido]Erro na consulta Empty Re: [Resolvido]Erro na consulta

    Mensagem  ___Ricco___ em 21/4/2020, 15:21

    Perfeito Mestre, mais uma vez agradeço pela atenção dispensada

      Data/hora atual: 24/10/2020, 00:43