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

    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado

    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado Empty [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado

    Mensagem  Nogaro513 Sáb 30 Nov 2013, 22:09

    Boa Noite !Função DLookup Para Retornar se Produto já esta Cadastrado Não estou conseguindo com o Campo da Chave Primaria
    com outros campos funciona perfeitamente se Alguem pudee ajudar agradeço eu já tentei de tudo ! éste é o Código meu Campo é   Ref Chave Primaria

    Private Sub NomeDoProduto_BeforeUpdate(Cancel As Integer)
     
    If (Not IsNull(DLookup("[Ref]", "Produtos Inserir", _
    "[Ref] ='" & Me!Ref& "'"))) Then
    MsgBox "O produto já está cadastrado no sistema..." & Ref.Text, _
    vbInformation, "Atenção"
    Me.Undo 'desfaz a digitação.
    Cancel = True 'cancela o evento.
    End If
    End Sub


    Última edição por Nogaro513 em Seg 02 Dez 2013, 00:19, editado 1 vez(es)
    avatar
    Convidado
    Convidado


    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado Empty Re: [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado

    Mensagem  Convidado Dom 01 Dez 2013, 01:02

    O evento está ocorrendo antes de atualizar o campo NomeDoProduto, não seria do campo Ref ou vice versa, ao invés do campo Ref seria NomeDoProduto? já que o código faz referencia a esse campo
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado Empty Funcionou mudei DLookup de Ref para o Campo Descrição

    Mensagem  Nogaro513 Dom 01 Dez 2013, 12:55

    If (Not IsNull(DLookup("[Descrição]", "Produtos Inserir", _
    "[Descrição] ='" & Me!Descrição & "'"))) Then
    MsgBox "O Produto já está cadastrado no sistema..." & Descrição.Text, _
    vbInformation, "Atenção"
    Me.Undo 'desfaz a digitação.
    Cancel = True 'cancela o evento.
    End If


    betogivoni + uma vez Obrigado caso resolvido
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8496
    Registrado : 05/11/2009

    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado Empty Re: [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado

    Mensagem  Alexandre Neves Dom 01 Dez 2013, 14:55

    Boa tarde, Nogaro
    Se está Resolvido, marque devidamente no botão apropriado, muitas vezes lembrado, na zona inferior direita do formulário do fórum
    Vá às suas dúvidas anteriores e mantenha o título conforme necessário, para que quem procure melhor encontre, e coloque o Resolvido correctamente


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado Empty Boa Tarde Alexandre

    Mensagem  Nogaro513 Dom 01 Dez 2013, 21:50

    Pensei que tivesse marcado como resolvido me desculpe.

    Conteúdo patrocinado


    [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado Empty Re: [Resolvido]Função DLookup Para Retornar se Produto já esta Cadastrado

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui 07 Nov 2024, 18:38