MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Sair do Access e fazer Logoff

    Compartilhe
    avatar
    AMarcos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 26/07/2016

    [Resolvido]Sair do Access e fazer Logoff

    Mensagem  AMarcos em 6/10/2018, 17:03

    Estou acessando meu BD em vária máquinas utilizando de acesso remoto.

    Alguns dos mestres amigos saberia me dizer se existe algum comando que o usuário ao Sair do BD em Access através de um botão eu consiga fazer "logoff" do acesso remoto ao mesmo tempo.

    Um abraço,



    ANTONIO MARCOS
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5819
    Registrado : 15/03/2013

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  ahteixeira em 7/10/2018, 01:58

    Olá, pesquese na net fazer via linha de comando.
    Depois será executar via SHELL a partir do Access.

    Talvez resulte.

    Abraço


    Última edição por ahteixeira em 7/10/2018, 22:43, editado 2 vez(es)
    avatar
    AMarcos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 26/07/2016

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  AMarcos em 7/10/2018, 12:04

    Meu amigo muito obrigado pela presteza na resposta,, mas eu gostaria que desse mais detalhes sobre, pois sou iniciante na programação e gostaria saber como criar um botão para que ao sair do access conseguisse ao mesmo tempo efetuar o "logoff" da máquina virtual utilizada.


    AMarcos
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5819
    Registrado : 15/03/2013

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  ahteixeira em 7/10/2018, 17:19

    Olá António Marcos,

    Veja se é o que pretende.
    http://www.maximoaccess.com/t34443-terminar-a-sessao-do-windows-logoff

    Abraço
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 491
    Registrado : 22/11/2016

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  IvanJr. em 7/10/2018, 19:52

    Mestre ahteixeira, fiz o teste e funcionou perfeitamente para encerrar a sessão remota.

    E buscando imaginar todas as situações, fiz o seguinte: no evento "Ao descarregar" de um formulário coloquei "Cancel = true". E num botão do mesmo formulário coloquei o código dado neste tópico. Resultado: é forçado o fechamento do MS Access para que o logoff aconteça.

    Me pergunto: se o aplicativo tiver uns 20mb e a propriedade Compactar e Reparar estiver setada, não pode dar problema?
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5819
    Registrado : 15/03/2013

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  ahteixeira em 7/10/2018, 23:12

    Olá Ivan,

    Para o que pretende será fazer um atraso na chamada.

    Tente na linha de comando:
    shutdown /? |more

    para ver as opções, creio ser o -t ss

    Outra alternativa, criar um batch e coloca a seguinte instrução antes do shutdown, ficando assim.
    Código:
    @echo off
    timeout /t 15
    shutdown -l


    Abraço
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 491
    Registrado : 22/11/2016

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  IvanJr. em 8/10/2018, 19:36

    Perfeito. Obrigado.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5819
    Registrado : 15/03/2013

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  ahteixeira em 8/10/2018, 23:15

    Olá a todos

    Ivan, obrigado pelo retorno, pode partilhar como ficou a sua solução.

    Antonio, como ficou a situação?

    Abraço a todos
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 491
    Registrado : 22/11/2016

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  IvanJr. em 9/10/2018, 06:01

    ahteixeira, criei um VBS com o código abaixo e chamo por ele no mesmo botão de encerramento do sistema. Ficou bom. Obrigado pelo "shutdown -l". Não imaginei que isso encerrasse o utilitário de acesso remoto, mas que apenas faria logoff na máquina remota permanecendo na tela de logon.

    Código:
    Dim objWMIService
    Dim colItems
    Dim booRodando
    Dim objws

    Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
    Set objWS = CreateObject("wscript.shell")

    Do
        Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Process WHERE" & " Name = 'MSACCESS.EXE'")     
        booRodando = colItems.Count>0
        Set colItems = Nothing
        WScript.Sleep 1000
    Loop While booRodando = True

    Set objWMIService = Nothing
    ObjWS.Run "shutdown -l", 0,"false"
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5819
    Registrado : 15/03/2013

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  ahteixeira em 9/10/2018, 08:17

    Olá a todos,

    Ivan, obrigado pelo retorno, os membros do fórum sgradecem.
    Creio que com o seu exemplo resolve na totalidade todas as questões do nosso coelga.

    Antonio Marcos, aguardamos o retorno.
    Se a questão ficou esclarecida, não se esqueça de dar o tópico como Resolvido.

    Abraço a todos
    avatar
    AMarcos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 26/07/2016

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  AMarcos em 14/11/2018, 13:37

    Obg pela ajuda!

    Me ajudou bastante


    Muito obg pela atenção dispensada!


    AMarcos
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5819
    Registrado : 15/03/2013

    Re: [Resolvido]Sair do Access e fazer Logoff

    Mensagem  ahteixeira em 14/11/2018, 15:58

    cheers

      Data/hora atual: 26/3/2019, 15:02