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]pegar usuario logodo

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 25/4/2019, 22:28

    boa noite , colegas , não consigo pegar meu usuario logado .
    aonde erro?
    no evento ao carregar
    Código:
    usuario.Value = frm_login.txtUsuario
    e quero gravar ele na tabela quando iniciou e finalizou.
    Na verdade não estou nem sabendo mostrar usuário logado


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 25/4/2019, 23:22

    Eu consigo colocar na mesma tela , mas não consigo carregar o usuário logado na outra tela e gravar a data e hora do inicial e fim que isso não faço ideia como faz.
    Anexos
    [Resolvido]pegar usuario logodo AttachmentuserLogado.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (45 Kb) Baixado 22 vez(es)


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Assis 25/4/2019, 23:43

    Boa noite

    teste

    Private Sub Form_Load()
    userLogado.Value = Forms.frm_login.logado
    End Sub


    .................................................................................
    *** Só sei que nada sei ***
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Marcelo David 26/4/2019, 03:25

    Boa noite.
    Como alternativa, caso seja útil.
    Anexos
    [Resolvido]pegar usuario logodo AttachmentuserLogado_new1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (42 Kb) Baixado 34 vez(es)


    .................................................................................
    [Resolvido]pegar usuario logodo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]pegar usuario logodo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]pegar usuario logodo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]pegar usuario logodo Marcel11
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 26/4/2019, 18:36

    Boa tarde amigos, Marcelo e Assis muito obrigado por maisessa ajuda.



    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 30/4/2019, 14:43

    Macecelo bom dia.  Rapaz  o formulário parou de registrar a saída do usuário , está só registrando a entrada. Não fiz nenhuma alteração, só coloquei a tabela e frm em outro sistema.
    Pode me ajudar a entender o porque? pois passando todo o sistema para o arquivo que você fez, eu fico sem entender , porque entendi a sua lógica. mas aonde causou o problema


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Marcelo David 30/4/2019, 17:00

    Boa tarde,
    a noite em casa verifico.


    .................................................................................
    [Resolvido]pegar usuario logodo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]pegar usuario logodo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]pegar usuario logodo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]pegar usuario logodo Marcel11
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 30/4/2019, 17:10

    Beleza Marcelo, também o login do meu sistema começou a da pau..
    o fórum esta dificil de ser acessado aqui , eu tenho 3 navegadores.
    Aguardo ...



    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 2/5/2019, 14:45

    deu ruim em tudo , ja não consigo conferir login , não está carregando usuario logado so registra a entrada.
    misericordia


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 2/5/2019, 18:08

    boa tarde. Concertei algumas partes , so mesmo a parte de registrar entrada e saída


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 2/5/2019, 18:09

    boa tarde. Concertei algumas partes , so mesmo a parte de registrar entrada e saída, mas agi=urda a ajuda mas continuo tentando.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 2/5/2019, 20:46

    Boa tarde Marcelo me ajuda essa  e mais uma explicação que entendi essa logica, eu copiei ele para outro formulário que é esse mas está nos mesmo campos!


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 3/5/2019, 02:37

    Boa noite. eu so estou aguarrado nisso! Para fechar o sistema e lançar "


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Marcelo David 3/5/2019, 03:48

    Meu amigo, tinha alguns códigos faltando...
    A variável intIdAcesso não estava declarada, por isso não salvava...
    Alterei de variável para um campo invisível de mesmo nome...
    Anexos
    [Resolvido]pegar usuario logodo Attachmentregistar entradaSaida de User_New2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.8 Mb) Baixado 31 vez(es)


    .................................................................................
    [Resolvido]pegar usuario logodo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]pegar usuario logodo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]pegar usuario logodo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]pegar usuario logodo Marcel11
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 3/5/2019, 20:28

    Marcelo Boa tarde, mais tarde vou dar uma olhada e vou te pedir ajuda para explicar.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 6/5/2019, 14:51

    Bom dia marcelo, no seu arquivo esta tudo ok, passei para meu , para entender sobre o código , mas continua dando erro , com operador faltando !?

       CurrentDb.Execute "UPDATE tbl_log_usuarios SET data_saiu=#" & Now & "# WHERE id_acesso=" & Me.intIdAcesso, dbFailOnError
    DoCmd.Close
    End Sub[/code]
    Isso é problema de versão? Porque são os mesmos campos. Nem registra a entrada.
    vou quebrando a cabeça aqui , porque do erro


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 6/5/2019, 23:03

    Eu estou mexendo em outras parte aqui,mas na tabela de registar os usuários ainda continua dando erro.
    Mesmo se eu copiar tudo dar o mesmo erro.
    Qual erro estou cometendo?
    Caraca, incrível


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Marcelo David 8/5/2019, 02:23

    Boa noite, chegou a criar o campo intIdAcesso? Imagino que seja ele...
    Lemba que falei que esse campo fica invisível...


    .................................................................................
    [Resolvido]pegar usuario logodo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]pegar usuario logodo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]pegar usuario logodo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]pegar usuario logodo Marcel11
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 8/5/2019, 02:52

    Não! eu mudei ele como você deixo, agora ele sempre da erro e manda outra mensagem " operador faltando"


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Marcelo David 8/5/2019, 02:53

    poste aqui o banco que está dando o erro


    .................................................................................
    [Resolvido]pegar usuario logodo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]pegar usuario logodo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]pegar usuario logodo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]pegar usuario logodo Marcel11
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 8/5/2019, 03:11

    cheguei a criar outro tipo de logica , pois fiquei sei entender  essa


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Marcelo David 8/5/2019, 04:14

    Você não copiou (ou alterou o que eu havia feito).

    O código do botão OK do formulário de login,
    na parte que abre o formulário principal o código não está do jeito]
    que eu postei no exemplo anterior.

    Veja p correto (e está no exemplo anterior, basta baixar):

    If txtUsuario = Me.usuarioTab.Value And txtSenha = Me.senhaTab Then
        DoCmd.OpenForm "frm_principal", , acNormal, , , , Me.txtUsuario '<= Esse linha é a correta, pois passo como argumento de abertura o nome do usuário txtUsuario

    DoCmd.OpenForm "frm_principal", , acNormal '<= Cadê o argumento? O correto é o de cima. Pode apagar essa e deixar apenas a de cima

         DoCmd.Close acForm, "frm_login"
    Else
         MsgBox "Campos Inválidos", vbInformation, "Arquivamento-Login"
    End If

    Observe que, assim como no exemplo anterior, você não passou o argumento de abertura do formulário.
    E eu já havia inclusive comentado no código anterior também isso.
    Anexos
    [Resolvido]pegar usuario logodo AttachmententradaSaida de User_New3.zip
    Esqueci o anexo
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.8 Mb) Baixado 42 vez(es)


    .................................................................................
    [Resolvido]pegar usuario logodo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]pegar usuario logodo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]pegar usuario logodo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]pegar usuario logodo Marcel11
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  crysostomo 8/5/2019, 19:51

    falta de atenção em mim que não falta depois de 5 hs programando ja não passa nenhuma logica na minha cabeça.
    obg


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Conteúdo patrocinado


    [Resolvido]pegar usuario logodo Empty Re: [Resolvido]pegar usuario logodo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 17:15