[RESOLVIDO] Ajuda com PDF

Discussão em 'EMS , HCM e Totvs 11' iniciado por Rogerio, Julho 4, 2014.

Status do Tópico:
Não esta aberto para novas mensagens.
Página 1 de 2
  1. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Galera fiz um relatorio que gera um PDF, porem estou utilizando o comando abaixo para abrir o PDF na tela, mas não abre, alguem saberia me dizer outra forma de fazer isso???

    DOS SILENT START VALUE(cArqTemp).
    Rogerio, Julho 4, 2014
    #1
  2. valdir_fantin

    valdir_fantin Membro Participativo

    Prezado @Rogerio , tenta tirar o start

    DOS SILENT value(cArqTemp).

    Att.
    valdir_fantin, Julho 4, 2014
    #2
  3. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Tambem nao rolou assim!!!!
    Rogerio, Julho 4, 2014
    #3
  4. elmo

    elmo Membro Ativo

    Bom dia @Rogerio ,
    Acho que são perguntas obvias para você que é um programador mas, você já verificou essa variável se contém o caminho correto do arquivo? A maquina que tenta abrir o arquivo PDF possui programa padrão para abrir o arquivo?

    Tenho um relatório aqui e está funcionando com o camando que você utiliza.

    Código:
    if SEARCH ("c:\temp\" + path + ".doc") <> ? then do:
        DOS SILENT start VALUE ("c:\temp\" + path + ".doc").
end.
    elmo, Julho 4, 2014
    #4
    don.junior curtiu isso.
  5. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Então @elmo com o SEARCH ele acha o arquivo, estou tentando abrir esse arquivo que está no ASP da Totvs.... se eu entro pelo Explorer e dou um duplo clique no arquivo ele abre o arquivo PDF pelo Adobe Reader 9... na minha maquina local o programa funciona certinho... será que terei que fazer isso de outra forma?
    Rogerio, Julho 4, 2014
    #5
  6. jaisonantoniazzi

    jaisonantoniazzi Membro Ativo

    Bom dia @Rogerio, tudo bom?
    Não será por que o arquivo está BLOQUEADO por ter sido baixado da internet e o windows está impedindo?
    Teste com outros PDF.

    Ou vá de ShellExecute, acabei de testar, o arquivo 17.pdf ainda está bloqueado pelo Windows, e continua funcionando kkkk

    PROCEDURE ShellExecuteA EXTERNAL "shell32" :
    DEFINE INPUT PARAMETER HWND AS LONG.
    DEFINE INPUT PARAMETER lpOperation AS CHARACTER.
    DEFINE INPUT PARAMETER lpFile AS CHARACTER.
    DEFINE INPUT PARAMETER lpParameters AS CHARACTER.
    DEFINE INPUT PARAMETER lpDirectory AS CHARACTER.
    DEFINE INPUT PARAMETER nShowCmd AS LONG.
    DEFINE RETURN PARAMETER hInstance AS LONG.
    END.

    &SCOPED-DEFINE SHOW_NORMAL 1

    DEFINE VARIABLE instance AS INTEGER NO-UNDO.

    RUN ShellExecuteA ( INPUT 0,
    INPUT 'OPEN',
    INPUT '17.PDF',
    INPUT '',
    INPUT 'C:\Users\jaison.antoniazzi\Downloads\',
    INPUT {&SHOW_NORMAL},
    OUTPUT instance ).    ​

    Grande abraço.
    Jaison Antoniazzi
    jaisonantoniazzi, Julho 4, 2014
    #6
    elmo, don.junior e Rogerio curtiram isso.
Página 1 de 2
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página