Имя: Пароль:
1C
1С v8
Сменить текущий принтер по умолчанию на другой программно
0 inmortal203
 
29.07.13
12:23
Добрый день! На одном компе стоит принтер этикеток локальный и обычный принтер сетевой. По умолчанию в винде стоит обычный принтер, и все хорошо. Доки из 1С печатаются на обычный принтер. Но... при печати этикеток должен автоматически по умолчанию становиться принтер этикеток. Видимо нужно программно менять принтер по умолчанию во время печати этикетки, но как?

8.2 толстый клиент...
1 inmortal203
 
29.07.13
12:24
ТабДокумент.ИмяПринтера = "Zebra ZM400
такое до фени...
2 Grobik
 
29.07.13
12:28
Printer.Printers — список всех установленных принтеров
Printer.PrinterIndex — текущий принтер
http://msdn.microsoft.com/en-us/library/6y8f2cxk(v=vs.80).aspx
3 inmortal203
 
29.07.13
12:51
ни у кого не завалялось скрипта и как он будет выглядеть в 1С?
4 zmaximka
 
29.07.13
12:56
Список = Новый СписокЗначений;
    #Если Клиент Тогда
        Попытка
            КОМОбъект =  Новый COMОбъект ("WScript.Network");
            Принтеры =  КОМОбъект.EnumPrinterConnections();
            Счетчик = 0;
            Пока Счетчик < Принтеры.Count()-1 Цикл
                Список.Добавить(Принтеры.Item(Счетчик+1), Принтеры.Item(Счетчик+1));
                Счетчик = Счетчик + 2;
            КонецЦикла;
        Исключение
            Сообщить(ОписаниеОшибки());
        КонецПопытки;
    #КонецЕсли
5 zmaximka
 
29.07.13
12:57
Список доступных принтеров
6 inmortal203
 
29.07.13
12:57
Попробую прикрутить
7 inmortal203
 
29.07.13
12:58
осталось только установить принтер по умолчанию
8 ptiz
 
29.07.13
13:00
9 zmaximka
 
29.07.13
13:00
зачем? код из (1) будет работать
10 Torquader
 
30.07.13
00:31
Ещё можно имя опций печати задать и их сохранить вместе с принтером.