Como pegar valor de outro mdb

ola boa tarde, gostaria de uma ajudar , sera que e possível eu abrir um mdb digitar usuário e senha e deixar estas informações publicas aonde outro mdb ao abrir possa saber se já estou logado e utilizar o mesmo usuário conectado...logado ao primeiro mdb.

grato desde já

abraço a todos

Existem mil maneiras de fazer nestum,

A mais facil, é você ao fazer login, setar um campo de checkbox (sim/não).


No banco externo, faz a validação, numa consulta:

SELECT Count(*) AS Logado
FROM tblLogin IN 'D:\teste.mdb' Where Nome='jpaulo' AND Status=-1;

Salva a consulta com o nome de qryLogin;

Ao abrir o formulario, faz apenas um If, para verificar se existe registro nessa consulta.

Private Sub Form_Open(Cancel As Integer)
Dim x As Variant
x = DLookup("Total", "qryLogin")
    If x = 1 Then
    MsgBox "Logado", vbInformation
    Else
    MsgBox "Não Logado", vbCritical
    DoCmd.Quit
    End If
End Sub

pensei nisso tambem paulo muito obrigado pela respostas, a unica coisa que ainda ta me fazendo pesquisar um pouco é se por exemplo derrepente a maquina trava o sistena nao identificará que o cliente nao esta mas logado ai pode dar falso positivo né.

Se a maquina falha, não vai fazer validação mesmo, mas ae é como se falta a electricidade rsrsrsrs, fazer o quê ?

por isso tava pensando em algo derrepende de verificar se o primeiro mdb esta aberto e logado para permitir que o segundo mdb seja chamado por dentro do primeiro.... ate ai e facil o meu problema é se o cara tentar ir direto abrir o segundo mdb daria falha na segurança....tava pensando em fazer uma referencia la nos modulos sabe aonde agente faz referencia aos activex ao primeiro mdb e atraves disso verificar se as variaveis usuario e senha esta carregada.... sera que funcionaria assm....nunca fiz isso andei lendo por ai...a respeito..

Não sei como está idealizando fazer, mas pesquise aqui mesmo pela função 'IsLoaded'.

este comando seria interessante pra ver se o formulario esta aberto. sim irei utilizar, mas o que to verificando se da certo e o seguinte, no segundo mdb em referencias vou faz a referencia pelo modulo para o primeiro mdb, ai acho que desta forma pelo segundo mdb devo conseguir me referir a variavel publica usuario e senha que esta declarada em m modulo no primeiro mdb. o mdb principal, so pra deixar melhor especificado, o meu sistema ira ficar inteiro no mdb principal so a parte da nfe ira ficar no segundo pois tem modulos com nomes e chamadas identicas ao primeiro por isso nao consigo colocar tudo junto da erro,,, entao terei que separar em dois arquivos mas nao quero deixar o cara abrir o mdb da nfe sem ter permição,,,, entendeu,,,

e muito obrigado pelo retorno que esta dando e sua atenção pois sei que tempo e muito raro para os mestres do access

grato

Como sabe existem mil maneiras de fazer nestum, é certo.

Uma outra ideia, seria abrir um form de login e caso o login tivesse sucesso abriria o segundo banco, mas isso teria de ter muitas outras validações.

Para já fica a ideia;

Private Sub SeuBotão_Click()
  Dim strCaminho
  Dim appAccess As Access.Application
  strCaminho = "D:\Teste.mdb"
        
  If Me.login.Value = "jpaulo" And Me.Senha.Value = "1234" Then
      Set appAccess = CreateObject("Access.Application")
      appAccess.OpenCurrentDatabase strCaminho
      appAccess.DoCmd.OpenForm "frmTeste", acNormal
      appAccess.Visible = True
      appAccess.UserControl = True
   Else
      MsgBox "Usuário ou Senha incorreta...", vbCritical
      DoCmd.Quit
   End If
End Sub