MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    [Resolvido]Snipping Tool (Ferramenta de Captura)

    avatar
    ravanifrf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 20/03/2017

    [Resolvido]Snipping Tool (Ferramenta de Captura) Empty [Resolvido]Snipping Tool (Ferramenta de Captura)

    Mensagem  ravanifrf 29/8/2017, 12:01

    Bom dia, Boa tarde, boa noite dependendo do fuso...

    Tenho um formulário de Welcome o qual faz o direcionamento para os outros formulários de meu BD, através de botões...
    Nesse formulário Welcome, gostaria de incluir alguns utilitários iniciados por botões como: Word, Calculadora e a Ferramenta de Captura do windows.

    Até aí tudo certo, pois após uma pesquisa breve descobri o comando "Shell", logo bastava colocar este comando no evento: 'Ao clicar' do botão.
    Ele, funcionou perfeito para o Word e Calculadora, no entanto a Ferramenta de Captura do Windows (SnippingTool) não...

    Segue os comandos já tentados e respectivos erros acusados pelo Access 2007:

    1. Shell "SnippingTool", vbNormalFocus
      Erro acusado:Erro em tempo de execução '53': O arquivo não foi localizado

    2. Shell "SnippingTool.exe", vbNormalFocus
      Erro acusado:Erro em tempo de execução '53': O arquivo não foi localizado

    3. Shell "C:\Windows\System32\SnippingTool", vbNormalFocus
      Erro acusado:Erro em tempo de execução '53': O arquivo não foi localizado

    4. Shell "C:\Windows\System32\SnippingTool.exe", vbNormalFocus
      Erro acusado:Erro em tempo de execução '53': O arquivo não foi localizado

    5. If Not Environment.Is64BitProcess Then
                 Process.Start("C:\Windows\sysnative\SnippingTool.exe")
             Else
                 Process.Start("C:\Windows\system32\SnippingTool.exe")
             End If
      Erro acusado:Erro em tempo de execução '424': O objeto é obrigatório

    6. Fazer uma cópia do aplicativo e chamá-lo com o Shell
      Erro acusado: É exibida uma MensageBox de ERRO, sem conteúdo algum.

    7. Um atalho para o aplicativo chamando-o com o Shell
      Erro acusado:Erro em tempo de execução '53': O arquivo não foi localizado


    Nada funcionou até agora...

    Quem puder me ajudar... Obrigado!
    avatar
    ravanifrf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 20/03/2017

    [Resolvido]Snipping Tool (Ferramenta de Captura) Empty Snipping Tool (Ferramenta de Captura)

    Mensagem  ravanifrf 29/8/2017, 13:55

    Bom dia, Boa tarde, boa noite dependendo do fuso...

    Funcionou com o código abaixo:
    Process.Start("C:\Windows\sysnative\SnippingTool.exe")

    O problema era que o Windows que uso era 64 bits e estava tentando abrir um programa de 32 bits, para isso usa-se 'sysnative'.

    Obrigado!!!
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Snipping Tool (Ferramenta de Captura) Empty Re: [Resolvido]Snipping Tool (Ferramenta de Captura)

    Mensagem  Alvaro Teixeira 29/8/2017, 14:34

    Olá Felipe,

    Estava aqui a testar e a ter o mesmo problema.
    Veja apesar de existir o ficheiro, o Access não reconhece.
    [Resolvido]Snipping Tool (Ferramenta de Captura) 019

    Desconhecia o "sysnative", é mesmo isso.
    Só prova que com o MaximoAccess é sempre aprender Wink

    Obrigado pelo retorno, os utilizadores do fórum agradecem.

    Abraço

    Conteúdo patrocinado


    [Resolvido]Snipping Tool (Ferramenta de Captura) Empty Re: [Resolvido]Snipping Tool (Ferramenta de Captura)

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 15:08