× Linguagem de Programação ADVPL

Perguntas TMSPRINTER ou FWMSPRINTER por email.

Mais
11 anos 9 meses atrás #10728 por fkuhn
Pessoal,
Gostaria de saber se alguém teria alguma solução para envio de relatórios feitos por essas duas classes por email, sem que o usuário tenha que salvar em pdf e depois enviar,
Assim como nos relatórios do tReport

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 9 meses atrás #10739 por lalberto
Senão me engano esta função funciona para os dois objetos.

cJPEG := Iif(Empty(cNota),CriaTrab(,.f.),cNota)
oPrint:SaveAllAsJPEG(cStartPath+cJPEG,1000,1400,140)

ai vc pega o arquivo salvo e envia por email em anexo.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 9 meses atrás #10740 por fkuhn
Respondido por fkuhn no tópico TMSPRINTER ou FWMSPRINTER por email.
Então Luiz, como sempre ajudando, obrigado mesmo
Pensei em salvar em JPG, só que a logo mesmo em BMP não é impressa

Ai pensei em usar a TWMsPrinter,
Pensando que poderia aproveitar o relatorio que estava em TMSPrinter, só que nao deu muito certo não, rs
Se usar a segunda opção terei que fazer ele todo novamente, mas acho que enviar em pdf seria mais interessante.

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 9 meses atrás #10741 por emanager
Usei a classe FwMSPrinter ( tdn.totvs.com/display/public/mp/FWMsPrinter )

cCaminho := "\spool\"
FErase( cCaminho+cFile+".pdf" )

oPrn := FwMSPrinter():New( cFile, IMP_PDF , .F. , cCaminho, .T., , , , , .F., ,.F. )
oPrn:cPathPDF := cCaminho
:
: // montagem do relatorio
:
oPrn:Print() //cria o pdf

e depois é como disse o Luiz Aberto: ai vc pega o arquivo salvo e envia por email em anexo.

Paulo Oliveira.

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 9 meses atrás #27051 por Mjuniorfacic
Boa tarde Paulo,

E se alem de criar o arquivo PDF eu precisa-se mostrar na tela, como faria?
Ja usei o oPrinter:Preview() e nao demonstrou

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.082 segundos
Joomla templates by a4joomla