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]Gravar máscara de entrada dinâmica na tabela

    avatar
    mparnaldo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 04/08/2022

    [Resolvido]Gravar máscara de entrada dinâmica na tabela Empty [Resolvido]Gravar máscara de entrada dinâmica na tabela

    Mensagem  mparnaldo 27/3/2024, 16:06

    Boa tarde a todos...

    Pessoal, tenho uma combo box chamada cb_TIPO_CERTIFICADO, no evento Após Atualizar dessa combo box tem o seguinte código:

    Private Sub cb_TIPO_CERTIFICADO_AfterUpdate()
    If Me.cb_TIPO_CERTIFICADO = "INTERNACIONAL" Then
    ' Máscara de entrada para tipo de certificado INTERNACIONAL
    Me.CERTIFICADO.InputMask = """I0-""00000000/385/00"
    Me.SUBSTITUIDO_POR.InputMask = """I0-""00000000/385/00"
    ElseIf Me.cb_TIPO_CERTIFICADO = "NACIONAL" Then
    ' Máscara de entrada para tipo de certificado NACIONAL
    Me.CERTIFICADO.InputMask = """N0-""00000000/385/00"
    Me.SUBSTITUIDO_POR.InputMask = """N0-""00000000/385/00"
    End If
    End Sub

    Esse código altera a máscara de entrada do campo CERTIFICADO de acordo com o que foi selecionado na combo box, até ai tudo bem, o problema é que preciso que seja salvo na tabela da mesma forma que está no campo, ou seja, com a máscara de entrada que foi definida pela escolha do usuário. O formulário principal se chama frmES_PROCESSOS e a tabela se chama tbl_ES_PROCESSOS onde tem diversos campos inclusive o campo CERTIFICADO no qual deveria receber o registro junto com a máscara, porem é armazenado apenas o que foi digitado....

    O mesmo acontece com a combo box cb_TIPOTRANSPORTE que altera a máscara de entrada do campo CONTAINER_PLACA, porem não armazena o registro com a máscara...
    Código da combo box cb_TIPOTRANSPORTE:

    Private Sub cb_TIPOTRANSPORTE_AfterUpdate()
    ' Verifica se o campo CONTAINER_PLACA já está preenchido
    If Not IsNull(Me.CONTAINER_PLACA) Then
    ' Exibe uma mensagem de confirmação
    If MsgBox("Você está alterando o tipo de transporte. Isso irá EXCLUIR O VALOR DO CAMPO CONTAINER_PLACA. Deseja prosseguir?", vbQuestion + vbYesNo, "Confirmação de Exclusão") = vbYes Then
    ' Se o usuário confirmar, limpa o valor do campo CONTAINER_PLACA
    Me.CONTAINER_PLACA = Null
    Else
    ' Se o usuário cancelar, reverte a seleção na caixa de combinação
    Me.cb_TIPOTRANSPORTE.Undo
    Exit Sub ' Sai do evento para evitar alterar a máscara de entrada
    End If
    End If

    ' Define a máscara de entrada de acordo com o tipo de transporte selecionado
    If Me.cb_TIPOTRANSPORTE = "CONTAINER" Then
    ' Definir a máscara de entrada para o tipo CONTAINER
    Me.CONTAINER_PLACA.InputMask = ">???? 000000-0"
    ElseIf Me.cb_TIPOTRANSPORTE = "RODOVIARIO" Then
    ' Definir a máscara de entrada para o tipo RODOVIÁRIO
    Me.CONTAINER_PLACA.InputMask = ">???-0000"
    End If
    End Sub

    Anexei o banco de dados no post, see alguma alma bondosa puder me ajudar ficaria extremamente grato...

    Desde já meu muito obrigado!
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Gravar máscara de entrada dinâmica na tabela Empty Re: [Resolvido]Gravar máscara de entrada dinâmica na tabela

    Mensagem  Alexandre Fim 27/3/2024, 18:06

    Olá Marcos,

    Não veio o anexo.
    Verifique.

    Att,

    Alexandre Fim




    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Gravar máscara de entrada dinâmica na tabela Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    mparnaldo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 04/08/2022

    [Resolvido]Gravar máscara de entrada dinâmica na tabela Empty Re: [Resolvido]Gravar máscara de entrada dinâmica na tabela

    Mensagem  mparnaldo 28/3/2024, 07:20

    Bom dia, arquivo adicionado, se puder dar uma analisada ficarei grato!

    Obrigado...
    Anexos
    [Resolvido]Gravar máscara de entrada dinâmica na tabela Attachmentprocessos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (239 Kb) Baixado 5 vez(es)
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010

    [Resolvido]Gravar máscara de entrada dinâmica na tabela Empty Re: [Resolvido]Gravar máscara de entrada dinâmica na tabela

    Mensagem  Avelino Sampaio 28/3/2024, 08:33

    Olá!

    Não abri seu projeto mas para gravar a máscara no campo, basta acrescentar no final da máscara ;0.

    Sucesso!


    Última edição por Avelino Sampaio em 28/3/2024, 12:31, editado 1 vez(es)


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    mparnaldo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 04/08/2022

    [Resolvido]Gravar máscara de entrada dinâmica na tabela Empty Re: [Resolvido]Gravar máscara de entrada dinâmica na tabela

    Mensagem  mparnaldo 28/3/2024, 10:14

    Bom dia Avelino, eu não estou acreditando que apenas inserir ;0 resolveu o problema [Resolvido]Gravar máscara de entrada dinâmica na tabela 1f604

    Solução extremamente simples [Resolvido]Gravar máscara de entrada dinâmica na tabela 1f600

    Muitíssimo obrigado!

    Conteúdo patrocinado


    [Resolvido]Gravar máscara de entrada dinâmica na tabela Empty Re: [Resolvido]Gravar máscara de entrada dinâmica na tabela

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 25/4/2024, 02:27