Aplicação exemplo: Personalizando a tela de login no E3.

Descrição:

É possível personalizar a janela de login em uma aplicação E3?

Solução:

Isto não é possível através do método Login(); entretanto, é possível personalizar uma tela de login utilizando o método LoginUser(). Com este método, é possível realizar login apenas com usuários criados no Elipse E3. Veja o script exemplo abaixo:

Sub grButton_Click()

Dim user, pass
user = Application.Item("dtLogin").Item("User").Value 'Tag que recebe o conteúdo do usuário
pass = Application.Item("dtLogin").Item("Password").Value 'Tag que recebe o conteúdo da senha
If Application.LoginUser(user, pass) Then
MsgBox "Login do usuário " & user & " realizado com sucesso!", vbinformation, "Informação de Login"
Screen.Close(0)
Else
MsgBox "Login Incorreto!", vbexclamation, "Informação de Login"
End If

End Sub

NOTA: A aplicação em anexo foi desenvolvida na versão 4.6 build 151 do Elipse E3.

Anexos:

Login_E3.zip

Print Friendly, PDF & Email

Este artigo foi útil? Was this helpful?

Classificação média - Average rating 0 / 5. Count: 0

Thoughts on “Aplicação exemplo: Personalizando a tela de login no E3.

  1. Boa noite!
    Surgiu uma dúvida ao desenvolver uma tela de login!
    Quando chamo a tela de login por um evento, a mesma maximiza para resolução da tela inicial.
    Há possibilidade de fixar a tela de login, com o tamanho que foi criada?

    Atenciosamente!

  2. Magno, bom dia.

    Acredito que esteja chamando a tela de login informando o mesmo frame da tela que originou a chamada, certo?
    Caso queira janelada, pode definir um frame virtual e dimensionar a tela ou chamar uma tela do tipo Modal.
    Dá uma olhada nesses artigos:
    https://kb.elipse.com.br/kb31798-abrindo-um-tela-janelada-sem-impedir-a-edicao-da-anterior/
    https://kb.elipse.com.br/kb28660-abrindo-e-movendo-telas-janeladas/
    https://forum.elipse.com.br/t/sobreposicao-de-telas-fechar-telas/261/2

    Sds.

Leave a Reply

Your email address will not be published.Required fields are marked *