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


2 participantes

    Mostrar todos os usuários logados no banco com o username do windows

    walterlinces
    walterlinces
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 25/05/2012

    Mostrar todos os usuários logados no banco com o username do windows Empty Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  walterlinces 25/5/2012, 02:14

    Encontrei vários exemplos de como mostrar os usuários logados, mas através do jet 4.0.
    Como meu banco fica na rede e todos os usuarios que acessam são admin da estação, só recebo de informação útil o nome da estação porque todos os usernames são admin.
    Precisaria listar com o username do windows, que sei existir na biblioteca advapi32.dll do windows através deste exemplo:
    *********************************************************************************************************************
    'Para vc verificar qual o usuário atual que logou no windows, basta criar um módulo e adcionar o seguinte:

    Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
    Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long

    Function teste()

    'Depois, crie a variável usuário
    Dim Usuario As String
    Usuario = Space(256)
    GetUserName Usuario, 256
    'Na variável usuário estará guardado o nome do usuário.
    'Para vc verificar qual o nome da máquina atual;
    'No módulo coloque
    Dim maquina As String
    maquina = Space(30)
    GetComputerName maquina, 30
    'Na variável maquina estará guardado o nome do computador
    End Function
    *********************************************************************************************************************
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  criquio 25/5/2012, 02:18

    Olá, seja bem vindo ao fórum.

    A instrução Environ pode retornar diversos dados. Tente algo assim no clique de um botão por exemplo:

    MsgBox Environ("Username")


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    walterlinces
    walterlinces
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 25/05/2012

    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  walterlinces 25/5/2012, 02:27

    criquio, obrigado e seria isso mesmo que preciso, só que de todos os usuarios logados no banco.mdb da rede.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  criquio 25/5/2012, 02:43

    Você pode ter uma tabela no backend para colocar o nome do usuário quando ele entrar e deletar quando sair. Ou colocar um Logado quando entrar e um Deslogado quando sair. Veja esse exemplo semelhante que eu criei. Por enquanto, o link para download está na última mensagem, juntamente com um vídeo do aplicativo em funcionamento.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    walterlinces
    walterlinces
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 25/05/2012

    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  walterlinces 25/5/2012, 03:01

    No meu caso não existe o FrontEnd. Todo mundo acessa o mesmo banco. Por isso precisaria saber o nome de cada usuário.
    Sei que parece horrível, mas o ideal neste caso é isso mesmo.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  criquio 25/5/2012, 03:07

    Pois eu lhe aconselho a dividir o banco em backend e frontend. Pode parecer mais trabalhoso agora, mas com o tempo pode lhe poupar grandes dores de cabeça, principalmente devido às chances de corromper o banco que são muito maiores.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    walterlinces
    walterlinces
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 25/05/2012

    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  walterlinces 25/5/2012, 03:09

    Estou realmente pensando nisso futuramente, mas no momento precisaria de sua ajuda para listar os usuários dessa forma mesmo.

    Conteúdo patrocinado


    Mostrar todos os usuários logados no banco com o username do windows Empty Re: Mostrar todos os usuários logados no banco com o username do windows

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 00:51