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


3 participantes

    [Resolvido]avisar produto ja cadastrado

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty avisar produto ja cadastrado

    Mensagem  Agravina 21/5/2011, 20:51

    Qual o codigo que devo usar para avisar-me que o produto cadastrado ?
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  criquio 21/5/2011, 21:05

    Tente assim:

    If Not IsNull("Nome", "Tabela", "Nome='" & Me!Nome & "'") Then
    MsgBox "Ítem já cadastrado", vbOkOnly + vbCritical, "Atenção"
    Else
    Exit Sub
    End If


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 21/5/2011, 21:21

    Já o fiz no form produtos. Experimente, pois ainda não havia apagado a sua BD.

    http://dl.dropbox.com/u/8157744/Agravina2003.rar
    avatar
    Convidad
    Convidado


    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Convidad 21/5/2011, 21:40

    ou aproveitando os códigos já existentes no fórum


    Deteta e Mostra Registros Duplicados

    http://maximoaccess.forumeiros.com/t11-102-codigos-vba-para-access

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 21/5/2011, 21:46

    estou fazendo assim no evento após atualizar para achar enquanto digito,

    Private Sub descrição_AfterUpdate()
    Me.Descrição = AlternaCaps(Me.ActiveControl)

    If (Not IsNull(DLookup("[descrição]", "produtos", _
    "[descrição] ='" & Me!Descrição & "'"))) Then
    MsgBox " Produto já cadastrado..." & Descrição.Text, _
    vbInformation, "Aviso"
    Cancel = True 'cancela o evento.
    Me!Descrição.Undo 'desfaz a digitação.
    End If
    End Sub

    nome tabela é produtos ,nome do campo na tabela é descrição por não da certo?
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 21/5/2011, 21:59

    Pois e o resto? Código do artigo também lá existe, como campo obrigatório e indexado. Esse form está cheio de erros.
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 21/5/2011, 22:03

    Vieira estou trabalhando com outro form
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 21/5/2011, 22:04

    Então mande isso para eu ver
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 21/5/2011, 22:13

    Veja o campo descrição do form
    http://www.speedyshare.com/files/28576021/Banco_de_Dados1.mdb
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 21/5/2011, 22:35

    Mas este subform não é para cadastro.
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 22/5/2011, 00:20

    Desculpa vieira link errado,estou em casa agora ,vou ver se tenho o bd aqui.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 22/5/2011, 00:22

    Tudo bem, amigão
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 22/5/2011, 00:31

    Vieira fiz um exemplo aqui rapidinho,veja se pode me ajudar
    http://www.speedyshare.com/files/28577366/Bd2003.mdb
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 22/5/2011, 00:50

    Recebido, vou ver
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 22/5/2011, 00:54

    Simples

    O código está mal colocado, está no evento afterupdate() e tem que estar no evento beforeupdate(), ou seja no evento antes de actualizar. E tudo funciona às mil maravilhas.


    ___________________________________________________________________________________
    Se mandarem os Reis embora, hão-de tornar a chama-los (A. Herculano)
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 22/5/2011, 01:04

    Puxa eu ja tinha alterado ,mesmo assim não funcionava ,mas obrigado amanha vou no bd ,pois pode ter algo em conflito
    Valeu Vieira
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 22/5/2011, 01:06

    Espere que eu envio-lhe isto a funcionar. Eu experimentei antes.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 22/5/2011, 01:10

    Aí vai

    http://dl.dropbox.com/u/8157744/Agravina2003.rar
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Agravina 22/5/2011, 15:21

    Como ficaria neste codigo abaixo ,ao informa que o produto ja cadastrado tem com informar tambem o nome do fornecedor ?
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 22/5/2011, 16:13

    Agravina

    Você deve utilizar uma combo para seleccionar o Fornecedor primeiro (pois este já deve estar inserido na BD) e depois introduzir o produto. Assim não faz sentido complicar o que é simples.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  vieirasoft 23/5/2011, 01:14

    Agravina,continuação de bom trabalho

    Conteúdo patrocinado


    [Resolvido]avisar produto ja cadastrado Empty Re: [Resolvido]avisar produto ja cadastrado

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/5/2024, 07:03