Получить список принтеров и текущее состояние его

Форум Программирование Общие вопросы программирования (Dev)

Платформа 1С v8.3 1С

1. SeverBaP 5 18.11.19 16:57 Сейчас в теме

Необходимо получить список принтеров подключенных к ПК у пользователя и определить возможность печати на нем. Суть в том чтобы по возможности перенаправлять печать документов на принтеры которые сейчас могут печатать, а не повисли или его вообще выключили.
На просторах интернета набрел на вот такое:

Функция ПолучитьСписокПринтеровПКПоПользователю()
	МассивПринтеров = Новый Массив;
	Попытка
		Locator     = Новый COMОбъект("WbemScripting.SWbemLocator");    
		ServicesSet = Locator.ConnectServer(".");
		ObjectSet   = ServicesSet.InstancesOf("Win32_Printer");
		Для каждого Item Из ObjectSet Цикл
			
			МассивПринтеров.Добавить(СокрЛП(Item.Caption));
			
		КонецЦикла;
		
	Исключение
	КонецПопытки;
	Возврат МассивПринтеров; 
КонецФункции

Показать

Тут все вроде просто получили просто весь список принтеров. А дальше когда необходимо распечатать табличный документ (к примеру) прописываем что-то в этом роде:

		Результат.ИмяПринтера = МассивПринтеров[0];
		Результат.напечатать();

Соответственно теперь в получение списка принтеров необходимо добавить отбор по статусу/состоянию принтера ...
Вроде если просматривать список атрибутов COM-Объекта можно найти свойство "PrinterStatus" которое имеет числовое значение, какие значение брать для отбора мне не понятно. Кто знает какие значения отбирать для получения принтера на котором сейчас можно печатать?

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. pvl_mksv 20 22.10.21 12:23 Сейчас в теме

https://docs.microsoft.com/ru-ru/windows/win32/cimwin32prov/win32-printer

Оставьте свое сообщение

E-mail: