Массовая печать документов в папке (больше 15)

Публикация № 1051117

Печать - Пакетная печать

Обработка Печать Массовая печать документов из папки

2
Обработка для массовой печати документов. Так как в системе Windows нельзя одновременно отправить на печать более 15 документов за один раз, то пришлось решать эту задачу с помощью 1С.

Обработка для массовой печати документов. Так как в системе Windows нельзя одновременно отправить на печать более 15 документов за один раз, то пришлось решать эту задачу с помощью 1С.

В моем случае я решал задачу по печати сразу 1000 документов из папки.

Работа проверена на платформе 1С 8.3.13.1513. Но будет работать с любой версией платформы 8.3 Управляемые формы.

Для программистов, задача решена вот так:

            Shell = Новый COMОбъект("Shell.Application");
            Shell.ShellExecute(ИмяФайла, "", "", "print", 0);

Но я сделал всё на мой взгляд красиво, а именно:

1. При выборе папки, система позволяет уточнить тип файла (выбор только из тех, что в указанной папке)

2. Поиск файлов в подкаталогах (по желанию)

3. Сначала заполняется табличная часть с возможностью различной сортировки и дублированием строк.

4. При поиске файлов, автоматически исключаются файлы, которые гарантированно не могут быть напечатаны.

5. В любой момент печати, работу обработки можно прервать сочетанием Ctrl+Break.

6. На печать выводит любой файл, для которого установлена программа просмотра (Если при нажатии на файле правой кнопкой мыши, появляется пункт "Печать" контекстного меню, то обработка его напечатает).

7. Работает в среде Windows И Windows 64.

P.S. В интернете полно решений для таких задач, но всё они для опытных. Я же выкладываю решение для всех, которое не нужно дорабатывать.

2

Скачать файлы

Наименование Файл Версия Размер
Массовая печать документов в папке (больше 15):
.epf 10,54Kb
19.04.19
1
.epf 10,54Kb 1 Скачать

См. также

Специальные предложения

Избранное Подписка Сортировка: Древо
В этой теме еще нет сообщений.
Оставьте свое сообщение