Имя: Пароль:
1C
1С v8
Объединение pdf в один используя pdftk.exe 1С:Предприятие 8.3 (8.3.4.365)
,
0 Sasha_H
 
11.01.14
17:12
Если есть возможность объединять pdf-файлы с помощью штатных возможностей весьма признателен буду.

А сейчас я делаю такое, для вывода на печать именно в нужной последовательности необходимо объединить файлы, но вот засада у меня:

Ничего не происходит ни одним из методов:

ЗапуститьПриложение(КаталогХранения+"\pdftk.exe 1.pdf 2.pdf cat output x.pdf");
    
    Shell = Новый COMОбъект("WScript.Shell");
    Shell.Exec(КаталогХранения+"\pdftk.exe 1.pdf 2.pdf output collated.pdf ");
    
    Shell.Run(КаталогХранения+"\pdftk.exe 1.pdf 2.pdf output collated.pdf ");

где, КаталогХранения = КаталогВременныхФайлов()+"PrintPDF";

На даный момент база файловая но в реальности необходимо на серверной.  Пробовал методы запускать как на Клиенте так и НаСервере, результат тотже - НИЧЕГО.

С помощью командной строки все работает. Подскажите в чем я ошибся? Никогда не приходилось еще работать с pdf форматами программно.
1 Sasha_H
 
11.01.14
17:32
Через Пуск->Выполнить C:\Users\o.homyak\AppData\Local\Temp\35\PrintPDF\pdftk.exe 1.pdf 2.pdf output collated.pdf

Файл появляется, что же не хватает 1С.

Оговорюсь, что
Shell.Run("AcroRd32.exe /p /h " + ПутьКИзображению)
работает без проблем и идет печать файла.
2 Sasha_H
 
11.01.14
17:52
Сделал обработку и запускаю через обычное приложение эксперементирую разные методы поочередно, без результатов.

МОДУЛЬ:

Перем СтрокаВыполнения;

Процедура ЗапуститьПриложениеНажатие(Элемент)
    
    ЗапуститьПриложение(СтрокаВыполнения);
    
КонецПроцедуры

Процедура ShellRunНажатие(Элемент)
    
    Shell = Новый COMОбъект("WScript.Shell");
    Shell.Run(СтрокаВыполнения);
    
КонецПроцедуры

Процедура КомандаСистемыНажатие(Элемент)
    
    КомандаСистемы(СтрокаВыполнения);
    
КонецПроцедуры


СтрокаВыполнения = "C:\Users\o.homyak\AppData\Local\Temp\35\PrintPDF\pdftk.exe 1.pdf 2.pdf output collated.pdf";
3 Sasha_H
 
11.01.14
18:05
Пробовал на своем компьтере 1С:Предприятие 8.2 (8.2.19.80) просто в предприятии НИЧЕГО... Не понимаю, почему, через командную строку работает тогда?!
4 Sasha_H
 
11.01.14
18:07
Журнал винды чист. Журнал 1С тоже.
5 Sasha_H
 
11.01.14
18:16
Удалось поймать через камтасию окошко :

<a href='http://saveimg.ru/show-image.php?id=ff0ffdb5a1f3705335c2a2d3f844eb5c'>; <img src='http://saveimg.ru/thumbnails/11-01-14/5fd229bb4112d8a35a8d29125061f1f7.jpg' alt='загрузи изображение бесплатно' border='0'> </a>
6 Sasha_H
 
11.01.14
18:18
7 Sasha_H
 
11.01.14
18:19
Не понимаю. Почему программно выходит ошибка открытия pdf, а через командную строку все нормально?
8 Sasha_H
 
11.01.14
19:15
Разобрался:
Файл1 = КаталогХранения+"\1.pdf ";
    Файл2 = КаталогХранения+"\2.pdf ";
    
    ФайлОбъединения = "output "+КаталогХранения+"\collated.pdf";
    
    ЗапуститьПриложение(КаталогХранения+"\pdftk.exe "+Файл1+Файл2+ФайлОбъединения);

Надо было передавать полные пути еще к файлам!!!
9 IamAlexy
 
11.01.14
19:16
напиши как научишся в объединенный файл правильную нумерацию сквозную ставить :)
10 Sasha_H
 
11.01.14
19:24
(9) это ты о чем?
11 IamAlexy
 
11.01.14
20:06
(10) ты объединил 10 файлов ПДФ в один,  а теперь этот один открой и посмотри как у тебя пронумерованы (если пронумерованы) листы :)
12 Sasha_H
 
11.01.14
20:53
Это пофиг. Задача стоит другая вывести на печать сертификаты именно в том порядке как в накладной
13 zulu_mix
 
11.01.14
20:54
(12) а серты в пдф чтоли?
14 Sasha_H
 
11.01.14
20:57
и в пдф и в картинках.
15 zulu_mix
 
11.01.14
21:03
ну сделай им реквизит "порядок" и печатай по порядку
Компьютеры — это как велосипед. Только для нашего сознания. Стив Джобс