Olá pessoal,sou iniciante em access e tenho muitas duvidas.Sei que é possível montar um historico em uma tabela contendo o nome do usuario,data e hora do acesso só não sei como fazer.Já vi um aplicativo do repositório que possui esta aplicação mas não consigo entender.Quero montar um bd,já sei montar o fórmulário de login mas gostaria de ter o controle dos acessos.
3 participantes
[Resolvido]Historico de logins
clemerson- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 124
Registrado : 28/02/2012
- Mensagem nº1
Historico de logins
ddoc- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 77
Registrado : 05/08/2011
- Mensagem nº2
Re: [Resolvido]Historico de logins
Vou acompanhar porquê isso também me interessa. Seria interessante também a possibilidade de rastrear os formulários acessados e registros modificados.
Gilberto Rocha- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1027
Registrado : 21/01/2010
- Mensagem nº3
Re: [Resolvido]Historico de logins
Tenha uma tabela RegistraLogins com os campos:
Id_Contador Tipo = Numeração Automática
DataAcesso Tipo = Data/Hora
AcessadoPor Tipo = Texto
HoraSaida Tipo = Data/Hora
Nivel Tipo = Texto
'Depois ao abrir o sistema coloque o código abaixo
'Registra quem logou
Dim dbLogin As Database, rstLogin As Recordset
Set dbLogin = CurrentDb
On Error Resume Next
Set rstLogin = dbLogin.OpenRecordset("RegistraLogins")
rstLogin.AddNew
rstLogin!DataAcesso = Now
rstLogin!AcessadoPor = Me.cxNomeLogado
rstLogin!Nivel = Me.cxNivel
rstLogin.Update
rstLogin.Close
Set dbLogin = Nothing
Id_Contador Tipo = Numeração Automática
DataAcesso Tipo = Data/Hora
AcessadoPor Tipo = Texto
HoraSaida Tipo = Data/Hora
Nivel Tipo = Texto
'Depois ao abrir o sistema coloque o código abaixo
'Registra quem logou
Dim dbLogin As Database, rstLogin As Recordset
Set dbLogin = CurrentDb
On Error Resume Next
Set rstLogin = dbLogin.OpenRecordset("RegistraLogins")
rstLogin.AddNew
rstLogin!DataAcesso = Now
rstLogin!AcessadoPor = Me.cxNomeLogado
rstLogin!Nivel = Me.cxNivel
rstLogin.Update
rstLogin.Close
Set dbLogin = Nothing
clemerson- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 124
Registrado : 28/02/2012
- Mensagem nº4
Re: [Resolvido]Historico de logins
Muito obrigado por responder.Vou testar e depois retorno com o resultado.
clemerson- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 124
Registrado : 28/02/2012
- Mensagem nº5
Re: [Resolvido]Historico de logins
Oi topbr,primeiro obrigado por ajudar,fiz tudo como você mandou as tabelas,coloquei o Código no evento ao abrir do meu formulário de login e tudo mais.A data e a hora estão funcionando perfeitamente mais o nome do usuario não está aparecendo.Aonde será que estou errando?
Gilberto Rocha- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1027
Registrado : 21/01/2010
- Mensagem nº6
Re: [Resolvido]Historico de logins
Veja, você precisa definir a textbox Me.cxNomeLogado como usuário.
Como você define o usuário?
Geralmente se tem om login e esse login deve ser passado para a textbox.
Veja exemplos de login no forum e veja se consegue, caso não assim que der preparo um exemplo.
Como você define o usuário?
Geralmente se tem om login e esse login deve ser passado para a textbox.
Veja exemplos de login no forum e veja se consegue, caso não assim que der preparo um exemplo.
clemerson- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 124
Registrado : 28/02/2012
- Mensagem nº7
Re: [Resolvido]Historico de logins
Já havia observado isto logo no começo.O problema era na verdade o evento onde o código estava colocado.Não sei se te entendi mal,mas o evento ao abrir não dava tempo para que o nome do usuario fosse capturado,jogava os dados na tabela antes de qulaquer ação,então coloquei o código no evento ao descarregar.Assim o nome será capturado toda vez que eu fechar(descarregar) meu formulário de login.Muitíssimo obrigado pelo código e pelas intruções.Problema resolvido!
clemerson- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 124
Registrado : 28/02/2012
- Mensagem nº8
Re: [Resolvido]Historico de logins
Resolvido!