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
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