1С Печать PDF
По теме из базы знаний
Ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
(1)Рас уж задал вопрос, отвечу сам. Может кому пригодится.
1) Можно распечатать посредствам установленных программ:foxit reader, adobe acrobat reader или других для работы с pdf файлами
С помощью программы по умолчанию.
Shell = Новый COMОбъект("Shell.Application");
Shell.ShellExecute(ПутьКФайлу, "", "", "print", 1);
Или указать программу
AdobeReader = Новый Файл("C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe");
ЗапуститьПриложение("""" + AdobeReader.ПолноеИмя + """ /o /t """ + ФайлPDF.ПолноеИмя + """ """ + ИмяПринтера + """");
Параметры
/0 -- Не открывать диалоговое окно приложения
/t Распечатать файл на указанном принтере. Можно без этого параметра, тогда будет принтер по умолчанию.
2) Придумал способ только с сохранением в файл затем печатью через внешнюю программу. В моей ситуации проще хранить в каталоге на диске, чем в внешних файлах 1с
3) Не нашел решению. Буду использовать файлы с 1 страницей
(1)
1) Можно распечатать посредствам установленных программ:foxit reader, adobe acrobat reader или других для работы с pdf файлами
С помощью программы по умолчанию.
Shell = Новый COMОбъект("Shell.Application");
Shell.ShellExecute(ПутьКФайлу, "", "", "print", 1);
Или указать программу
AdobeReader = Новый Файл("C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe");
ЗапуститьПриложение("""" + AdobeReader.ПолноеИмя + """ /o /t """ + ФайлPDF.ПолноеИмя + """ """ + ИмяПринтера + """");
Параметры
/0 -- Не открывать диалоговое окно приложения
/t Распечатать файл на указанном принтере. Можно без этого параметра, тогда будет принтер по умолчанию.
2) Придумал способ только с сохранением в файл затем печатью через внешнюю программу. В моей ситуации проще хранить в каталоге на диске, чем в внешних файлах 1с
3) Не нашел решению. Буду использовать файлы с 1 страницей
(1)
(5) какой вопрос такой ответ.
Зачем программисту 1С такой геморрой?
Идите в эникейщики там такие вопросы решают как зоопарки скриптами запускать.
Правильно поставленный вопрос уже половина решения.
Как на уровне ОС работать с такими файлами?
Как уже написали, чем ком, через запуск командной строки, частный случай запустить приложение.
Через скрипты частный случай пауершел.
Только это все прослойки и требуют спец знаний в этих областях! Такие вопросы решают сисадмины.
Зачем программисту 1С такой геморрой?
Идите в эникейщики там такие вопросы решают как зоопарки скриптами запускать.
Правильно поставленный вопрос уже половина решения.
Как на уровне ОС работать с такими файлами?
Как уже написали, чем ком, через запуск командной строки, частный случай запустить приложение.
Через скрипты частный случай пауершел.
Только это все прослойки и требуют спец знаний в этих областях! Такие вопросы решают сисадмины.
(8)Обратился к сисадмину он мне выдал код.
Я его адаптировал к 1С
Всех делов ;)
pdftoprinter "D:\1.pdf" "HP Color LaserJet 5550"
Я его адаптировал к 1С
СтрокаКоманды = "pdftoprinter.exe """ +ИмяФайла + """ ""RICOH SP 220Nw DDST""";
ЗапуститьПриложение(СтрокаКоманды, "C:\Windows\System32\",Истина, КодВозврата);
Всех делов ;)