|   |   | 
| 
 | Решение задачи автоматического перевода текста с русского на английский в 1с | ☑ | ||
|---|---|---|---|---|
| 0
    
        Alekzander Wolf 08.11.18✎ 09:59 | 
        Есть ли возможность с минимальными усилиями решить данную задачу. В идеале что-то вроде: 
 ТекстНаАнглийском = ФункцияПеревестиТекст(ТекстНаРусском); | |||
| 1
    
        Волшебник 08.11.18✎ 10:03 | 
        Гугл Транслейт     | |||
| 2
    
        ДенисЧ 08.11.18✎ 10:04 | 
        Гугль и Яндекс в такие дела вбухали миллиарды, а ты хочешь одной функцией в 1с это сделать?     | |||
| 3
    
        Dotoshin 08.11.18✎ 10:08 | 
        (0) Я бы тоже не отказался от такой функции. Как раз недавно была нужна накладная на английском языке.     | |||
| 4
    
        Garikk 08.11.18✎ 10:09 | 
        (3) насколько юридически правильно такие накладные выписывать?     | |||
| 5
    
        Garikk 08.11.18✎ 10:10 | 
        всмысле не по английски, а через переводчик переведенные... выж понимаете что если использовать онлайн-сервисы, то перевод накладной сегодня и через 1 мес может различатся     | |||
| 6
    
        zva 08.11.18✎ 10:11 | 
        Задача из собеседования в aliexpress?
 я буду сзади -> I'll be back | |||
| 7
    
        Dotoshin 08.11.18✎ 10:15 | 
        (4) (5) Вопрос на самом деле не насколько правильно юридически выписывать, а насколько перевод будет соответствовать действительности. Помните байку про погонщика мышей?     | |||
| 8
    
        Garikk 08.11.18✎ 10:17 | 
        (7) ну и это тоже, да.
 хотя будет весело сверять распечатанную накладную с прям точно-такойже вводимой вновь и они будут различатся | |||
| 9
    
        Dotoshin 08.11.18✎ 10:21 | 
        (8) Вот поэтому и пришлось сделать отдельную печатную форму и соорудить регистр с переводами наименований номенклатуры.     | |||
| 10
    
        Alekzander Wolf 08.11.18✎ 10:33 | 
        (9) Можно использовать механизм дополнительных реквизитов.     | |||
| 11
    
        Cyberhawk 08.11.18✎ 10:35 | 
        Яндекс.АПИ в помощь     | |||
| 12
    
        Dotoshin 08.11.18✎ 10:46 | 
        (10) Можно, но не нужно, ибо мне периодически присылают табличку с переводами наименований и закатить ее в регистр штатными средствами три секунды, а с доп.реквизитами тот еще гемор.     | |||
| 13
    
        Alekzander Wolf 08.11.18✎ 10:48 | 
        (11) Можешь код предоставить?     | |||
| 14
    
        Timon1405 08.11.18✎ 10:49 | ||||
| 15
    
        Dotoshin 08.11.18✎ 10:49 | 
        (13) А тебе что вообще переводить-то нужно, если не секрет?     | |||
| 16
    
        Cyberhawk 08.11.18✎ 10:55 | 
        (13) Сколько платишь?     | |||
| 17
    
        seevkik 08.11.18✎ 10:58 | 
        яндекс апи фришный     | |||
| 18
    
        Alekzander Wolf 08.11.18✎ 12:15 | 
        (16) нисколько     | |||
| 19
    
        Cyberhawk 08.11.18✎ 12:17 | 
        На нет и суда, как говорится, нет     | |||
| 20
    
        Alekzander Wolf 09.11.18✎ 07:26 | 
        Функция ПеревестиНаАнглийский(ТекстДляПеревода1)
 ЯзыкИсходногоТекста="ru"; ЯзыкДляПеревода="en"; Ключ = "Ваш ключ"; HTTPСоединение = Новый HTTPСоединение( "translate.yandex.net", // сервер (хост) 443, // порт, по умолчанию для http используется 80, для https 443 , // пользователь для доступа к серверу (если он есть) , // пароль для доступа к серверу (если он есть) , // здесь указывается прокси, если он есть , // таймаут в секундах, 0 или пусто - не устанавливать Новый ЗащищенноеСоединениеOpenSSL(), // защищенное соединение, если используется https Ложь ); ТекстДляПеревода1 = КодироватьСтроку(ТекстДляПеревода1,СпособКодированияСтроки.КодировкаURL); HTTPЗапрос = Новый HTTPЗапрос("/api/v1.5/tr/translate?key="+Ключ+"&text="+ТекстДляПеревода1+"&lang="+ЯзыкИсходногоТекста+"-"+ЯзыкДляПеревода); HTTPОтвет = HTTPСоединение.ОтправитьДляОбработки(HTTPЗапрос); ТекстXML = HTTPОтвет.ПолучитьТелоКакСтроку(); ЧтениеXML = Новый ЧтениеXML(); ЧтениеXML.УстановитьСтроку(ТекстXML); ПостроительДОМ = Новый ПостроительDOM; ДокументДОМ = ПостроительДОМ.Прочитать(ЧтениеXML); ВеткаTranslation = ДокументДОМ.ДочерниеУзлы[0]; Возврат ВеткаTranslation.ТекстовоеСодержимое; КонецФункции | |||
| 21
    
        Alekzander Wolf 09.11.18✎ 07:27 | 
        Вроде работает, если кому нужно     | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |