Получить принтер по умолчанию из скрипта. #227077


#0 by masky
есть скрипт: On Error Resume Next Set objService = GetObject("winmgmts:{impersonationLevel=impersonate}!\. ootCIMV2") If Err.Number <> 0 Then End If For Each objPrn In objService.ExecQuery("SELECT * FROM Win32_Printer")    If objPrn.Attributes And 4 Then Next как из него получить в переменную 1С этот принтер?
#1 by VasilyKushnir
Может это натолкнет на мыслю Процедура Сформировать Здесь я определяю все доступные для печати принтера.
#2 by masky
эт понятно.. но мне к  сожалению надо именно принтер по умолчанию..
#3 by masky
#4 by Эрнст
процесс WMI работает в асинхронном режиме ?
#5 by masky
а хз.. где посмотреть?
#6 by smaharbA
#7 by smaharbA
к теме -
#8 by masky
спасибо
#9 by VasilyKushnir
В Prn - принтер по умолчанию (вытаскиваешь все до первой запятой).
#10 by masky
прав на реестр нету и никто не даст..
#11 by VasilyKushnir
Так ведь нужно то всего право на чтение.
#12 by smaharbA
есть на это права
#13 by VasilyKushnir
Ребята, а можно я свои 5 копеек вставлю - не хочется отдельную тему открывать. Планируем менять принтера НР1200 (задрали уже). НР1160 дороговат, но с 1С в терминалке очень хорошо дружит. Предлагают НР1018 (у нас в Украине он в 2 раза дешевле НР1160). Кто нибудь может что сказать хорошего об этой железяке? Интерисует работа с 1С под терминалами на 2003 сервере. Локально скорее всего ХР Проф.
#14 by VasilyKushnir
Кстати,  masky, а скрипты в вопроссе ты не на взял? Там же и готовое решение лежит...
#15 by smaharbA
Это таже "лягушка" как и 1100 только в другой обертке, есть и сетевой вариант, если печатать листов 50-100 в день еще подюжит немного, если до полутыши то хана
#16 by Рупор2
#17 by AeDen
ХП - лажа.
#18 by VasilyKushnir
Спасибо. Значит не подходит - в среднем 250-300 листов в день надо. А что, кроме НР можете хорошее (и не слишком дорогое) присоветовать?
Тэги:
Ответить:
Комментарии доступны только авторизированным пользователям

В этой группе 1С