Печать файлов (картинок) из 1с 77 программно #247112

Собственно суть такая, есть необходимость печатать файлы картинок (сертификаты к продукции), пути прописаны в подчиненном справочнике. Как программно (по кнопке печать сертификатов) из накладной отправлять на печать файли из, скажем, списка значений (с путями)? Какие есть соображения?

Имхо, использовать внешние приложения (графич. редакторы).... ЗЫ: В каком формате картинки ?

зачем ?

+ КомандаСистемы(....) --- Хотя сам буду скоро делать думаю либо через Word, либо через Таблицу, т.к. нужно будет печатать по несколько картинок на лист + двухсторонняя печать :(

infranview, word

Всё храню в *.pdf  и распечатываю с помощью командной строки самого ридера ... ЗЫ: если нужно несколько файлов печнуть, объединяю их в один, и его печатаю..

а с двух сторон можно? У принтера есть дуплексер

А почему нет ?

+7 делаешь 2 принтера на одно устройство, один простой, другой с включенным дуплексом и печатаешь..

А поподробнее можно? Или ссылку...

Подробнее про что ?  ...

сорьки, стормозил. Уже все получилось

Да схему по подробнее можно, то есть кидаешь все картинки по ссылкам, скажем в ворд(а его как внешнее приложение цепляешь), а потом этот док печатаешь, так? а то была попытка сделать это с помощью КомандаСистемы, так ниче кроме текста распечатать не получилось (принтер JetDirect)

Для *pdf, например, так: вместо последнего "" можешь указать путь к принтёру и порт...

Ёпрст2 Он создает новый файл, а мне надо чтобы он открывал сушествующие *.jpg, где посмотреть инфу по ключам запуска, к примеру, того же фотошопа? /p это что? (значение этого ключа) Порт при нтера говоришь, вот у меня jetDirect принтер, подключен как локальный с созданем нового порта TCP/IP, порт такой в системе IP_192.168.1.133, его и писать?

Да и еще, кто может написать примерный текст, как это через word сделать? Ворд = СоздатьОбъект("Application.Word"), а дальше? То есть бывает такое что накладная из 100 позиций состоит, на каждую позицию от 3 до 5 сопроводительных документов, надо все упорядоченно выводить на принтер (сетевой)...как оптимально сделать?

СоздатьОбъект("InternetExplorer.Application"); но и с вордом не сложно...

Я тебе написал как напечатать *.pdf ... для *.jpg используй другой софт, со своими ключами запуска..

smaharbA, а примерно текст можно? :) Ёпрст2, понял спасибо!

Ёпрст2, но он все равно создает новый файл с именем, которое в преременной ИмяФайла, а не открывает существующий..

Полный текст строки запуска показывай.

Ёпрст2, а все понял, сорри :) ...+КаталогПользователя.... Но, на принтер не правит :(

дык эта, с помощью таблицы можна как раз похожая задача была давно уже сканировали сертификаты в jpeg в отдельную папку и цепляли их из 1с, в которой была таблица-шаблон (их несколько было, в зависимости от того, что печатали)

Тебе правильно намекнули - через таблицу. Хочешь - скину, свою обработку. Все сертификаты у меня в Bmp формате черно-белые - меньше размер чем у jpg и зархивированны зипом. В папке сертификатов подпапка - код товара, номер архива  - код серии. Плюс регистр выданных сертификатов. При печати сертификатов из расходной вывождится ТЗ с перечнем всех серий из документа, те, серии серттификаты на которые раннее не выдавались данному покупателю, помечены псисой - печатать. Затем пробегаю по всем отмеченным и загоняю в таблицу.

Да в каждом архиве м.б. несколько файлов: собственно сертификат, паспорт и т.п.

VasilyKushnir, было бы неплохо :) про таблицы и  сам думал...

Имхо, не делай так никогда, очень тормозной метод ...если файла много - забодаешься распечатывать...

Ёпрст2, да файла много, ну а с использованием ЗапустиьПриложение думаешь быстрее будет? Как я писал, на принтер не шлет (по порту)

Можно и без временного файла... Можно и все сразу файлы закинуть, но если преемлемо использование Ворд, то все будет не быстро, а очень быстро...

+ ИЕ (и иже с ним) один из первейших инструментариев адинеснега

smaharbA, спасибо... Ворд приемлем, то есть с вордом быстрее буит? А кто мне скажет,где мне взять инфу по методам Application.Word Excel InternetExplorer  и т.д.? а то ИЕ.ReadyState мне мало о чем говорит (сорри за ламство)

печать это ИЕ.ExecWB(6,2) ?!

Да, но там обязательно пауза после комманды...

smaharbA Так, уже кое что получилось :) но если ты говоришь что с вордом самое быстрое, а мне именно это и надо, повторю, в среднем 100 позиций в накладной, а у каждой позици от 3-х до 5и сертификатов, то мне нада синтаксис обращения с Application.Word, есть где взять?

блин, почему по 4 раза поститься?!??!?!

в справке ворда, кстати объект зовется Word.Application Тебе потребуется Shapes, а лучче даже InlineShapes

Акуеть!!! Пачка бумаги на одну накладную!!!

Да бумаги много уходит :) smaharbA, what is Shapes (InlineShapes)?

Это объекты ворда, почитай справку, могу пример дать попозже

это как сделать (у меня проблем вроде не было на тогдашнем "серваке" пеньке 2.4 ГГЦ в скульной версии 1с, причем сканы лежали все на том же серваке, никто на скорость не жаловался). к сожалению с этим клиентом давно не работаю, так что исходников нету, а так схему объяснил

smaharbA, пример было бы неплохо :)

maksik Ну да схема ясна тенкс, буду пробовать разные варианты :) Ёпрст2 спасиба!

Только в справке ИЕ не нашел даже метод ИЕ.ExecWB(6,2) :(

В ворде все можешь найти, и даже методы почти всех объектов системы... В редакторе басика , какие объекты надо - добавляешь на форму и ctrl+F2

smaharbA Ну пример то мне ждать?!