[Resolvido]Usuário logado em todas as forms.

Pessoal, tenho um banco de dados onde quero colocar em todos os forms  o Usuário que esta Logado, poderiam me ajudar?

Segue em anexo o banco de dados.

Caro MMousinho, não sei se vai lhe servir, mas eu utilizei o seguinte código ao carregar o formulário que você quer mostrar o usuário logado

1 - Crie uma caixa não acoplada no seu formulário que você quer mostrar o nome de usuário

Ao carregar o formulário que receberá o nome de usuário insere este código

Código:

Private Sub Form_Load()

'Estou dizendo que minha caixa acoplada Me.usuario_logado está recebendo do formulário de login o usuário de logon
Me.usuario_logado = Forms![FORM_LOGIN]![usuario_de_logon]

End Sub



é simples e pra mim funcionou

Fiz uma alteração no seu banco, utilizei a mesma sintaxe do código acima

Criei uma caixa não acoplada no formulário de login "usuarioAtivo" para receber o valor da caixa txt_usuario
No formulário 'Inicio" coloquei outra caixa não acoplada como nome de "cxUsuarioAtivo" no rodapé do formulário. No evento ao carregar do formulário chamei o valor da caixa "UsuarioAtivo" do formulário "Login"  para preencher a caixa do formulário "Inicio"...

Importante: Para que tivesse o efeito desejado inverti a posição do código abaixo no evento em ao clicar no botão de logon

If IsEmpty(NOMEUSU) Or IsEmpty(SENUSU) Then
MsgBox "Preencha os Campos..", vbOKOnly + vbCritical, "Impossível Acessar!!"

Else
   If ExisteUsuario(NOMEUSU, SENUSU) Then
   
 
   DoCmd.OpenForm "INICIO", acNormal, "", "", , acNormal 'Inverti a posição, primeiro abre o formulario
   DoCmd.Close acForm, "Login", acSaveYes 'Depois fecha o formulário de login
   'Porque se encerrar o formulario de login primeiro, o formulário de início não iria encontrar a referência
 
MsgBox "Bem Vindo Ao SisLojasMM", vbOKOnly, "Bem Vindo"
   




...acho que expliquei ...rsr

No mais você faz o mesmo procedimento nos outros formulários e veja o resultado, bons estudos.

Dica: Sempre nomeie as caixas de texto, caixas não acopladas, botões etc... para você não se perder na programação

Obrigado man, exatamente o que eu queria muito obrigado.

Fico feliz em ajudar, o Fórum agradece seu retorno, não esqueça de colocar o tópico com resolvido!

Resolvido!!