Boa tarde!
Estou criando um formulário de Login com permissões conforme o grupo de usuários.
Quero dar permissão a todos os usuários em alguns relatório, mas somente ao grupo de Administradores em determinados Formulários.
Coloquei esse código, mas não está correto:
If getGrupoUsuarioAtual = "Administradores" Or "Gerentes" Then
DoCmd.OpenReport "Resumo dos contatos por cidade", acViewPreview, , , acWindowNormal
Else
MsgBox "Acesso permitido somente aos administradores!", _
vbExclamation, "Acesso Negado"
End If
Alguem pode me ajudar? Agradeço a atenção.
Estou criando um formulário de Login com permissões conforme o grupo de usuários.
Quero dar permissão a todos os usuários em alguns relatório, mas somente ao grupo de Administradores em determinados Formulários.
Coloquei esse código, mas não está correto:
If getGrupoUsuarioAtual = "Administradores" Or "Gerentes" Then
DoCmd.OpenReport "Resumo dos contatos por cidade", acViewPreview, , , acWindowNormal
Else
MsgBox "Acesso permitido somente aos administradores!", _
vbExclamation, "Acesso Negado"
End If
Alguem pode me ajudar? Agradeço a atenção.
Última edição por niloliver em 31/8/2018, 17:16, editado 1 vez(es)