Вывод документов в формате 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 |
Огромаднейшее спасибо. Все получилось, работает так как надо было. |
|
|
|
|
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
|
|
О проекте
Поиск
Отзывы
Регистрация
Вход
