Direcionamento para tela após senha

#1

Pessoal, Boa tarde. poderia me auxiliar nesta dúvida
Como configuro o script para ser possível chamar uma tela mediante ao usuário cadastrado.
Exemplo é o administrador, vai para tela de administração. É um usuário, vai para tela dos usuários.

#2

@edy_bahia, boa tarde.

Pode criar um script com Select Case ou If Else informando que se for tal usuário (ou usuário de tal grupo) vai para tal tela.

Exemplo:
Sub CommandButton1_Click()
If Application.Login() Then

If Application.User = “UserX” Then
Application.GetFrame("").OpenScreen(“TelaX”), 0

ElseIf Application.User = “UserY” Then
Application.GetFrame("").OpenScreen(“TelaY”), 0

Else
Application.GetFrame("").OpenScreen(“TelaN”), 0
End If

End If
End Sub

Abraços.

#3

@Fernando Compreendi o exemplo, agradeço. vou testar aqui

#4

Também poderia utilizar o método IsUserMemberOfGroup para grupos de usuários (administradores, operadores, monitores, etc).

#5

Funcionou aqui certinho…
Estou editando o tropico para mostra o código que utilizei. com a dica do @dgautomacao e @Fernando

if Application.IsUserMemberOfGroup (“administradores”) then
Application.GetFrame("").OpenScreen(“tela_migracaoadmin”), 0

’ ElseIf Application.User = “user1” Then
ElseIf Application.IsUserMemberOfGroup (“usuarios”) then
Application.GetFrame("").OpenScreen(“tela_consulta”), 0

Else
Application.GetFrame("").OpenScreen(“tela_home”), 0
End If

1 Like