Переводчик

← →
Drowsy © (2016-03-15 14:11) [0]

Есть какой нибудь переводчик текстовых файлов с одного языка на другой. Чтобы из командной строки запускать с входящим параметром - имя исходного файла и переведённый файл на выходе?

← →
эндсоувот © (2016-03-15 14:35) [1]

яндекс переводчик.
апи опубликовано. апи ключ бесплатный.
берем powershell, vbs, etc, через параметры принимаем имя входного файла, читаем содержимое, формируем post запрос, получаем ответ, сохраняем в файл.

← →
Drowsy © (2016-03-15 15:07) [2]

> эндсоувот © (15.03.16 14:35) [1]

спасибо. пока ничего не понимаю из совета, но за направление спасибо, буду поискать..

← →
эндсоувот © (2016-03-15 15:08) [3]

translate.vbs

dim key : key = "trnsl.1.1.20160315T113859Z.e5da621f9cb47012.70606fe5da1569ba2843c981a425502d280 178ba" dim cText : cText = "I have two eyes and I can see a book, a pen in front of me" dim lang : lang = "en-ru" MsgBox(translate(cText, "en-ru")) public function translate(AText, ALang) dim url : url = "https://translate.yandex.net/api/v1.5/tr/translate?key=" & key url = url & "&text=" & AText & "&lang=" & ALang dim xdom : set xdom = CreateObject("MSXML2.DOMDocument") xdom.async = false if xdom.load(url) then call xdom.save("answer.xml") translate = get_xpath_value(xdom,"//text") end if set xdom = nothing end function function get_xpath_value(ByVal ANode, ByVal AXPathExpr) get_xpath_value = "" if not (ANode is nothing) then dim inode : set inode = ANode.selectSingleNode(AXPathExpr) if not (inode is nothing) then if (inode.nodeType = 2) then get_xpath_value = inode.nodeValue else get_xpath_value = inode.Text end if end if end if end function

из ключа убрать пробел. форматер вставил

Переводчик Найти похожие ветки