Попытка
Items=ServiceSet.ExecQuery("Select * from Win32_Printer");
Исключение
Сообщить(ОписаниеОшибки());
Отказ=Истина;
возврат;
КонецПопытки;
Принтеры.Очистить();
для каждого стр из Items Цикл
новстр=Принтеры.Добавить();
новстр.ПоУмолчанию = стр.Default;
если новстр.ПоУмолчанию Тогда
ИмяПринтера= стр.Name;
ПринтерПоУмолчанию=ИмяПринтера;
КонецЕсли;
новстр.Имя = стр.Name;
новстр.Состояние=СписокСостояний[стр.PrinterStatus%8];
новстр.Комментарий=стр.Comment;
новстр.Описание=стр.Description;
новстр.ИмяПорта=стр.PortName;
КонецЦикла;