MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Mostrar usuário logado após tela de login

    avatar
    FlavioLima
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 15/02/2016

    [Resolvido]Mostrar usuário logado após tela de login Empty [Resolvido]Mostrar usuário logado após tela de login

    Mensagem  FlavioLima em Ter 04 Fev 2020, 3:53 am

    Boa tarde!
    Pesquisei bastante, encontrei varios posts e tentei implementar sem sucesso.

    Seguindo uma das respostas tentei criar uma variavel global atraves de um módulo, no fórmulario de login, para puxar a informação no formulario seguinte, mas não sei como escrever corretamente o código vba no evento ao clicar do formulario de login...

    Segue o arquivo em zip para quem puder consertar nele agradeço.
    Gostaria muito de encontrar um curso que ensinasse a criar e usar essas variaveis globais...

    ---------
    INFORMAÇÃO DO MÓDULO: modVariaveisGlobais

    Option Compare Database

    Global strNomeUsuario As String
    -------------------
    Comando para guardar a variável:
    strNomeUsuario = Me.txtUser.Column(1)
    ---------------------
    No exemplo que eu retirei tinha:
    With Me!txtUser
    strNomeUsuario = Me.txtUser.Column(1)
    End With
    so que não sei o que é isto... Aprendi muito aqui no forum mas nesse assunto não sei como começar.
    Uso access 2007
    Anexos
    [Resolvido]Mostrar usuário logado após tela de login Attachmentlogin3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (244 Kb) Baixado 16 vez(es)
    Maicon
    Maicon
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 235
    Registrado : 08/09/2012

    [Resolvido]Mostrar usuário logado após tela de login Empty Re: [Resolvido]Mostrar usuário logado após tela de login

    Mensagem  Maicon em Ter 04 Fev 2020, 5:36 am



    .................................................................................
    "O talento vence jogos, mas só o trabalho em equipe ganha campeonatos."
    Michael Jordan

    Bons Estudos.
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Mostrar usuário logado após tela de login Empty Re: [Resolvido]Mostrar usuário logado após tela de login

    Mensagem  Silvio em Ter 04 Fev 2020, 5:51 am

    Boa....uma maneira mais simples e pratica

    1- no teu Flogin:
    a- criar uma txt desacoplada, nomeia a mesma como: "user"
    b- na combobox, insira essa linha,no evento após atualizar: Me.User = Me.txtUser.Column(0)    
    c- troque o "Docmd.close" desse formulário por: Forms!Flogin.visible=false"



    2- no formulário a ser aberto FADV coloque...

    Private Sub Form_Load()
    Dim NIVEL As String
    NIVEL = DLookup("USER", "TAUsuario", "Nome ='" & Forms!FLogin!User & "'")
    Me.usuariologado = NIVEL

    End Sub

    Obs....TXT usa-se normalmente para caixas de textos e CBO/COB para combobox. Do mesmo modo....LST para listbox.
    Anexos
    [Resolvido]Mostrar usuário logado após tela de login Attachmentlogin3_NOVO.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (87 Kb) Baixado 23 vez(es)


    Última edição por Silvio em Ter 04 Fev 2020, 6:01 am, editado 1 vez(es) (Razão : acréscimo de arquivo.)


    .................................................................................
    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
    FlavioLima
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 15/02/2016

    [Resolvido]Mostrar usuário logado após tela de login Empty Re: [Resolvido]Mostrar usuário logado após tela de login

    Mensagem  FlavioLima em Ter 04 Fev 2020, 6:10 am

    Maicon agradeço o auxílio

    ja tinha visto exemplos de

    =[TempVars]![User] e não entendi toda a lógica pra implementar com o código que já tenho...

    Mas é um tanto complicado para meu nível de access olhar um exemplo pronto e adaptar de x tabelas y formularios e macros piorou, nunca usei...

    Ja tinha encontrado exemplos anteriores de TempVars e tentado sem sucesso...

    So se eu copiasse "a facão" uma das soluções inteiras e usasse, mas meu objetivo é aprender tb...

    Sílvio obrigado vou testar agora...
    avatar
    FlavioLima
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 15/02/2016

    [Resolvido]Mostrar usuário logado após tela de login Empty Re: [Resolvido]Mostrar usuário logado após tela de login

    Mensagem  FlavioLima em Ter 04 Fev 2020, 6:25 am

    Maicon muito grato por responder ao tópico trazendo uma alternativa, espero um dia tb ter conhecimento para dedicar meu tempo aqui tb.

    Sílvio muito obrigado por "olhar a dificuldade pelo meu ponto de vista" e trazer uma solução. Sei que meu conhecimento é limitado e agradeço, o que foi 10 minutos de seu tempo para fazer
    eu levei a manhã toda e uma parte da tarde testando antes de postar.

    Agradeço tb a dica de txt e cbo...

    Aos poucos e com a ajuda dos colegas irei melhorando...

    Abs


      Data/hora atual: Dom 06 Dez 2020, 3:03 am