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

    [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Compartilhe

    socgyn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 01/05/2013

    [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  socgyn em Sex 09 Maio 2014, 05:33

    Vi muitos exemplos aqui, mas não consegui adequar nenhum deles. Sou meio "cru" em vba.

    Para registrar na tabela user2 a data e hora que logou eu consegui, coloquei o código abaixo no botão login do formulário de login

    CurrentDb.Execute "INSERT INTO Usuar2 (usuar,Dta,hra) VALUES ('" & Me!CaixaLogin & "',date(), Time());"

    Agora o que preciso é conseguir gravar na mesma tabela (usuar2) nos campos : DtaSai e hraSai , os respectivas informações data da saída e hora da saída do sistema.

    Dentre alguns exemplos um indicava isso:

    CurrentDb.Execute "UPDATE NomeDaTabela SET Campo1DaTabela='" & Me.Campo1DoForm & "', Campo2DaTabela='" & Me.Campo2DoForm & "', Campo3DaTabela='" & Me.Campo3DoForm & "' WHERE Código='" & Me.Código & "'"

    Só que não deu certo. aliás em qual formulário ou botão colocaria esse código?
    Já vasculhei o repositório e outras dicas mais dá errado, muitos exemplos controlam alteração e quem fez mas o logout não. eu só preciso registrar a data e hora da saída.
    Se alguém puder ajudar agradeço.
    avatar
    rubenscouto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 617
    Registrado : 02/10/2011

    Re: [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  rubenscouto em Sex 09 Maio 2014, 07:14

    Veja Este exemplo criado por um amigo meu. Já tem todas as funções que você precisa e justamente a hora do login e a hora do encerramento.
    Usuario: Administrador
    Senha: Admin.
    Sucesso.

    socgyn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 01/05/2013

    Como gravar a data e hora da saída do logado - ajuda

    Mensagem  socgyn em Sex 09 Maio 2014, 15:28

    O exemplo não veio anexado
    avatar
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  Fernando Bueno em Sex 09 Maio 2014, 22:37

    Ve se te ajuda!!
    Anexos
    ModuloLOGIN2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (739 Kb) Baixado 56 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
    [Você precisa estar registrado e conectado para ver esta imagem.]

    socgyn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 01/05/2013

    Como gravar a data e hora da saída do logado - ajuda

    Mensagem  socgyn em Sab 10 Maio 2014, 00:10

    Fernando Bueno,

    Obrigado pelo exemplo, já havia visto anteriormente, muito bom por sinal. O problema é que para adequar meu bd nele ficará mais complicado, não sei ainda como fazer as ribbons e quando carrega no login ele já tem uma estrutura montada, o meu está praticamente completo, vou ver como funciona o montaribbons do Avelino agora. não sei se tem como aproveitar toda estrutura adicionar meu menu com o que está nesse, para mim ainda é meio complicado.
    Seria ideal se eu conseguisse.
    No momento preciso adiantar o projeto, e no momento, o mais viável será gravar a data e hora de logon e quem logou (isso já consegui) e a saída ou logout do logado. para gravar a entrada fiz pelo formulário de login, agora a saída não sei como faço já tentei vários código e nem sei na verdade onde colocar esse código, se é no próprio formulário de login ou em outro, ou criar um módulo para gravar ao fechar o sistema seja por qual meio.

    o código que usei para gravar a entrada fica no botão login, logo após a verificação do mesmo.

    CurrentDb.Execute "INSERT INTO Usuar2 (usuar,Dta,hra) VALUES ('" & Me!CaixaLogin & "',date(), Time());"

    avatar
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  Fernando Bueno em Sab 10 Maio 2014, 01:35

    Certo entendi, esse link ajudara esclarecer sua duvida, veja:

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    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
    [Você precisa estar registrado e conectado para ver esta imagem.]

    socgyn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 01/05/2013

    Como gravar a data e hora da saída do logado - ajuda

    Mensagem  socgyn em Sab 10 Maio 2014, 05:16

    Fernando Bueno,
    mais uma vez obrigado pela atenção.
    Verifiquei no Fórum do mabesi e, desculpe minha ignorância, mas a dúvida é onde coloco os códigos,

    Ele menciona a criação da tabela onde serão armazenados os dados, já tenho a tabela em questão mais o Código não sei onde coloco e nem
    a chamada Call

    Código:

    Sub logUsuario(strTipo As String, strUsuario As String)

    Dim str As String

    srtSql = "Insert Into tbl_LogUsuario(tipoLog,dataHoraLog,usuario) " & _
    "Values('"&strTipo & "',Now(),'" & strUsuario &"')"

    DoCmd.SetWarnings False
    DoCmd.RunSQL strSql
    DoCmd.SetWarnings True

    End Sub


    Chamada:

    Call logUsuario("Login",CurrentUser) 'para login'

    ou

    Call logUsuario("Logout",CurrentUser) 'para Logout'

    Como o de login já consegui fazer armazenar, o problema é com o registro logout.

    onde coloco o Call logUsuario("Logout",CurrentUser) para registrar o Logout ?

    Ah na tabela que ele propôs não há campo para data/hora logout,

    tbl_LogUsuario
    idLog nº auto
    tipoLog texto
    dataHoraLog data/hora (formato = dd/mm/yyyy - hh:nn:ss)
    usuario texto

    Se puder ajudar, a esclarecer como proceder para implantar fico imensamente agradecido

    Sandro
    Goiânia


    avatar
    rubenscouto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 617
    Registrado : 02/10/2011

    Re: [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  rubenscouto em Sab 10 Maio 2014, 06:18

    Segue com Anexo.
    Anexos
    Acesso.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.8 Mb) Baixado 53 vez(es)
    avatar
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  Fernando Bueno em Sab 10 Maio 2014, 11:21

    Vou testar esse comando depois te 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
    [Você precisa estar registrado e conectado para ver esta imagem.]

    socgyn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 107
    Registrado : 01/05/2013

    Como gravar a data e hora da saída do logado - ajuda

    Mensagem  socgyn em Seg 12 Maio 2014, 15:27

    Bom dia pessoal, como consegui resolver, vou compartilhar aqui a solução. Ah antes de mais nada agradeço a todos que tentaram ajudar.

    Bom, com uma dica do Avelino, adequei a minha necessidade e funcionou.

    Vamos lá:

    No formulário de login no botão logar, coloquei o código

    Private Sub BotaoLogin_Click()
    If Not IsNull(CaixaLogin) And Not IsNull(CaixaSenha) Then
    If verificaLogin(CaixaLogin, CaixaSenha) Then
    CurrentDb.Execute "INSERT INTO Usuar2 (usuar,Dta,hra) VALUES ('" & Me!CaixaLogin & "',Now(), Time());"

    Me.Visible = False
    DoCmd.OpenForm "frm2"
    Else
    MsgBox "Senha inválida!", vbExclamation, "Login"

    End If
    End If
    End Sub

    Então logo após a verificação de usuário e senha ele adiciona a informação do usuário, data e hora em que logou.
    Ps.: uma mudança nesse formulário é que fez a diferença, antes ao logar o formulário era fechado, então conforme dica,
    fica somente oculto Me.Visible = False

    Ao descarregar deste mesmo form coloquei:

    Private Sub Form_Unload(Cancel As Integer)
    CurrentDb.Execute "UPDATE Usuar2 SET Usuar2.DtaSai = Now(), Usuar2.hraSai = Time() WHERE Usuar2.DtaSai Is Null AND Usuar2.hraSai Is Null;"
    End Sub

    Então quando fecho o access ele registra a data e hora da saída na tabela em questão.

    Antes eu estava colocando em cada formulário de cadastro e quando saia registrava, mas são muitos forms, então essa foi a melhor maneira

    Até mais.

    Sandro
    Goiânia

    avatar
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: [Resolvido]Como gravar a data e hora da saída do logado - ajuda

    Mensagem  Fernando Bueno em Seg 12 Maio 2014, 17:41

    Legal amigo, obrigado pelo compartilhamento e 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
    [Você precisa estar registrado e conectado para ver esta imagem.]

      Data/hora atual: Qua 26 Jul 2017, 09:47