Пример обработки на УФ для 1С8.2 для перевода текста с использованием Google translate
Скачать файл
ВНИМАНИЕ:
Файлы из Базы знаний - это исходный код разработки.
Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы.
Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных.
Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Веб-портал обеспечивает удобный доступ к конфигурации 1С:ITIL(ИТИЛ), 1С:ITILIUM, Управление IT-отделом 8 через интернет с любого устройства посредством браузера, увеличивая эффективность работы пользователей и снижая нагрузку на сервер. Быстрая инсталляция портала за пару часов, удобный и интуитивно понятный интерфейс и безопасность данных помогут упростить работу с порталом и ускорить выполнение бизнес-процессов компании.
Модуль "Подсистема интеграции AmoCRM с 1С" позволяет обеспечить единое информационное пространство, в котором пользователи могут эффективно управлять клиентской базой, следить за статусами сделок и поддерживать актуальность данных как в AmoCRM, так и в 1С.
Онлайн-заказ - это решение для автоматизации процесса оформления заказов на сайте в торговых организациях. Продукт обеспечивает легкое взаимодействие между компанией и клиентами через веб-интерфейс, интегрированный с 1С:Предприятие. Система позволяет снизить операционные расходы, повысить лояльность клиентов и оптимизировать работу отдела продаж.
Модуль "Экспортер" — это расширение для 1С, предназначенное для автоматизации процессов выгрузки данных. Оно позволяет эффективно извлекать, преобразовывать и передавать данные из систем 1С в интеграционную платформу Spot2D. Подсистема упрощает настройку, снижает количество ручных операций и обеспечивает удобный контроль данных.
Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM разных брендов в одной информационной базе в ручном и автоматическом режиме.
Расширение значительно упрощает написание API на 1С. Веб программисты получают простой и понятный доступ к 1С. Описание API создаётся автоматически и представляется в виде удобном как для человека, так и для программной обработки.
Модуль интеграции 1С с OpenCart 2.x, 3x позволяет обмениваться данными между OpenCart (самая популярная бесплатная cms для интернет-магазинов) и 1С:Предприятие 8.
Отличная вещь. Спасибо. Но есть одна проблемка: на одной машине с Win2008 Server перевод получаем в таком роде "????????? - ???????????????? ?????????? ?? ????????????? ?????????????? ????? ? ??????????." Я так понимаю проблема с кодировкой?
//Функция получения перевода текста с помощью сервиса Yandex Translate
//https://translate.yandex.net/api/v1.5/tr/translate?key=trnsl.1.1.20181028T164555Z.a9607b69d6eb723d.cfd831d41c39bddeccaf644fed8916778f1ef971&text=people&lang=en-ru
//{key} - ключ со страницы ;
//{text} - исходный текст для перевода;
//{lang} - язык исходного текста и язык, в который будет выполнен перевод;
//Ответ приходит в виде строки XML. Пример ответа:
//<?xml version="1.0" encoding="utf-8"?>
//<Translation code="200" lang="en-ru"><text>люди</text></Translation>
&НаСервере
Функция ПолучитьПеревод(Знач ИсходноеСлово, ЯзыкИсходногоТекста="ru", ЯзыкДляПеревода="en")
Ключ = "trnsl.1.1.20181028T164555Z.a9607b69d6eb723d.cfd831d41c39bddeccaf644fed8916778f1ef971";
Соединение = Новый HTTPСоединение(
"translate.yandex.net", // сервер (хост)
443, // порт, по умолчанию для http используется 80, для https 443
, // пользователь для доступа к серверу (если он есть)
, // пароль для доступа к серверу (если он есть)
, // здесь указывается прокси, если он есть
, // таймаут в секундах, 0 или пусто - не устанавливать
Новый ЗащищенноеСоединениеOpenSSL(), // защищенное соединение, если используется https
Ложь
);
ИсходноеСлово = КодироватьСтроку(ИсходноеСлово,СпособКодированияСтроки.КодировкаURL);
Запрос = Новый HTTPЗапрос("/api/v1.5/tr/translate?key="+Ключ+"1&text="+ИсходноеСлово+"&lang="+ЯзыкИсходногоТекста+"-"+ЯзыкДляПеревода);
Результат = Соединение.Получить(Запрос);
ТекстXML = Результат.ПолучитьТелоКакСтроку();
ЧтениеXML = Новый ЧтениеXML();
ЧтениеXML.УстановитьСтроку(ТекстXML);
ПостроительДОМ = Новый ПостроительDOM;
ДокументДОМ = ПостроительДОМ.Прочитать(ЧтениеXML);
ВеткаTranslation = ДокументДОМ.ДочерниеУзлы[0];
Возврат ВеткаTranslation.ТекстовоеСодержимое;
КонецФункции // ПолучитьПеревод()
