×
Linguagem de Programação ADVPL
Perguntas TMSPrinter
- lucas.lima
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 9
- Obrigados Recebidos: 0
10 anos 1 mês atrás #25812
por lucas.lima
TMSPrinter foi criado por lucas.lima
Boa tarde,
Alguém tem algum exemplo de como utilizar o método SaveAsOdf do TMSPrinter pra salvar em um formato que é possível abrir no excel.
Estou utilizando como abaixo mas não salva nem na pasta local da rede nem na system. Só retorna .F. no lSend.
If nSalva == 1
cFileODF := "j:\lucasl\rfin019_"+AllTrim(DtoS(Date()))+".odf"
//cFileODF := "/tabelas_lucas/rfin019_"+AllTrim(DtoS(Date()))+".odf"
lSend := oPrint:SaveAsODF( cFileODF, {1,nPag} )
If lSend
MsgAlert("Atenção","Salvo com sucesso.")
EndIf
EndIf
Alguém tem algum exemplo de como utilizar o método SaveAsOdf do TMSPrinter pra salvar em um formato que é possível abrir no excel.
Estou utilizando como abaixo mas não salva nem na pasta local da rede nem na system. Só retorna .F. no lSend.
If nSalva == 1
cFileODF := "j:\lucasl\rfin019_"+AllTrim(DtoS(Date()))+".odf"
//cFileODF := "/tabelas_lucas/rfin019_"+AllTrim(DtoS(Date()))+".odf"
lSend := oPrint:SaveAsODF( cFileODF, {1,nPag} )
If lSend
MsgAlert("Atenção","Salvo com sucesso.")
EndIf
EndIf
Por favor Acessar ou Registrar para participar da conversa.
Tempo para a criação da página:0.106 segundos