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]Pesquisar por nome+datanasc

    avatar
    Vanderlei
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 150
    Registrado : 20/01/2011

    [Resolvido]Pesquisar por nome+datanasc Empty [Resolvido]Pesquisar por nome+datanasc

    Mensagem  Vanderlei em 24/6/2020, 22:30

    Ola
    Eu tenho esta linha de código que ao dar duplo clique na linha no listbox Lista43, carrega o form frmcadastrocliente
    O problema é que existem nomes iguais, ele mostra o primeiro nome.
    Gostaria de inserir neste codigo a datanascimento de maneira que procure pelos dois, nomecliente+datanasc


    Private Sub Lista43 DblClick(Cancel As Integer)
    DoCmd.OpenForm "frmCadastroCliente", , , "NomeCliente='" & Me.Lista43 & "'"
    End Sub

    grato
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 13/12/2016

    [Resolvido]Pesquisar por nome+datanasc Empty Re: [Resolvido]Pesquisar por nome+datanasc

    Mensagem  Alexandre Fim em 24/6/2020, 22:48

    Olá Vanderlei,

    A busca pelo Nome do cliente não é a forma mais correta, pois com o passar do tempo, seu cadastro irá possuir homônimos.

    O que seria mais viável é criar uma chave primária na tabela de clientes (CodCliente), do tipo "Numeração Automática", e vc utilizar este código na coluna 0 da sua Lista e toda vez que vc der duplo clique, sua instrução ficaria assim:

    Private Sub Lista43 DblClick(Cancel As Integer)
    DoCmd.OpenForm "frmCadastroCliente", , , "CodCliente=" & Me.Lista43.Column(0) & ""
    End Sub

    Desta forma, cada registro tem a sua chave primaria, ou seja, um identificador que não se repente, onde o mecanismo de banco de dados utiliza desta chave/indice para fazer busca de dados.

    Espero ter ajudado.

    Boa sorte


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    avatar
    Vanderlei
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 150
    Registrado : 20/01/2011

    [Resolvido]Pesquisar por nome+datanasc Empty Re: [Resolvido]Pesquisar por nome+datanasc

    Mensagem  Vanderlei em 25/6/2020, 12:28

    Olá, bom dia

    Obrigado pela dica, foi de grande valia. resolvido minha questão

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 13/12/2016

    [Resolvido]Pesquisar por nome+datanasc Empty Re: [Resolvido]Pesquisar por nome+datanasc

    Mensagem  Alexandre Fim em 25/6/2020, 21:53

    Valeu Vanderlei cheers cheers
    O fórum agradece.
    Boa sorte
    abraços


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.

      Data/hora atual: 22/10/2020, 14:08