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]Usuario Logado

    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 12:50

    Bom dia
    Será que alguém pode me ajudar? Estou com um problema nessa seguinte função =getUsuarioAtual()
    Faço meu login ai ele mostra o usuário no menu principal mais quando vou para outro form que é do cadastro ele as vezes aparece, outras vezes fica em branco.


    Aprendendo Access 2007
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 12:52

    Bom dia amigo, pode postar o banco para analise?


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    Giovanny
    Giovanny
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 26
    Registrado : 20/10/2011

    [Resolvido]Usuario Logado Empty Usuario Logado

    Mensagem  Giovanny 10/7/2014, 13:33

    Bom dia amigo,

    Se você estiver usando o Módulo LOGIN citado em vários exemplo aqui no forum.
    Você precisa verifica se variável que esta setando o usuario ao entrar é Global.

    E se o campo seja ele um textbox ou label esta com o nome da variavel setado corretamente.
    Se quiser postar um print ou exemplo,melhoraria nosso entendimento para poder ajuda-lo
    com mais eficiência.

    Soluções em Access VBA para NF-e, biometria com SDK para desenvolvedor ,saiba mais em http://geovanny-oliveira16.wix.com/khronostecnologia
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 14:12

    Bom dia. Obrigado pela ajuda.
    Esta ai a imagem do meu form login form menu principal e form cadastro
    Como disse anteriormente meu problema maior e no cadastro que o usuario logado as vezes não fica.
    Anexos
    [Resolvido]Usuario Logado Attachmentbdlab.docx
    Você não tem permissão para fazer download dos arquivos anexados.
    (497 Kb) Baixado 15 vez(es)
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 14:51

    Uso dessa forma e não tem erros, em qualquer parte do banco chamando  getUsuarioAtual() mostra o

    usuario logado.

    Código:
    Option Compare Database
    Option Explicit

    Private strUsuarioAtual As String

    Function verificaLogin(argLogin As String, argSenha As String) As Boolean

        Dim criterio As String
        
        criterio = "login='" & argLogin & "' And senha='" & argSenha & "'"
        
        If Nz(DCount("login", "Usuario", criterio), 0) > 0 Then
            verificaLogin = True
            setUsuarioAtual argLogin
        Else
            verificaLogin = False
        End If

    End Function

    Sub setUsuarioAtual(argUsuario As String)
        strUsuarioAtual = argUsuario
    End Sub

    Function getUsuarioAtual() As String
        getUsuarioAtual = strUsuarioAtual
    End Function


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 15:36

    Bom dia Fernando
    Esse mesmo que estou usando.  Reparei e que somente em duas maquinas acontece esse problema.

    Uma duvida será que tem algum erro pois o cadastro sobrepõe o menu principal ?

    Obg. Pela Atenção
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 15:47

    Bom dia amigão..

    Bom, realmente não entendo o que se passa mesmo porque com esse codigo todos os formularios que

    Você estiver aberto aparecerão o usuario, poste parte do seu bd para vermos se em nossa

    maquina ocorre o mesmo erro


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 16:02

    Bom dia
    Fernando posso mandar para seu email ?
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 16:10

    Ate 3 megas zipado pode anexar aqui mesmo.. Caso seja maior pode enviar sim.

    fer.redhat@gmail.com

    Teste esse para vermos.


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 16:19

    Enviado para Email. obg
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 16:25

    Ok, vou dar uma olhada.


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 16:37

    Amigão baixei seu banco porem o vba do mesmo esta protegido por senha

    não consigo visualizar nem alterar nada.


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 17:01

    Fernando peço desculpas o codigo é 1303 obg.
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 17:02

    Ok, vou dar uma analisada


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 17:17

    Atila, aparentemente essa parte de usuario logado esta tudo ok.. Aqui na minha maquina funcionou

    normal, reparei o banco estou anexando aqui teste novamente para vermos.


    Última edição por Fernando Bueno em 10/7/2014, 18:13, editado 1 vez(es)


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 17:41

    Boa tarde
    Obg. Fernando
    Pela ajuda. Valeu cheers 
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 10/7/2014, 17:45

    Este Forum e demais.....
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 10/7/2014, 17:45

    Por nada amigão, deu certinho? Não esqueça de marcar Resolvido para fecharmos o topico ok.


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fire 12/7/2014, 10:38

    Resolvido
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Fernando Bueno 12/7/2014, 14:01

    Agradecemos o retorno!


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Usuario Logado 16rzeq

    Conteúdo patrocinado


    [Resolvido]Usuario Logado Empty Re: [Resolvido]Usuario Logado

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 23:49