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


Обработка для массовой печати документов. Так как в системе 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. В интернете полно решений для таких задач, но всё они для опытных. Я же выкладываю решение для всех, которое не нужно дорабатывать.

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *