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

    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    avatar
    evandrolima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 37
    Registrado : 18/11/2010

    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro Empty Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    Mensagem  evandrolima 2/1/2011, 04:55

    Referente ao tópico:
    Verificar informações na tabela em tempo real pelo formulário de cadastro

    Boa Noite, Dilson

    Fiz o seu exemplo ficou perfeito, mas precisava de uma dicas sua, como pode ser feito para abrir o formulário para Edição no lugar do relatório.

    Agradeço desde já, muito Obrigado

    Evandro Lima
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro Empty Re: Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    Mensagem  criquio 2/1/2011, 10:23

    Eu uso algo semelhante em uma aplicação minha, mas com msgbox, aonde informa em nome de quem está o documento, seja ele CPF ou Identidade. Para a questão do amigo acima, uso esse esquema para cadastro de CEP. Se o CEP não existir, uso o seguinte:

    If MsgBox("O CEP " & Me.txtCEP " não consta da base de dados. Gostaria de cadastrá-lo agora?", vbYesNo, "CEP inesistente") = vbYes Then
    DoCmd.OpenForm "frmEndereço"
    Forms!frmEndereço!txtCEP = Me.txtCEP
    Forms!frmEndereço!txtCEP.Enabled = False
    Else
    Exit Sub
    End If


    No evento "Ao clicar" do botão Cadastrar do form de cadastro de CEP eu coloco:

    Forms!frmClientes!txtCEP = Me.txtCEP
    Forms!frmClientes!txtEndereço = Me.txtEndereço
    Forms!frmClientes!txtBairro = Me.txtBairro
    Forms!frmClientes!txtCidade!txtCEP = Me.txtCidade
    Forms!frmClientes!txtUF = Me.txtUF

    DoCmd.Close acForm, Me.Nome

    Forms!frmClientes!txtNúmero.SetFocus


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

    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro Empty Re: Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    Mensagem  Dilson 2/1/2011, 18:38

    Evandro,

    Abaixo o mesmo exemplo, porém, adaptado conforme pretende, veja:

    No campo CPF no evento antes de atualizar agora chamará um formulário chamado ExtratoCPF, nele colei o mesmo conteúdo do relatório. Daí ficou fácil, pois poderá ir ao formulário de edição chamado Ficha_Cadastro_do_pacienteEditar que é uma cópia do primeiro. Poderá também visualizar o relatório ou mesmo mandar para a impressora.

    Faça as adaptações no seu projeto,aqui o download:

    http://dl.dropbox.com/u/8080696/FMA/Verificar%20informa%C3%A7%C3%B5es%20na%20tabela_evandrolima.rar

    Uma ressalva:
    Revendo e testanto este exemplo, percebi que no evento antes de atualizar dos dois campos CPF e CNS, existe um pedaço do código que não serve, não tem função alguma que marquei de vermelho, veja e corrija, apague:

    'Abre o relatório e mostrar o registro que o possui o número registrado
    DoCmd.OpenReport "rpt_ExtratoCNS", acViewPreview, , "[CPF]= CPF"


    avatar
    evandrolima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 37
    Registrado : 18/11/2010

    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro Empty Re: Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    Mensagem  evandrolima 2/1/2011, 19:58

    Valeu Dilson e Criquio, as duas dicas ficaram perfeitas. Graça a Deus que existem pessoas como vcs para orientar e ajudar os outros.

    Obrigado

    Evandro Lima
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro Empty Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    Mensagem  Dilson 2/1/2011, 20:46

    Ok Evandro,

    E as coisas são assim mesmo, como diria a frase do amigo Diego: "Sem esforço não há progresso"

    O fórum agradece seu retorno.



    Conteúdo patrocinado


    Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro Empty Re: Dúvida sobre Verificar informações na tabela em tempo real pelo formulário de cadastro

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 00:37