wmic printer list brief > "%userprofile%\Desktop\Printers.txt"
Функция ПолучитьИмяПринтераДляПечати(Вид)
ИмяПринтера="";
принтеры = Новый COMОбъект ("WScript.Network");
prn = принтеры.EnumPrinterConnections();
i = 0;
Если Вид="Чек" тогда
ПроверочнПринтер=ПараметрыСеанса.Користувач.ПринтерЧеков;
Иначе
ПроверочнПринтер=ПараметрыСеанса.Користувач.ПринтерОсновной;
КонецЕсли;
Пока i < prn.Count()-1 Цикл
// НовыйПринтер=ТЗПринтеры.Добавить();
ВремИмяПринтера=prn.Item(i+1);
i = i + 2;
Если Найти(ВремИмяПринтера,ПроверочнПринтер)>0 тогда
ИмяПринтера=ВремИмяПринтера;
Прервать;
КонецЕсли;
КонецЦикла;
Возврат ИмяПринтера;
КонецФункции