Вывод документов в формате pdf
На страницу 1, 2 След.
|
Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
Xandr Участник со стажем
Вступление в Клуб: 25.11.2009
|
Чт Мар 01, 2012 09:26  Вывод документов в формате pdf |
|
Полезность: Нет оценки
|
Добрый день.
Есть такая проблемка, документы шаблоны которых лежат на сервере в формате .doc, необходимо распечатывать в формате pdf.
Как это возможно сделать средствами ЦФТ? |
|
 |
IBSO Профи
Вступление в Клуб: 20.08.2009
|
Чт Мар 01, 2012 10:00   |
|
Полезность: Нет оценки
|
Открываете документ в Word'e и при сохранении выбираете pdf.
Последний раз редактировалось: IBSO (Чт Мар 01, 2012 17:00), всего редактировалось 1 раз |
|
 |
Random Эксперт
Вступление в Клуб: 27.06.2011
|
Чт Мар 01, 2012 10:03  Re: Вывод документов в формате pdf |
|
Полезность: Нет оценки
|
Xandr пишет: | Добрый день.
Есть такая проблемка, документы шаблоны которых лежат на сервере в формате .doc, необходимо распечатывать в формате pdf.
Как это возможно сделать средствами ЦФТ? |
М... что-то я плохо понял.
Есть операция, запущенная через АРМ Навигатор, которая средствами VB открывает на локальной станции пользователя шаблон документа в виде файла .doc, который лежит на сервере, но сервер подключен как сетевой ресурс, посредством MSWORD заполняет информацию, и вам в результате нужно получить pdf, так?
В этом случае могу порекомендовать сохранить файл из MsWord в формате pdf, 2007 ворд это умеет.
Можно добавить это сохранение в VB-скрипт.
Последний раз редактировалось: Random (Чт Мар 01, 2012 10:05), всего редактировалось 1 раз |
|
 |
Xandr Участник со стажем
Вступление в Клуб: 25.11.2009
|
Чт Мар 01, 2012 10:03   |
|
Полезность: Нет оценки
|
IBSO пишет: | Никак.
Открываете документ в Word'e и при сохранении выбираете pdf. |
К сожалению необходимо чтобы именно в pdf документ уже открывался после формирования из ЦФТ |
|
 |
yaffil Профи
Вступление в Клуб: 18.08.2011
|
Чт Мар 01, 2012 10:05   |
|
Полезность: Нет оценки
|
А в чём сокральный смысл сего действия, если не секрет?
Чтобы понять может есть другой вариант решения, а не pdf. |
|
 |
Random Эксперт
Вступление в Клуб: 27.06.2011
|
Чт Мар 01, 2012 10:07   |
|
Полезность: Нет оценки
|
Xandr пишет: | IBSO пишет: | Никак.
Открываете документ в Word'e и при сохранении выбираете pdf. |
К сожалению необходимо чтобы именно в pdf документ уже открывался после формирования из ЦФТ |
А еще можно после сохранения в виде pdf, открыть его заново с помощью опять же VB CreateObject('AdobeReader.Application') или как-то так  |
|
 |
Random Эксперт
Вступление в Клуб: 27.06.2011
|
Чт Мар 01, 2012 10:08  Re: Вывод документов в формате pdf |
|
Полезность: Нет оценки
|
Xandr пишет: | Добрый день.
Есть такая проблемка, документы шаблоны которых лежат на сервере в формате .doc, необходимо распечатывать в формате pdf.
Как это возможно сделать средствами ЦФТ? |
Еще, помнится, подобная задача решалась с помощью сервера приложений, но как - не могу сказать, разработчик в командировке. |
|
 |
Xandr Участник со стажем
Вступление в Клуб: 25.11.2009
|
Чт Мар 01, 2012 10:12   |
|
Полезность: Нет оценки
|
yaffil пишет: | А в чём сокральный смысл сего действия, если не секрет?
Чтобы понять может есть другой вариант решения, а не pdf. |
Как пример распечатка трудовых договоров из системы. |
|
 |
Xandr Участник со стажем
Вступление в Клуб: 25.11.2009
|
Чт Мар 01, 2012 10:13  Re: Вывод документов в формате pdf |
|
Полезность: Нет оценки
|
Random пишет: | Xandr пишет: | Добрый день.
Есть такая проблемка, документы шаблоны которых лежат на сервере в формате .doc, необходимо распечатывать в формате pdf.
Как это возможно сделать средствами ЦФТ? |
М... что-то я плохо понял.
Есть операция, запущенная через АРМ Навигатор, которая средствами VB открывает на локальной станции пользователя шаблон документа в виде файла .doc, который лежит на сервере, но сервер подключен как сетевой ресурс, посредством MSWORD заполняет информацию, и вам в результате нужно получить pdf, так?
В этом случае могу порекомендовать сохранить файл из MsWord в формате pdf, 2007 ворд это умеет.
Можно добавить это сохранение в VB-скрипт. |
Да, все именно так и происходит. Попробую вариант с сохранением, спасибо. |
|
 |
yaffil Профи
Вступление в Клуб: 18.08.2011
|
Чт Мар 01, 2012 10:15   |
|
Полезность: Нет оценки
|
Xandr пишет: | yaffil пишет: | А в чём сокральный смысл сего действия, если не секрет?
Чтобы понять может есть другой вариант решения, а не pdf. |
Как пример распечатка трудовых договоров из системы. |
И что, чем ворд не устраивает? |
|
 |
Xandr Участник со стажем
Вступление в Клуб: 25.11.2009
|
Чт Мар 01, 2012 10:20   |
|
Полезность: Нет оценки
|
yaffil пишет: | Xandr пишет: | yaffil пишет: | А в чём сокральный смысл сего действия, если не секрет?
Чтобы понять может есть другой вариант решения, а не pdf. |
Как пример распечатка трудовых договоров из системы. |
И что, чем ворд не устраивает? |
Вероятность изменения каких либо параметров в документе. |
|
 |
yaffil Профи
Вступление в Клуб: 18.08.2011
|
Чт Мар 01, 2012 10:24   |
|
Полезность: Нет оценки
|
Xandr пишет: | yaffil пишет: | Xandr пишет: | yaffil пишет: | А в чём сокральный смысл сего действия, если не секрет?
Чтобы понять может есть другой вариант решения, а не pdf. |
Как пример распечатка трудовых договоров из системы. |
И что, чем ворд не устраивает? |
Вероятность изменения каких либо параметров в документе. |
А pdf прям не изменит?
Куча редакторов есть в свободном доступе.
Если вы хотите совсем уж так жёстко, то есть 3 варианта:
1. Наверняка - то вам прямая дорога писать на ORACLE REPORTS.
2. Совсем уж чтобы никак - выплёвывать сразу на принтер после открытия и сразу закрывать документ.
3. Попробовать поработать с защитой документа Ворд (кнопка "Ограничить редактирование). |
|
 |
Alexsey Эксперт
Вступление в Клуб: 06.09.2007
|
Чт Мар 01, 2012 11:54  Re: Вывод документов в формате pdf |
|
Полезность: 3
|
Xandr пишет: | Добрый день.
Есть такая проблемка, документы шаблоны которых лежат на сервере в формате .doc, необходимо распечатывать в формате pdf.
Как это возможно сделать средствами ЦФТ? |
такая возможность существует, но работает ТОЛЬКО на MS OFFICE не ниже 2010
Код: | Public Function Main(LastControl)
On Error Resume Next
if LastControl is OK then
'Создание документа
if not OpenWordDoc( WrdApp, WrdDoc, GetData("REPORTFILE")) then
MsgBox("Невозможно открыть шаблон!")
Main = False
Exit Function
end if
msgbox(Application.Version)
' заолним документ
CreateOrders WrdApp, WrdDoc
'определим версию офиса
ver = CInt(Left(WrdApp.Version, 2))
if ver < 14 then
'выгрузка в MS WORD
Call SetWordVisible(WrdApp,WrdDoc)
else
'выгрузка в PDF, работает только с MS OFFICE 2007 sp2 и выше
'В данном случае работает ТОЛЬКО начиная с версии 2010
WrdDoc.ExportAsFixedFormat "C:\Temp\Зявление на перевод.pdf", 17, true, 0, 0,1, 1, 0, True,True, 0, True, True, False
'Закроем MS WORD и очистим память
If WrdApp <> Empty Then
WrdApp.DisplayAlerts = False
WrdApp.Quit (wdDoNotSaveChanges)
End If
Set WrdApp = nothing
end if
End If
Main = True ' Результирующее значение валидатора (True или False)
End Function |
в примере экспорт с подъемом приложения после экспорта.
есдинственное, что раздражает, так это не открывается несколько окон.
Ну и у меня не получилось динамически получить путь к месту где у пользователя на клиенте есть право хранить файлы.. потому в коед жестко зашито что в темп и имя файла.
либо использовать процедуру Save_Pdf в библиотеке EXCEL
и для WORD используется аналогичная процедура из библиотеки WORD _________________ всегда есть как минимум 2 выхода |
|
 |
dumpino Участник со стажем
Вступление в Клуб: 13.12.2011
|
Чт Мар 01, 2012 13:06   |
|
Полезность: Нет оценки
|
неделю назад тоже столкнулся с этой проблемой. заказчик хотел видеть отчеты на экране в pdf формате.
но после недолгих рассуждений и выяснений, а почему именно pdf, пришли к выводу что WORD совсем не плох, и остановились опять на добром старом word))
причём заказчики были внешними - ПФР, НПФ, так что, попробуйте и этот вариант, ведь задачи программиста не ограничиваются только написанием кода, но и грамотный, удобный подход тоже никто не отменял  |
|
 |
Xandr Участник со стажем
Вступление в Клуб: 25.11.2009
|
Чт Мар 01, 2012 13:36  Re: Вывод документов в формате pdf |
|
Полезность: Нет оценки
|
Alexsey пишет: | Xandr пишет: | Добрый день.
Есть такая проблемка, документы шаблоны которых лежат на сервере в формате .doc, необходимо распечатывать в формате pdf.
Как это возможно сделать средствами ЦФТ? |
такая возможность существует, но работает ТОЛЬКО на MS OFFICE не ниже 2010
Код: | Public Function Main(LastControl)
On Error Resume Next
if LastControl is OK then
'Создание документа
if not OpenWordDoc( WrdApp, WrdDoc, GetData("REPORTFILE")) then
MsgBox("Невозможно открыть шаблон!")
Main = False
Exit Function
end if
msgbox(Application.Version)
' заолним документ
CreateOrders WrdApp, WrdDoc
'определим версию офиса
ver = CInt(Left(WrdApp.Version, 2))
if ver < 14 then
'выгрузка в MS WORD
Call SetWordVisible(WrdApp,WrdDoc)
else
'выгрузка в PDF, работает только с MS OFFICE 2007 sp2 и выше
'В данном случае работает ТОЛЬКО начиная с версии 2010
WrdDoc.ExportAsFixedFormat "C:\Temp\Зявление на перевод.pdf", 17, true, 0, 0,1, 1, 0, True,True, 0, True, True, False
'Закроем MS WORD и очистим память
If WrdApp <> Empty Then
WrdApp.DisplayAlerts = False
WrdApp.Quit (wdDoNotSaveChanges)
End If
Set WrdApp = nothing
end if
End If
Main = True ' Результирующее значение валидатора (True или False)
End Function |
в примере экспорт с подъемом приложения после экспорта.
есдинственное, что раздражает, так это не открывается несколько окон.
Ну и у меня не получилось динамически получить путь к месту где у пользователя на клиенте есть право хранить файлы.. потому в коед жестко зашито что в темп и имя файла.
либо использовать процедуру Save_Pdf в библиотеке EXCEL
и для WORD используется аналогичная процедура из библиотеки WORD |
Огромаднейшее спасибо. Все получилось, работает так как надо было. |
|
 |
|
|
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
|
|