[Resolvido]Access informar o equipamento logado

boa tarde

é possivel fazer com que o acces informe qual equipamento esta sendo utilizado

tipo logo em um desktop ou notebook ou em um tablet.

Boa tarde,

Acredito que uma das funções abaixo te ajude:

Código:


Environ("Type")
Environ("CHASSIS")


ficou meio vago quanto o uso, mas resolvi de outra forma tenho o cadastro obrigatorio do hostname do equipamento; logo irei cadastrar o modelo, padronizando minha necessidade.

obrigado!

ficou meio vago quanto o uso, mas resolvi de outra forma tenho o cadastro obrigatorio do hostname do equipamento; logo irei cadastrar o modelo, padronizando minha necessidade.

obrigado!

Bom dia,

Sugiro que faça da seguinte forma:

1 - Crie uma tabela com o nome de tab_logs com os campos: TIPO; MAQUINA; USUARIO; ENTRADA; SAIDA

2 - Crie um evento ao carregar no seu fml_principal para criar um novo registro na tab_logs, preenchendo até o campo ENTRADA.

Código:


Dim tipo, maquina, usuario As String
tipo = Environ("CHASSIS")
maquina = Environ("COMPUTERNAME")
usuario = Environ("USERNAME")

CurrentDb.Execute "INSERT INTO tab_logs(TIPO,MAQUINA,UDUARIO,ENTRADA) VALUES ('" & tipo & "', '" & maquina & "', '" & usuario & "', '" & Now & "')"

2 - Crie um evento ao fechar do seu fml_principal para atualizar o registro como offline:

Código:

Dim usuario As String
usuario = Environ("USERNAME")
CurrentDb.Execute "UPDATE tab_logs SET SAIDA= Now WHERE [USUARIO]='" & usuario & "'"

3 - Crie uma consulta a partir da tab_logs e no campo SAIDA coloque como critérios: É Nulo
A partir dessa consulta verá os que estão logados, crie um form ou use a própria consulta para visualizar.


Teste e nos mande um feedback...