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]Exibir apenas os registros do usuário logado

    Compartilhe

    leor
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 09/05/2013

    [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  leor em Qua 18 Abr 2018, 18:20

    Tenho um sistema com login e senha e preciso que o formulário abra apenas os registros do usuário que está logado.

    Tenho um formulário que sempre fica aberto e com ele consigo pegar as informações do usuário atual e utilizo este código para pegar as informações do usuário atual:

    Usuario = Forms![FormUsuario]![User]

    Há alguma maneira de que um formulário por exemplo (requisições) abra apenas os registros do usuário atual (logado) ?

    Obrigado!

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  Noobezinho em Qua 18 Abr 2018, 20:52

    Se na tabela que deseja retornar os registro tiver o campo usuário, sim.

    Está usando esse formulário que fica aberto somente para captar o usuário conectado?

    [ ]'s

    leor
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 09/05/2013

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  leor em Qui 19 Abr 2018, 13:35

    Na tabela tem sim a informação do usuário. O que tenho que fazer para este formulário abrir apenas os registros deste usuário?

    O formulário que fica sempre aberto tem também os menus do sistema.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  Noobezinho em Qui 19 Abr 2018, 14:59

    Vou dar um exemplo simples para se fazer isso.

    Tens esse código:

    Usuario = Forms![FormUsuario]![User]

    Coloque essa variável usuário na declarações de um módulo existente, assim:

    Public txtUsuario as string

    e acerte a frase para:

    txtUsuario = Forms![FormUsuario]![User]


    Com isso a variável txtUsuario poderá ser usada em toda aplicação.

    No Evento Ao carregar ou Ao abrir de cada formulário coloque:

    If txtUsuário  <> "Fulano de Tal" then

     msgbox "Sinto, mas você não tem permissão para essa janela",vbCritical,"Sem permissão!
     
    docmd.CancelEvent

    Endif

    Agora se quer algo mais bem elaborado, veja [Você precisa estar registrado e conectado para ver este link.]

    [ ]'s

    leor
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 09/05/2013

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  leor em Qui 19 Abr 2018, 17:04

    Eu não entendi muito bem isso:

    If txtUsuário <> "Fulano de Tal" then

    Pois no formulário que eu vou usar, é um formulário de cadastro de requisições e várias pessoas fazem o cadastro e um usuário não poderá visualizar o registro do outro neste mesmo formulário.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  Noobezinho em Qui 19 Abr 2018, 17:40

    A variável global txtUsuário  esta com o nome do usuário do momento.

    Digamos que seja eu: Balem

    Se eu for abrir um formulário que somente

    você (leor) tem permissão ,o código funcionará assim:

    If txtUsuário <> "Leor" then  'Balem é <> de Leor, capicci?

      msgbox "Cai fora,gente boa!" & vbcrlf & "Você não pode por o bedelho aqui!", vbCritical, "Suma Daqui" 'Razz

      docmd.cancelEvent

    Endif

    [ ]'s

    leor
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 09/05/2013

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  leor em Sex 20 Abr 2018, 17:53

    O problema é que todos os usuários tem acesso a esse formulário, o que eu preciso é que somente o usuário logado consigar ver apenas os seus registros cadastrados.

    Pois todos terão que ter acesso a este formulário, pois todos terão que cadastrar informações nele, mas apenas ele poderá vesualizar os seus registros, caso o usuário aperte as teclas Page Up e Page Down ou procure um registro pelo código.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  Noobezinho em Sex 20 Abr 2018, 18:02

    Ok

    Vamos mudar de conversa, tinha entendido o contrário.

    Preciso saber se na tabela desse formulário tem um campo com o nome do usuário.

    E quando é adicionado um registro, se é gravado o nome do usuário nesse registro, na tabela.

    Se não for assim, como saber que determinado registro é do tal funcionário?

    Aguardo ...

    leor
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 09/05/2013

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  leor em Sex 20 Abr 2018, 19:11

    Sim, na tabela desse formulário tem o campo com o nome do usuário que é adicionado automaticamente após preencher o campo descrição usando este código:

    Private Sub Descricao_AfterUpdate()
    Requisitante = (Forms![FormUsuario]![Nome_c])
    End Sub

    Fico no aguardo.

    Obrigado.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  Noobezinho em Sex 20 Abr 2018, 20:27

    Leandro

    Se ainda não tiver uma consulta como fonte de registros do formulário,

    clique no botão com 3 pontinhos ( ...) para abrir uma consulta no lugar da tabela.

    Na grade da consulta, no campo usuário coloque:

    =(Forms![FormUsuario]![Nome_c])

    Salve o formulário e abra-o.

    O formulário só exibirá registros do usuário atual.

    [ ]'s

    leor
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 22
    Registrado : 09/05/2013

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  leor em Ter 24 Abr 2018, 12:57

    Deu certo agora!

    Muito obrigado!

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Exibir apenas os registros do usuário logado

    Mensagem  Noobezinho em Ter 24 Abr 2018, 13:01

    Ótimo que resolvemos

    Boa sorte!

      Data/hora atual: Qua 23 Maio 2018, 02:07