MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 03:55

    Bom Dia pessoal.
    Desenvolvi um programa em access para acompanhar a produção em uma empresa.
    Montei um painel em um relatório para mostrar o status hora a hora da produção.
    Me pediram ontem para que esse painel fique aparecendo em uma TV tela grande que tem lá.

    O que pensei em fazer, é exportar esse relatório para um drive onde essa TV está conectada e colocar esse relatório atualizado pelo access hora a hora como proteção te tela.
    Fiz isso, mas o problema é que para configurar como proteção de tela, o relatório precisaria estar em formato de foto e não encontrei forma automatizada de converter esse relatório para foto.

    Já fiz buscas no fórum e não encontrei nenhum tópico que me ajudasse.

    Alguém tem alguma ideia?
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  ahteixeira em 1/8/2019, 04:02

    Olá Marcos Castro,

    Pesquise no fórum por Snapshot e veja se ajuda.

    Abraço
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 06:03

    Olá ahteixeira. Obrigado pela atenção.

    Tentei baixar aqui o Snapshot Viwer, mas consegui agora uma versão, mas creio que é antiga demais.
    Dá erro ao abrir o arquivo em formato .snp.
    Vc teria um link com uma versão mais atualizada?

    Pensando aqui comigo, teria uma forma de através do VBA, alterar o formato no arquivo? Exemplo: PDF para Png ou jpg ?
    Creio que seria também uma solução.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  ahteixeira em 1/8/2019, 08:33

    Olá Marcos,

    Sim é um formato antigo que a microsoft queria implementar como alternativa ao PDF.
    veja mais estes dois:
    https://www.maximoaccess.com/t17802-resolvidogerar-imagem-do-relatorio
    https://www.maximoaccess.com/t29915-criar-ficheiro-snapshot-de-um-relatorio


    Qual a versão do Access que o seu cliente está a usar?

    Abraço
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 09:43

    Boa tarde ahteixeira.
    Meu cliente trabalha com Access para Office 365.
    Até agora não consegui fazer o que eles precisam automaticamente.

    Tentei até utilizar o comando "PrintScreen". O Access até que copia a tela, mas não consigo ainda salvar o arquivo como figura automaticamente.

    Valeu
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  ahteixeira em 1/8/2019, 10:18

    Olá,

    Se pode ser um Print Screen , veja isto:
    https://www.maximoaccess.com/t33535-resolvidoprint-do-form-e-enviar-por-email

    Abraço
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 11:00

    Obrigado pela dica.

    Consegui copiar a tela, mas não consegui salvar em um arquivo tipo figura.

    Estou ainda tentando aqui, mas não estou conseguindo.

    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  ahteixeira em 1/8/2019, 12:51

    Olá Marcos,

    Baixe o exemplo da mensagem nº 14 do link da minha última mensagem e altere o código do botão por este.

    Código:
    Private Sub Command5_Click()
        'By JPaulo ® Maximo Access
        Dim Origem As String, Caminho(4) As String, pula As String, xStr As String
        Dim booFull As Boolean
       
        pula = Chr(10) & Chr(13)
        booFull = Me.EcranTotal
       
        'ampulheta de aguardar
        DoCmd.Hourglass True
       
        'envia o foco para uma caixa de texto para poder esconder o botão
            Me.txtFoco.SetFocus
        'esconde o botão
            Me.Command5.Visible = False
            Me.Repaint
       
        'definir caminho e nome ficheiro
        xStr = CurrentProject.Path & "\tmp_" & Format(Now, "ddmmyyyyhhmmss") & ".jpg"
       
        'salva a imagem
        Call SaveClip2Bit(xStr, booFull)
           
        MsgBox "Concluído, verifique em: " & xStr, vbInformation, ""
        'mostra o botão
            Me.Command5.Visible = True
        DoCmd.Hourglass False
    End Sub

    Abraço
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 13:02

    Opa. Vou testar e te falo.
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 15:52

    Boa tarde.
    ahteixeira muito obrigado pela atenção dada às minhas duvidas.
    Funcionou perfeitamente. Já fiz os testes aqui e ficou melhor do que eu imaginava.
    Amanhã mesmo já coloco para funcionar no cliente.

    Valeu. Grande abraço
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  castrogm em 1/8/2019, 15:54

    Tópico Resolvido. Show
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Re: [Resolvido]Exportar Relatório no formato de figura (png; jpg etc)

    Mensagem  ahteixeira em 1/8/2019, 16:23

    Olá Marcos Castro,

    Fico feliz por ter ajudado!
    Não se esqueça de dar continuidade aos outros dois tópicos que ainda tem abertos.
    Obrigado pelo retorno, o fórum agradece.

    Abraço
    avatar
    willian.faleixo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1
    Registrado : 08/11/2017

    [Resolvido]Exportar Relatório no formato de figura (png; jpg etc) Empty Exportar o relatório access para um slideshow na tv

    Mensagem  willian.faleixo em 7/8/2019, 09:55

    Sou novo no fórum e no access e não sei se posso mandar uma resposta em um tópico resolvido então todavia me desculpe.

    Marcos tenho uma duvida , preciso fazer o mesmo aqui na empresa que trabalho.

    como você criou a rotina para exportar o relatório para a Tv ?  se não for pedir muito poderia compartilhar o BD para eu ter uma noção de como fazer ?


    Agradeço desde já

      Data/hora atual: 13/8/2020, 11:36