Печать на сервере 1с. DLL для 1С, способная печатать картинки и pdf файлы в серверном контексте (например, при работе веб-сервиса)

4 Comments

1. host_kms 06.05.2018 at 14:54

   Выдает ошибку, вроде все по инструкции сделал
   

   МояОбработка=Новый COMОбъект(«Component1c.MyClassComponent»);
   МояОбработка.PrinterName=»PP8000″;
   МояОбработка.FileName= «D:file.pdf»;
   МояОбработка.PaperHight=100;
   МояОбработка.PaperWight=80;
   Ответ=МояОбработка.PrintPDF();
   

   Reply ↓
2. evgeny43 07.05.2018 at 09:46

   (1) Если все сделано по инструкции, но не работает — то мне известна только 1 причина , из за которой может пойти не так .
   
   в моем случае сервер 1с у меня работает от системной записи , если у вас это не так, то необходимо дать доступ вашей учетной записи виндовс, под которой работает сервер 1с до компоненты. (п.с на некоторых пк адекватно регистрируется компонента без «/codebase», а на некоторых с.. , попробуйте оба варианта).
   
   тут есть 2 варианта :
   
   1) в реестре пробежаться по всем записям сделанным компонентой и вами ( щелкать по ним правой кнопкой мыши , и выбирать меню разрешить доступ и т.д)
   
   2) можно дать учетной записи доступ ко всем компонентам на пк .

   в разделе Component Services/Computers на My Computer клик правой кнопкой, Свойства (Properties)
   
   закладка Безопасность COM (COM Security)
   
   в разделе Права доступа (Access Permissions) нажать Изменить настройки по умолчанию… (Edit Default…), в открывшемся окне добавить для пользователя, под которым запускается служба SQL Server, права Локальный доступ (Local Access)
   
   в разделе Разрешения на запуск и активацию (Launch and Activation Permissions) нажать Изменить настройки по умолчанию… (Edit Default…), в открывшемся окне добавить для пользователя, под которым запускается служба SQL Server, права Локальный запуск, Локальная активация (Local Launch, Local Activation)

   Component Services— служба компонент «Панель управленияВсе элементы панели управленияАдминистрированиеСлужбы компонентов».
   
   И не забудьте дать доступ учетной записи 1с , до физического нахождения ком компоненты ( т.е то место куда вы ее скопировали )

   P.S «/codebase»
   
   до перерегистрации компоненты, не забудьте почистить реестр от ее остатков в ручном режиме, в противном случае есть большая вероятность, что перерегистрация не поможет.

   Reply ↓
3. D@rkM@ster 11.03.2019 at 10:11

   Добрый день, установил компоненту на сервер, проверил работоспособность через внешнюю обработку, все отлично печатало (нужно было реализовать печать SSCC штрихкода для склада WMS). В конфигурацию ничего добавлять не стал, т.к. впереди были выходные.
   
   Но как не печально это не помогло, ночью позвонили со склада, сказали что 1с не доступна. Попробовали подключиться удаленно, сервер не отвечал… Пришлось вызывать системного администратора, у него тоже ничего не получилось сделать на месте, сервер просто при загрузке показывал черный экран и на этом все. В итоге после долгих попыток что-то придумать, пришлось восстанавливать сервер из бэкапа. К сожалению логов после восстановления из бэкапа не осталось.
   
   Можете сделать какое-нибудь предположение почему такое могло произойти и с чем могло быть связано ?

   Reply ↓
4. evgeny43 13.03.2019 at 14:14

   (3)
   
   Здравствуйте. Честно говоря без логов ни чего сказать не могу.
   
   Однако с обработкой скорее всего не связано, т.к у меня так же все установленно для печати с ТСД на принтер этикеток через сервер 1с. Работаем уже 1.5 года на ней . Единственное различие — com соединение создается в общем модуле, а не в обработке.

   вот код в общем модуле для анализа :
   

    //// Печать через HP принтер этикеток с рулоном 10 на 5 см ( 10 ширина , 5 высота)
   КомпонентШК=Неопределено;
   ОбработкаШК=Обработки.итПечатьПроизвольногоШтрихкода.Создать();
   ОбработкаШК.ПодключитьКомпоненту(КомпонентШК);
   Если КомпонентШК=Неопределено тогда
   Сообщить(«Нет компоненты штрихкода»);
   Возврат
   КонецЕсли;
   КомпонентШК.ТипКода=4;
   КомпонентШК.ЗначениеКода=ИдентификаторУпаковки;
   КомпонентШК.Высота=110;
   КомпонентШК.Ширина=400;
   ОбработкаШК.ПроверкаКартинкиПоМинимальнымПараметрам(КомпонентШК);
   Картинка=КомпонентШК.ПолучитьШтрихкод();
   Картинка=новый Картинка(Картинка);
   ВременныйФайл = ПолучитьИмяВременногоФайла(«Jpg»);
   Картинка.Записать(ВременныйФайл);
   ComОбработкаПечати=Новый COMОбъект(«Component1c.MyClassComponent»);
   ComОбработкаПечати.PrinterName=Принтер;
   ComОбработкаПечати.FileName=ВременныйФайл;
   ComОбработкаПечати.LeftField=0;
   ComОбработкаПечати.RightField=0;
   ComОбработкаПечати.UpField=0;
   ComОбработкаПечати.DownField=0;
   ComОбработкаПечати.PaperHight=197;
   ComОбработкаПечати.PaperWight=404;
   ComОбработкаПечати.PixelJpgX=0;
   ComОбработкаПечати.PixelJpgY=0;
   
   Ответ=ComОбработкаПечати.PrintJPG();
   УдалитьФайлы(ВременныйФайл);

   Показать

   Reply ↓