Имя: Пароль:
1C
 
1c 8.2 УТ 10.3 Прямая печать на принтер в реализации товаров и услуг
0 Arsenprog
 
10.02.18
11:03
Получаю принтер по умолчанию
Функция ПолучитьПринтерПоУмолчанию() Экспорт        
    
Скрипт = Новый ComObject("MSScriptControl.ScriptControl");
Скрипт.Language = "vbscript";                
Скрипт.AddCode("
|Function GetDefaultPrinter()
|GetDefaultPrinter=vbNullString
|Set objWMIService=GetObject(""winmgmts:"" _
|& ""{impersonationLevel=impersonate}!\\.\root\cimv2"")
|Set colInstalledPrinters=objWMIService.ExecQuery _
|(""Select * from Win32_Printer"")
|For Each objPrinter in colInstalledPrinters
|If objPrinter.Attributes and 4 Then
|GetDefaultPrinter=objPrinter.Name
|Exit For
|End If
|Next
|End Function");
                                  
Возврат СокрЛП(Скрипт.run("GetDefaultPrinter"));
                                          
КонецФункции



Процедура ЗаписатьСразуНаПечать(Кнопка)

// Что тут прописать чтобы на прямую на притер отправить печать !

КонецПроцедуры
1 Sj
 
10.02.18
16:27
...

Пункт 2. Вывод документа на печать в 1С

Последним пунктом является вывод полученного документа на экран или принтер. В типовых конфигурациях для этого используется типовая процедура (в каждой может быть своя), например, УниверсальныеМеханизмы.НапечататьДокумент().

В других случаях можно просто использовать типовые функции объекта ТабличныйДокумент: ТабДок.Показать() или ТабДок.Напечатать().
2 Arsenprog
 
10.02.18
17:04
(1)Все верно  так и идет
УниверсальныеМеханизмы.НапечататьДокумент().
но как именно отправить прямую печать без выборки принтеров
само имя принтера у меня хранится ПолучитьПринтерПоУмолчанию()
как отправить прямо на печать !?