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


3 participantes

    acesso por usuario

    avatar
    missura
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 48
    Registrado : 22/05/2012

    acesso por usuario Empty acesso por usuario

    Mensagem  missura 11/12/2012, 10:34

    bom dia Senhores...

    hoje no meu bd eu consigo controlar o acesso atraves do codigo abaixo que coloco nos botoes, ele usa o grupo do usuario.

    Porem eu tenho uma tabela de cadastro de cliente, e gostaria que o acesso aos clientes fossem controlados pelo usuario. exemplo usuario rodrigo so acessa os clientes que foram cadastros indicando que sao atendidos pelo rodrigo. tenho uma tabela para gerente de conta onde o rodrigo esta cadastrado e na tabela clientes eu tenho um campo que coloco o codigo de cada gerente/vendedor. no caso 1 cliente so pode ter um 1 gerente.

    hoje nos botoes de cada departamento uso basicamente o codigo abaixo:

    Private Sub BtnFinanceiro_Click()
    If getGrupoUsuarioAtual = "Administrador" Or getGrupoUsuarioAtual = "Financeiro" Then
    DoCmd.OpenForm "FFinanceiro"
    DoCmd.Close acForm, "FPrincipal"
    Else
    MsgBox "Acesso permitido somente aos administradores e gerentes!", _
    vbExclamation, "Acesso Negado"
    End If

    End Sub

    no código acima pra entrar no form financeiro, somente os administradores e financeiro, funciona perfeito pra mim, mas queria mudar e usar o acesso pelo usuário.
    muito complexo para fazer essa mudança?
    abraço
    good guy
    good guy
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1304
    Registrado : 05/02/2010

    acesso por usuario Empty acesso por usuario

    Mensagem  good guy 11/12/2012, 12:39

    Olá missura,

    Tenho uma dica para você de código neste link:

    http://www.goodguyaccessvba.com.br/dicas_vba_13.html
    avatar
    ffl
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 14/01/2012

    acesso por usuario Empty Re: acesso por usuario

    Mensagem  ffl 23/1/2013, 21:22

    Muitissimo obrigado Good guy!

    Ainda náo teste o código, mais a disponibilização do mesmo vale o agrecimento!

    Abraços Smile

    Conteúdo patrocinado


    acesso por usuario Empty Re: acesso por usuario

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 07:10