MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Configurando o acesso dos usuários

    Compartilhe

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Qui 14 Ago 2014, 04:33

    Amigos, boa noite!
    Estou implementando em um banco de dados o sistema de login que interage com as Ribbons. Estou tendo dificuldades para entender o funcionamento do processo e busco a ajuda dos colegas.

    Na função fncOnAction eu não entendi a forma como as atribuições aos botões da Ribbon foram feitas, ou melhor, por que foram feitas dessa forma.

    Código:
        Case "btInfo"
            DoCmd.OpenForm "frmSobre", , , , , acWindowNormal
        Case "btusuario"
            DoCmd.OpenForm "frmUsuários", , , , , , 1
        Case "btpermissao"
            DoCmd.OpenForm "frmPermissõesGrupos", , , , , , 1
        Case "btGrupos"
            DoCmd.OpenForm "frmGrupos", , , , , , 1

    Eu creio que seja para atribuir as permissões, mas na escrita Xml da Ribbon não há nenhuma referência à essa parte (, , , , , , 1)

    O que tenho usado, obviamente sem o controle de acesso, é DoCmd.OpenForm "frmGrupos"

    Caso queiram dar uma olhada, segue o BD.

    Farmácia Hospitalar


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3347
    Registrado : 04/04/2010

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  Avelino Sampaio em Qui 14 Ago 2014, 08:41

    Olá!

    A explicação do argumento OpenArgs está neste meu artigo:

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

    Bom estudo!



    .................................................................................
    ============ Quer aprender Access em alta velocidade ? ============

    || [Você precisa estar registrado e conectado para ver esta imagem.] Acesse o site UsandoAccess.com.br e veja um ótimo kit de ensino que tenho para você.

    ===========================================================

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Qui 14 Ago 2014, 13:22

    Grande Avelino, muito obrigado!

     cheers  Compreendi o funcionamento lendo o artigo e estudando os códigos no modRibbon e no VBA dos formulários que se valem desse recurso.

    O bloqueio das funções específicas de cada formulário, de acordo com o usuário logado, como impressão, inserção de dados e outros, eu aprendi como fazer, mas preciso de ajuda para compreender outros três recursos:

     Embarassed   Question   scratch  Dentre as três dúvidas abaixo, confesso que não sei se há uma sequência para resolvê-las ou são independentes, ou seja, não sei o que deve ser feito primeiro

    1 - Como bloquear o acesso de um usuário às informações que são do grupo de administradores, como por exemplo, cadastrar novos usuários e/ou alterar as permissões dos já existentes;

    2 - Não permitir que um determinado usuário tenha acesso aos botões das Ribbons. Confesso que assisti aos vídeos do Monta Ribbons, mas ainda tá pegando.  study   affraid 

    3 - Preencher campos específicos dos formulários com o nome dos usuários logados. Nesse caso são os responsáveis pelos registros. Essa informação não precisa aparecer nestes campos dos formulários, mas preciso delas nos campos dos relatórios, daí poderiam ficar gravadas na tabela e, qdo fossem gerados os relatórios, estes dados seriam impressos neles.

    No aplicativo Maestro, qdo se faz o login, a função fncTítuloUsuário indica o tempo todo quem está logado, mas eu preciso dessa informação em um relatório para indicar quem usou o aplicativo para determinados registros.


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  Noobezinho em Qui 14 Ago 2014, 17:00

    João

    Antes de tudo

    -A função fncOnAction ()   serve para abrir os formulários de acordo com o botão da ribbons clicado.
       Está faltando (você apagou)  o case para o frmGrupos, veja que clicando no menu  ele não abre
    Você  desativou, colocando aspas simples (') e assim ficando em verde duas funções importantes e que são juntas, o coração
    da segurança:

    - Função: fncGetVisible
      Essa função deixa o botão invisivel de acordo com a Tag  ( na tabela UsysRibbons) dele.
      Por exemplo:
      Case 1002 'grpsegurança
           If login.idGrupo = 1 Or login.idGrupo = 2 Then
               visible = True
           Else
               visible = False
           End If
     A função verifica se a tag é 1002, (do grupo segurança, se sim continua e verifica  se o usuário é  do grupo 1 ou 2
     se sim fica visivel se não fica invisível.
     Já explico sobre 0 usuário.  

    - Função: fncGetEnabled
                 Essa função irá deixar o botão da ribbon ativado ou desativado conforme o grupo do usuário logado.
                 Isso também é feito de acordo com a tag do botão e o login do usuário.

    Vamos às tuas perguntas:
    1ª Pergunta:

    - Primeiro cadastra os grupos de usuários no sistema
    - Define as permissões desses grupos, qual grupo irá abrir qual formulário.
      Veja que no formulário permissões de grupo, clicando em um grupo irá aparecer todos
      os formulário do aplicativo, então clica-se no formulário que quer definir pra esse grupo
      e nas demais opções abaixo.
    - Cadastra-se novos usuários, é só ir na ribbon cadastrar usuários e abrir o form.
      Veja que ja no cadastro define-se o grupo em que o usuário irá pertencer.
      Nesse form também pode alterar os dados do usuário, inclusive o grupo.

    2ª Pergunta:
       Uma vez que cada usuário está definido com o seu grupo e cada grupo definido qual ou quais formulários abrir,
       o usuário de um grupo não irá abrir formulário de outro, porque os botões estão esmaecido para ele ou nem
       aparecerão na ribbon.
    3ª Pergunta:

       No sistema tem a variável global de nome login
       Ela é declarada no mod_login:
       Public login As login
    Type login
       id  As Long
       Usuario As String * 50
       idGrupo As Long
    End Type

    E recebe os valores do formulário frmLogin
       
        'repassa a identificação do usuário para a variável login
       login.id = .Column(0)  'IdUsuário
       login.Usuario = .Column(1) 'Nome do usuário
       login.idGrupo = .Column(3) 'Grupo do usuário

    Então sempre que quiser colocar o nome do usuário atual:
       login.Usuario

    Para o grupo do usuário:
     login.idgrupo

    É isso

    Noob


    .................................................................................
    Noobezinho

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se quem está pedindo ajuda, ajudamos e não retornou.
    Se a pessoa em questão não deu retorno, não tentarei ajudar novamente .

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Sex 15 Ago 2014, 04:02

    Muito bom e muito obrigado!!!

    Corrija-me se estiver errado.
    Para fazer funcionar como deve, terei que configurar o valor da Tag de cada botão e passar essa informação para as funções fncGetVisible e fncGetEnabled, correto?

    Mais uma vez muito obrigado e parabéns pelos conhecimentos!!


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  Noobezinho em Sex 15 Ago 2014, 12:08

    Exatamente

    Tenha atenção ao fazer isso , meu amigo Wink 


    Noob


    .................................................................................
    Noobezinho

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se quem está pedindo ajuda, ajudamos e não retornou.
    Se a pessoa em questão não deu retorno, não tentarei ajudar novamente .

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Sex 15 Ago 2014, 12:24

    Valeu pelo retorno,

    agora, mãos à obra.

    Retorno em breve para relatar como está o processo.

    Grato novamente.


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  Noobezinho em Sex 15 Ago 2014, 12:41

    João

    Você abriu outro tópico com o mesmo assunto e isso não pode.

    Como pode ver, um tópico já basta.

    Vou apagar aquele tópico, já que as informações se repetem.


    .................................................................................
    Noobezinho

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se quem está pedindo ajuda, ajudamos e não retornou.
    Se a pessoa em questão não deu retorno, não tentarei ajudar novamente .

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Sex 15 Ago 2014, 13:46

    Ok!
     Embarassed 


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Sex 15 Ago 2014, 14:57

    Olá meu amigo!


    No meu banco de dados se o usuário tem acesso a um form ele pode acessar qq função no mesmo, portanto eu desabilitei as funções de atualizar, imprimir, gráfico, excluir e inserir.. Fiz isso no próprio frmPermissõesGrupos e mantive as marcações na tblPermissões.
    Não sei se isso pode causar problema na estrutura interna no VBA. Vi que a fncPermissões do mod_Login usa essa informação.

    Eu configurei os grupos e defini as permissões para cada um. Fiz através de uma tabela no Word para me organizar melhor e depois passei para o banco de dados através do frmPermissõesGrupos.

    Eu compreendi que terei que configurar o valor da Tag de cada botão e passar essa informação para as funções fncGetVisible e fncGetEnabled, mas até à configuração na Ribbon creio ter feito certo, mas não consigo passar para o VBA.

    Outra coisa, não vou usar a fncGetEnabled porque estou preferindo deixar os botões visíveis ou não, ao invés de esmaecidos. Isso traria algum problema para o funcionamento do BD? Penso que não, mas me corrija se estiver errado.

    O arquivo anexo tem o BD com alguns comentários na fncGetVisible e a tabela do Word com as configurações dos grupos.
    Se for possível, sem abusar da boa vontade, configure pelo menos o acesso de um grupo de usuários e retire (comente entre aspas) o que não vou precisar usar nos módulos.

    Farmácia para Download

    Mais uma vez, muito obrigado!


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

    João Ricardo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 453
    Registrado : 20/01/2013

    Re: [Resolvido]Configurando o acesso dos usuários

    Mensagem  João Ricardo em Qui 28 Ago 2014, 13:25

    Ok!


    .................................................................................
     [Você precisa estar registrado e conectado para ver esta imagem.] Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  [Você precisa estar registrado e conectado para ver esta imagem.]   [Você precisa estar registrado e conectado para ver esta imagem.] 

      Data/hora atual: Sab 03 Dez 2016, 02:22