Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
Kana707 Участник
Вступление в Клуб: 18.04.2019
|
Ср Янв 15, 2020 08:49  [WORD].Save_Pdf и [EXCEL].Save_Pdf |
|
Полезность: Нет оценки
|
Всем привет.
Столкнулся с задачей сохранением файлов *.docx или *.xlsx в формат *.pdf. Нашел на форуме пример, что это можно сделать через пакет [WORD] или [EXCEL] с помощью процедуры Save_Pdf. Позже выяснилось, что у нас нет такой процедуры в пакетах.
Кому не трудно можете выслать файл пакета или текст процедуры.
Буду очень благодарен. |
|
|
markoff Участник - экстремал
Вступление в Клуб: 09.06.2009
|
Ср Янв 15, 2020 09:57   |
|
Полезность: Нет оценки
|
Код: | [EXCEL].CMD('book.ExportAsFixedFormat xlTypePDF, "'||v_path||v_filename||'"'); |
|
|
|
Kana707 Участник
Вступление в Клуб: 18.04.2019
|
Ср Янв 15, 2020 10:48   |
|
Полезность: Нет оценки
|
markoff пишет: | Код: | [EXCEL].CMD('book.ExportAsFixedFormat xlTypePDF, "'||v_path||v_filename||'"'); |
|
Ждал как минимум больше одной строчки кода
Вот спасибо! |
|
|
markoff Участник - экстремал
Вступление в Клуб: 09.06.2009
|
Ср Янв 15, 2020 11:01   |
|
Полезность: Нет оценки
|
Kana707 пишет: | markoff пишет: | Код: | [EXCEL].CMD('book.ExportAsFixedFormat xlTypePDF, "'||v_path||v_filename||'"'); |
|
Ждал как минимум больше одной строчки кода
Вот спасибо! |
В самом конце когда формируете excel файл в место
[EXCEL].Save_As указываете строчку что я Вам написал.
P.S. Save_Pdf у нас тоже ее нет. |
|
|
markoff Участник - экстремал
Вступление в Клуб: 09.06.2009
|
Ср Янв 15, 2020 11:04   |
|
Полезность: Нет оценки
|
Сделайте поиск на сайте по слову ExportAsFixedFormat найдете примеры и для Word |
|
|
Kana707 Участник
Вступление в Клуб: 18.04.2019
|
Ср Янв 15, 2020 11:21   |
|
Полезность: Нет оценки
|
самый первый ответ, сразу меня удовлетворил)))
markoff спасибо за подробный комментарий |
|
|
Volod Эксперт
Вступление в Клуб: 19.09.2007
|
Ср Янв 15, 2020 12:21   |
|
Полезность: Нет оценки
|
Мне кажется, если поискать в операциях "pdf" - будет много примеров. |
|
|
Kana707 Участник
Вступление в Клуб: 18.04.2019
|
Чт Янв 16, 2020 06:34   |
|
Полезность: 2
|
Хотел поделится решением, который реализовал:
Код: |
'Проверка
--Вызов процедуры
v_HTML_FileName :=v_LocalPath||vc_ftpFile;
v_PDF_FileName := substr(v_HTML_FileName, 1, length(v_HTML_FileName)-5) || '.pdf';
[CSMD].Command(V_DEST_STR,'WordToPdf "'||v_HTML_FileName||'","'||v_PDF_FileName||'"');
'Клиент-скрипт
Public Sub ExcelToPdf(sFrom, sTo)
Set excel = CreateObject("Excel.Application")
excel.ScreenUpdating = false
excel.DisplayAlerts = false
Set workbook = excel.Workbooks.Open(sFrom)
workbook.ExportAsFixedFormat 0, sTo
workbook.Close()
excel.Quit()
Set workbook = Nothing
Set excel = Nothing
End Sub
Public Sub WordToPdf(sFrom, sTo)
Set word = CreateObject("Word.Application")
Set doc = word.Documents.Open(sFrom)
doc.Activate()
doc.SaveAs2 sTo, 17
doc.Close()
word.Quit()
Set doc= Nothing
Set word = Nothing
End Sub |
|
|
|
DrooiD Участник
Вступление в Клуб: 30.11.2023
|
Пт Дек 01, 2023 10:16   |
|
Полезность: Нет оценки
|
Коллеги, добрый день.
Занимаюсь сейчас аналогичной задачей - надо blob excelword сохранить как pdf.
Поступили рекомендации от старших товарищей не реализовывать с использованием сервера отчётов, т.к. в DBI он работать не будет.
Пробовал искать другие решения, но к успеху не пришёл.
Может кто-нибудь уже решал подобную задачу и сможет подсказать? |
|
|
Псевдоним123 Участник - экстремал
Вступление в Клуб: 05.06.2018
|
Пн Янв 15, 2024 13:35   |
|
Полезность: Нет оценки
|
DrooiD пишет: | Коллеги, добрый день.
Занимаюсь сейчас аналогичной задачей - надо blob excelword сохранить как pdf.
Поступили рекомендации от старших товарищей не реализовывать с использованием сервера отчётов, т.к. в DBI он работать не будет.
Пробовал искать другие решения, но к успеху не пришёл.
Может кто-нибудь уже решал подобную задачу и сможет подсказать? |
добрый день.
получилось узнать как это сделать? |
|
|
|