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]Verificar se o campo da cx de texto já está preenchido.

    ERS2011
    ERS2011
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 10/09/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Verificar se o campo da cx de texto já está preenchido.

    Mensagem  ERS2011 17/5/2012, 17:36

    Ola amigos estou precisando de uma ajuda com esta questão.

    Tenho um Form( FiltrosSequenciaisEletrica),no qual me listas todos os dados preenchidos no Form(FrmAnotarEletrica ) e no Form (FrmEncerrarEletrica) ,neste ultimo tenho uma caixa de texto chamada ( Carimbo Item fechado)que carrega o nome do usuário logado para ser preenchido com este nome .Só que tenho um problema? Quando eu clico no registro que quero no form ( FiltrosSequenciaisEletrica) e me abre Form (FrmEncerrarEletrica) e se o campo ( Carimbo Item fechado) já estiver preenchido ele muda o nome da pessoal que já havia preenchido anteriormente , teria como fazer um código para verificar 1° se o campo ( Carimbo Item fechado) esta preenchido , se estiver preenchido não ocorre alteração alguma neste campo e se não estiver preenchido carregar o nome do usuário logado.

    Alguem poderia me ajudar com esta questão?

    Agradeço desde já.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3871
    Registrado : 21/04/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  Marcelo David 17/5/2012, 17:44

    Está meio confuso, mas vamos lá!
    Me parece que esse campo não é salvo na tabela e sim carregado em tempo de execução. Se você quer manter quem fez a alteração,
    terá que salvar o nome do usuário logado no memento que os dados forem gravados.


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Marcel11
    ERS2011
    ERS2011
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 10/09/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  ERS2011 17/5/2012, 20:45

    Olá Marcelo

    Eu já fazia desta forma que você mencionou , so que o usuario selecionava o nome dele em uma combo box e depois grava salvando com o nome dele .So que tive que mudar pois o usuario poderia salvar com o nome de outra pessoal, por engano .Então já fiz este campo ser carregado com o nome do usuario logado usando este codigo.

    Me.TxtCarimbo2 = Forms![FPrincipalEletrica]![txtUsuarioAtual]

    Só que o problema começa ai , o usuario Abre o Form onde será inputado dados dando duplo click no campo do codigo que ele tem que responder dai tudo bem , mas se ele der duplo click em um codigo errado o campo do Form vai buscar o nome dele e não com o nome da pessoa que já tinha preenchido este campo anteriormente .Dai a questão de verificar antes de atualizar a Textbox.

    Obrigado.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3871
    Registrado : 21/04/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  Marcelo David 17/5/2012, 21:04

    Nesse caso, tente:

    If IsNull(Me.TxtCarimbo2) Then
    Me.TxtCarimbo2 = Forms![FPrincipalEletrica]![txtUsuarioAtual]
    End if


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Marcel11
    ERS2011
    ERS2011
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 10/09/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  ERS2011 17/5/2012, 23:14

    Valeu Marcelo
    O codigo funcionou , mas quando por exemplo o usuario desistiu de preencher os demais campos e ele quiser sair , para a tabela não ficar com o nome dele eu coloquei um codigo para limpar o campo que puxou o usuario atual

    If IsNull(Me.TxtItemFch) Then
    Me.TxtCarimbo2 = ""
    até ai tudo bem .Só que quando clico no mesmo campo do codigo que eu tinha clicado anteriormente e que o codigo limpou ele não carrega o usuario atual mesmo o campo estando vazio .É como se o campo tivesse algo escrito e o codigo que você fez não funciona neste caso.O campo fica em branco . Você tem alguma ideia do que esta acontecendo?

    Obrigado pela força.
    avatar
    Convidad
    Convidado


    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  Convidad 17/5/2012, 23:36

    Uma dica minha

    Reserve uma tabela para guardar o usuario que se loga, e esse tal campo ir buscar sempre esta informação à tabela.

    CurrentDb.Execute "INSERT INTO TabelaUsuario (user) Values('" & Me.txtUser.Value & "')"

    Quando ele saír, faz um delete *

    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3871
    Registrado : 21/04/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  Marcelo David 18/5/2012, 00:54

    Em qual evento você pôs o código?

    Tente no evento após atualizar.


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Marcel11
    ERS2011
    ERS2011
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 10/09/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  ERS2011 24/5/2012, 21:46

    Obrigado pela ajuda colegas

    Marcelo tentei colocar no evento apos atualizar ,no atual ,ao carregar , enfim testei de varias formas .Funcionou da 1° vez que testei depois disso não funciona mais .

    Miguel , fiz uma tabela para armazenar usuario logado como você sugeriu e ela esta funcionando ,mas tenho várias duvidas pois apenas estou começando a aprender access para ajudar no dia a dia no meu trabalho.

    1° Não sei fazer para deletar assim que o usuario deslogar;
    2° Não consegui fazer aparecer no Form o campo com o usuario atual, puxando da tabela;
    Consegui Fazer este item deste modo:
    Private Sub Form_Load()
    If (Me.TxtCarimbo2) = "" Then
    Me.TxtCarimbo2 = DLookup("User", "TblUsuarioLog")
    End If
    End Sub

    3° Pode ter por exemplo 4 usuarios logados ao mesmo tempo , o que acontece quando um usuario deslogar em relação a deletar ele da tabela ? Os outros permanecem como logado ?

    Os Amigos poderiam me ajudar com esta questão?

    Agradeço desde já .
    ERS2011
    ERS2011
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 10/09/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  ERS2011 8/6/2012, 20:30

    Obrigado pela ajuda de todos , consegui fazendo desta forma .

    Private Sub Form_Load()
    If (Me.TxtCarimbo2) = "" Then
    Me.TxtCarimbo2 = Forms![FPrincipalEletrica]![txtUsuarioAtual]
    End If
    End Sub

    Abraço a todos .


    lol!
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3871
    Registrado : 21/04/2011

    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  Marcelo David 8/6/2012, 20:55

    Que bom que você conseguiu.
    Só esqueceu do resolvido.
    Vou por para você, mas não
    esqueça das próximas vezes.

    Abraço.


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Marcel11

    Conteúdo patrocinado


    [Resolvido]Verificar se  o campo da cx de texto já está preenchido. Empty Re: [Resolvido]Verificar se o campo da cx de texto já está preenchido.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 17:19