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]PERSONALIZAR FRASE NO ACCESS

    avatar
    guilherme_137
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 137
    Registrado : 01/07/2011

    [Resolvido]PERSONALIZAR FRASE NO ACCESS Empty PERSONALIZAR FRASE NO ACCESS

    Mensagem  guilherme_137 26/11/2012, 21:54

    Pessoal, eu estou pesquisando na internet e aqui no fórum, mas não encontrei tópico semelhante ao que eu estou tentando fazer. Há alguma possibilidade de personalizar a frase de registros duplicados? O Access exibe a seguinte mensagem:


    As alterações solicitadas para a tabela não foram satisfatórias já que criariam valores duplicados no índice, chave primária ou relação. Altere os dados no campo ou campos que contêm os dados duplicados, remova o índice ou redefina o índice para possibilitar entradas duplicadas e tente novamente.


    Possuo um campo definido como minha chave primária: SIPRO em vez de exibir esta frase quero exibir: Erro! Processo inexistente.
    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]PERSONALIZAR FRASE NO ACCESS Empty Re: [Resolvido]PERSONALIZAR FRASE NO ACCESS

    Mensagem  criquio 26/11/2012, 22:22

    Tente ir nas propriedades do campo, aba "Dados", linha "Texto de validação" e colocar ali o texto pretendido. Na tabela tambem tem essa propriedade para os campos.


    .................................................................................
    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.

    avatar
    guilherme_137
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 137
    Registrado : 01/07/2011

    [Resolvido]PERSONALIZAR FRASE NO ACCESS Empty Re: [Resolvido]PERSONALIZAR FRASE NO ACCESS

    Mensagem  guilherme_137 26/11/2012, 22:43

    Eu acessei, porém como construir uma expressão para verificar se um campo já foi digitado? Tipo eu digitei o código manualmente, mas preciso personalizar a frase para: Erro! Processo inexistente!
    avatar
    guilherme_137
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 137
    Registrado : 01/07/2011

    [Resolvido]PERSONALIZAR FRASE NO ACCESS Empty PERSONALIZAR FRASE NO ACCESS

    Mensagem  guilherme_137 27/11/2012, 00:39

    Pesquisei no site do Avelino e adaptei o código dele e resolveu o meu problema:

    Private Sub SIPRO_BeforeUpdate(Cancel As Integer)
    If DCount("SIPRO", "tbl_processo_rex", "SIPRO =""" & Me!SIPRO & """") = 0 Then
    'A função DCount() contou um ou mais registros existentes
    MsgBox "Processo" & Me!SIPRO & "inexistente..."
    Me.Undo 'Limpa o campo
    Cancel = True 'mantém o foco no campo.
    End If
    End Sub

    Mesmo assim, obrigado pela ajuda.

    Conteúdo patrocinado


    [Resolvido]PERSONALIZAR FRASE NO ACCESS Empty Re: [Resolvido]PERSONALIZAR FRASE NO ACCESS

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 20:28