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


4 participantes

    [Resolvido]Evitar registro duplicado no cadastro de cliente

    avatar
    Miguel Lopes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 06/03/2014

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Miguel Lopes 10/8/2014, 11:19

    Olá pessoal, mais uma vez sou grato pela ajuda que sempre tenho recebido de vocês.
    gostaria de ter o seguinte código:
    Uso access 2010.

    Ao cadastrar um cliente no campo CPF, avise que esse cliente já está cadastrado, pede para sair ou cadastrar um novo.

    obrigado,
    Miguel

    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  formiga10x 10/8/2014, 11:49

    Bom dia.

    If DCount("nomeCliente", "Cliente", "nomeCliente =" & "txtNome") Then

    MsgBox("Já Existe um Cliente com Este Nome!", vbYesNo + vbDefaultButton1 + vbInformation, "Aviso!")

    exit sub
    end if


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Fernando Bueno 10/8/2014, 12:01

    Bom dia senhores, Formiga desculpa ja estava fazendo o exemplo então pra não perder

    deixo em anexo para estudo do colega.


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Evitar registro duplicado no cadastro de cliente 16rzeq
    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  formiga10x 10/8/2014, 12:34

    Tranquilidade Fernando.
    Forte abraço e um Feliz dia dos Pais.


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Fernando Bueno 10/8/2014, 12:55

    Obrigado, te desejo também um feliz dia dos pais com muita paz e alegrias!  Smile 


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Evitar registro duplicado no cadastro de cliente 16rzeq
    avatar
    Miguel Lopes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 06/03/2014

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Miguel Lopes 10/8/2014, 15:49

    Olá pessoal, obrigado ,
    Um Feliz dia do papai para todos vocês,
    vou incrementar o código agora mesmo,
    Miguel
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Fernando Bueno 10/8/2014, 16:31

    Obrigado!!! Bons estudos..


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Evitar registro duplicado no cadastro de cliente 16rzeq
    avatar
    Miguel Lopes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 06/03/2014

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Miguel Lopes 10/8/2014, 20:58

    para evitar cadastro duplicado de empresa

    Olá pessoal estou de volta estou tentando fazer o código funcionar desde ás 10 hs da manha, tô para ficar louco,
    ainda não conseguir fazer a ação funcionar quando for cadastrar uma nova empresa detectar pelo  CNPJ, que a empresa já está cadastrada.
    Estou enviando em anexo a tabela e o formulário ---  o código está no  evento: antes de atualizar
    Anexos
    [Resolvido]Evitar registro duplicado no cadastro de cliente AttachmentMig.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (26 Kb) Baixado 36 vez(es)
    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  formiga10x 10/8/2014, 21:55

    Boa tarde.
    Substitui o código do campo CNPJ por este.

    Código:
    If DCount("CNPJ", "tblCliente", "CNPJ ='" & Me.CNPJ & "'") Then

    MsgBox ("CNPJ Já Cadastrado"), vbExclamation, "Aviso"

    Cancel = True
    Me!CNPJ.Undo
    End If
    Anexos
    [Resolvido]Evitar registro duplicado no cadastro de cliente AttachmentMig.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (31 Kb) Baixado 127 vez(es)


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    avatar
    Miguel Lopes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 06/03/2014

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Miguel Lopes 11/8/2014, 01:14

    Valeu formiga,
    pela sua dica maravilhosa,
    é por isso que adoro esse fórum,
    mais uma vez valeu,
    o código é exatamente o que desejava,

    Um grande abraço,

    Miguel
    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  formiga10x 11/8/2014, 03:05

    O Fórum agradece o retorno.

    Forte abraço


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    avatar
    CLEBS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 15/02/2016

    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Esses códigos nao funciona comigo de jeito nenhum

    Mensagem  CLEBS 16/11/2019, 20:01

    Ja testei e não funciona de jeito nenhum

    Conteúdo patrocinado


    [Resolvido]Evitar registro duplicado no cadastro de cliente Empty Re: [Resolvido]Evitar registro duplicado no cadastro de cliente

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 13:46