[Resolvido]Formulário de Login

Galera boa noite
Antes de começar gostaria de informar que o projeto foi baseado no exemplo do usuário Assis conforme esse link
http://maximoaccess.forumeiros.com/t7281-resolvido3-tentativas-de-login?highlight=login

Bom nesse projeto o usuário ao fazer login com meu nome (Flavio) ele abre o formulário tela principal, agora como fazer para ao fazer login como restrito ele abrir a tela principal 2?

boas
uma das formas será assim:
no botao login fazes a comparação com um if.

If Not IsNull(CaixaLogin) And Not IsNull(CaixaSenha) Then
if CaixaLogin.text = "restrito" then
If verificaLogin(CaixaLogin, CaixaSenha) Then
DoCmd.Close
DoCmd.OpenForm "TELA PRINCIPAL2"
Else
MsgBox "Senha inválida!", vbExclamation, "Login"
DoCmd.Quit
End If
else
If verificaLogin(CaixaLogin, CaixaSenha) Then
DoCmd.Close
DoCmd.OpenForm "TELA PRINCIPAL"
Else
MsgBox "Senha inválida!", vbExclamation, "Login"
DoCmd.Quit
End If

End If

aqui tens o restrito abre o form principal2 e os outros todos abrem o form principal1

será mais ou menos isto adapte as suas necessidades

cumps
acao

Bom dia!
poderia me dizer como proceder com essa comparação ou como proceder? tenho conhecimento leigo em módulos.

boas
é só substituir por este codigo

Private Sub BotaoLogin_Click()
If Not IsNull(CaixaLogin) And Not IsNull(CaixaSenha) Then
Me.CaixaLogin.SetFocus
If Me.CaixaLogin.Text = "restrito" Then

If verificaLogin(CaixaLogin, CaixaSenha) Then
DoCmd.Close
DoCmd.OpenForm "TELA PRINCIPAL 2"
Else
MsgBox "Senha inválida!", vbExclamation, "Login"
DoCmd.Quit
End If


Else
If verificaLogin(CaixaLogin, CaixaSenha) Then
DoCmd.Close
DoCmd.OpenForm "TELA PRINCIPAL"
Else
MsgBox "Senha inválida!", vbExclamation, "Login"
DoCmd.Quit
End If
End If
End If
End Sub


ps:os nome de formularios, relatorios, tabelas e campos deve ser sem espassos, assim ex: TelaPrincipal2

atenção que conforme coloquei o cod na tela principal entran todos menos «restrito» e na tela principal2 só entra o «restrito».

edit:deves implementar um hash
passa por este link e procura um post meu post nº56, tens lá toda a informação.
http://maximoaccess.forumeiros.com/t7486p50-carregando-relatorios-em-front-end-desvinculado#61075

cumps
acao

Valeu funcionou certinho