MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    Mensagem com problema

    avatar
    SCHWERTNER
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 07/08/2015

    Mensagem com problema Empty Mensagem com problema

    Mensagem  SCHWERTNER em 23/5/2018, 14:21

    Olá povo..
    Tenho um problema. Possuo um Formulário de cadastro e quero que o usuário ao fazer a confirmação em um combox (neste combox estão inseridos todos os usuários),seja o mesmo que está logado (possuo um acesso com log e senha). Que se o usuário ao sair ou atualizar o combox, este me dê uma mensagem,se ok ou usuário diferente do log.. Fiz assim, mas sempre aparece a mesma mensagem.
    Uso um campo Não Acoplado que me informa o Log " =getUsuarioAtual()". O usuário está identificado por ID_FUNC. Coloquei no Após Atualizar do Combox de identificação....

    Onde estou errando??????

    Código:
    If Me.ID_FUNC = Me.LOG Then
    MsgBox "Autorizado o registro . .   ", vbInformation, "AVISO ! ! !"
    ElseIf Me.ID_FUNC <> Me.LOG Then
    MsgBox "A Id Func não combina com o Login.. . ", vbInformation, "AVISO ! ! !"
    End If
    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Mensagem com problema Empty Re: Mensagem com problema

    Mensagem  scandinavo em 23/5/2018, 17:54




    If Me.ID_FUNC = Me.LOG Then
    MsgBox "Autorizado o registro . .   ", vbInformation, "AVISO ! ! !"
    Else
    MsgBox "A Id Func não combina com o Login.. . ", vbInformation, "AVISO ! ! !"
    End If
    avatar
    SCHWERTNER
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 07/08/2015

    Mensagem com problema Empty MESMA MENSAGEM

    Mensagem  SCHWERTNER em 24/5/2018, 00:46

    Não funcionou.... Sempre dá a mesma mensagem:

    MsgBox "A Id Func não combina com o Login.. . ", vbInformation, "AVISO ! ! !"

    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Mensagem com problema Empty Re: Mensagem com problema

    Mensagem  scandinavo em 24/5/2018, 12:35

    A mensagem esta correta o problema esta no seu log.
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4358
    Registrado : 20/04/2011

    Mensagem com problema Empty Re: Mensagem com problema

    Mensagem  Silvio em 24/5/2018, 14:00

    Bom dia, se me permitem um pitaco...

    Troque o me.Log por......=getUsuarioAtual()


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    SCHWERTNER
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 07/08/2015

    Mensagem com problema Empty funcionou

    Mensagem  SCHWERTNER em 24/5/2018, 14:15

    Obrigadão.. Funcionou

    Abraço a todos do forum
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4358
    Registrado : 20/04/2011

    Mensagem com problema Empty Re: Mensagem com problema

    Mensagem  Silvio em 24/5/2018, 14:33

    Que bom...
    Não esqueça de dar o tópico como resolvido.
    Abraços.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."

    Conteúdo patrocinado

    Mensagem com problema Empty Re: Mensagem com problema

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 25/5/2019, 06:39