MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Pesquisa na Tabela

    Compartilhe

    jgga
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 16/05/2014

    [Resolvido]Pesquisa na Tabela

    Mensagem  jgga em Qui 22 Maio 2014, 13:14

    Estou com um problema de código, tenho uma caixa de listagem (lstFuncionario) e um campo para digitar a pesquisa (txtPesquisa).

    Quando eu altero o campo txtPesquisa (Evento Ao alterar), eu gostaria que ele preencha a caixa de listagem com os dados encontrados na tabela.

    O código que estou usando é esse:

    Código:
    Private Sub txtPesquisa_Change()
        
        lstFuncionario.RowSource = "SELECT cod_Funcionario,Nome,Cargo,Ramal,Usuario,E-mail,Turno FROM Tabela Funcionarios WHERE ((Nome) Like '*" & [txtPesquisa].[Text] & "*')"
        lstFuncionario.Requery
        
        If Len([txtPesquisa].Text) > 0 Then
            Me.lblPesquisa.Caption = "Filtrado"
        Else
            Me.lblPesquisa.Caption = "Pesquisa"
            lstFuncionario.RowSource = ""
        End If
    End Sub

    Porém quando digito algo no campo txtPesquisa ele faz com que apareça o código na caixa de listagem (conforme imagem), acho que estou errando a sintaxe.

    Alguém poderia me ajudar?
    avatar
    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1578
    Registrado : 12/11/2009

    Re: [Resolvido]Pesquisa na Tabela

    Mensagem  Leandro em Qui 22 Maio 2014, 14:20

    Bom dia,

    Insira o código no evento "Após Atualizar"


    .................................................................................




    Algumas soluções em access



    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]



    jgga
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 16/05/2014

    Re: [Resolvido]Pesquisa na Tabela

    Mensagem  jgga em Qui 22 Maio 2014, 17:47

    Ele ainda não está executando o comando sql ao invés disso ele escreve o comando na caixa de listagem.

    Acredito que tenha algum erro de sintaxe.
    avatar
    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1578
    Registrado : 12/11/2009

    Re: [Resolvido]Pesquisa na Tabela

    Mensagem  Leandro em Qui 22 Maio 2014, 20:18

    Poste o banco por favor, em versão 2000.


    .................................................................................




    Algumas soluções em access



    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]



    jgga
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 16/05/2014

    Re: [Resolvido]Pesquisa na Tabela

    Mensagem  jgga em Sex 06 Jun 2014, 17:43

    Estou sem a permissão para postar o BD por políticas internas.

    O erro acredito ainda que esteja na linha que digito o código SQL, ele está reconhecendo como um texto e ñão um comando.

    Sei que não é muito, mas se conseguir me ajudar com essas informações seria grato.

    jgga
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 16/05/2014

    Re: [Resolvido]Pesquisa na Tabela

    Mensagem  jgga em Qui 19 Fev 2015, 10:10

    Problema resolvido através de um módulo de conexão, se alguém precisar do código pode me mandar PM que indicarei como resolvi. Obrigado.

      Data/hora atual: Ter 21 Nov 2017, 12:11