有道翻译开放api接口（有道文档翻译功能）

本篇文章给大家谈谈有道翻译开放api接口，以及有道文档翻译功能对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。 今天给各位分享有道翻译开放api接口的知识，其中也会对有道文档翻译功能进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、有道翻译api免费吗
• 2、怎样用百度，有道翻译API开发自己的翻译软件
• 3、有道翻译js逆向更新了
• 4、VB 求 可用的 百度，谷歌，有道，词霸翻译 API代码

有道翻译api免费吗

有道翻译api免费。根据查询相关资料显示：近日，有道翻译正式对外免费开放翻译API，其他任何企业和个人都可以通过简单地添加几行代码，迅速在自己的网站上增加划词翻译、在线词典或者在线翻译等功能，甚至可以通过更灵活地调用数据接口，给自己的网站或应用添加创新的翻译功能服务。给有翻译需求的网站的开发者提供更加专业便捷的英文翻译服务，以及更加流畅的访问体验。

怎样用百度，有道翻译API开发自己的翻译软件

先在百度翻译API接口页面申请接口有道翻译开放api接口的使用。点击申请接入。

进入到申请页面后有道翻译开放api接口，我们按照要求填写好相关内容。因为我们是个人使用，所以选择个人开发者，而且当月翻译字符数200W以下免费，够用有道翻译开放api接口了。

在点击提交申请后，可以看到一些我们需要的信息。这些是我们待会要写代码用到的信息。

点击申请接入成功提示页面下面的接入文档，可以看到详细的使用说明。

通过点击  管理控制台  可以看到很多信息，包括我们刚才申请的信息。

好的，万事具备，只差代码有道翻译开放api接口了。下面把python3的代码贴出来，然后运行下看看效果如何有道翻译开放api接口：

import hashlib

import urllib.request

import json

import random

appid = '20161120000032362'

secretKey = '这里是你申请的密钥'

httpClient = None

myurl = 'http://api.fanyi.baidu.com/api/trans/vip/translate'

q = 'hello'

fromLang = 'en'

toLang = 'zh'

salt = random.randint(32768, 65536)

sign = appid+q+str(salt)+secretKey

m1 = hashlib.md5()

m1.update(sign.encode(encoding='utf-8'))

sign = m1.hexdigest()

myurl = myurl+'?appid='+appid+'q='+urllib.parse.quote(q)+'from='+fromLang+'to='+toLang+'salt='+str(salt)+'sign='+sign

response = urllib.request.urlopen(myurl).read().decode('utf8')

getJson = json.loads(response)

getInfo = getJson['trans_result']

s=getInfo[0]

re=s['dst']

print(re)

7

有道翻译api的过程大同小异，童鞋可以自行研究。我的Linux系统中的命令行翻译工具就是利用有道翻译api和python写的，方便简单。

有道翻译js逆向更新了

更新了。有道翻译js逆向更新了，道高一尺，魔高一丈，网页开发会对API接口请求参数进行加密，来增加爬虫抓取的门槛。为此可以通过js逆向来分析破解加密方式，模拟浏览器发送请求获取接口数据。

VB 求 可用的 百度，谷歌，有道，词霸翻译 API代码

Public Const BAIDU_APP_ID = "XXXX" '百度申请后得到
Public Const BAIDU_APP_KEY = "XXXX" '百度申请后得到
Public Type MD5_CTX
dwNUMa As Long
dwNUMb As Long
Buffer(15) As Byte
cIN(63) As Byte
cDig(15) As Byte
End Type
'-------------------以上放入类模块
Public Declare Function WideCharToMultiByte Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long, ByRef lpMultiByteStr As Any, ByVal cchMultiByte As Long, ByVal lpDefaultChar As String, ByVal lpUsedDefaultChar As Long) As Long
Public Declare Sub MD5Final Lib "advapi32" (lpContext As MD5_CTX)
Public Declare Sub MD5Init Lib "advapi32" (lpContext As MD5_CTX)
Public Declare Sub MD5Update Lib "advapi32" (lpContext As MD5_CTX, ByRef lpBuffer As Any, ByVal BufSize As Long)

Public Function Translate(ByVal Text As String, Optional ByVal Source As String = "auto", Optional ByVal Target As String = "auto", Optional ByVal AppID As String = BAIDU_APP_ID, Optional ByVal Key As String = BAIDU_APP_KEY) As String
Dim XML As Object, stcContext As MD5_CTX, URL As String, PostData As String, Salt As String
Dim Arr() As Byte, I As Long, Result As String
URL = "http://api.fanyi.baidu.com/api/trans/vip/translate"
Randomize
Salt = Replace(Rnd, ".", "")
MD5Init stcContext
PostData = "q=" Text
PostData = PostData "appid=" AppID
PostData = PostData "salt=" Salt
PostData = PostData "from=" Source
PostData = PostData "to=" Target
PostData = PostData "sign="
I = Len(AppID Text Salt Key)
ReDim Arr(I * 3)
I = WideCharToMultiByte(65001, 0, StrPtr(AppID Text Salt Key), I, Arr(0), I * 3 + 1, vbNullString, 0)
If I < 1 Then Exit Function
MD5Update stcContext, Arr(0), I
MD5Final stcContext
For I = 0 To UBound(stcContext.cDig)
PostData = PostData LCase(IIf(stcContext.cDig(I) < 16, "0" Hex(stcContext.cDig(I)), Hex(stcContext.cDig(I))))
Next
Set XML = CreateObject("WinHttp.WinHttpRequest.5.1")
XML.Option(6) = False
XML.Option(4) = 13056
XML.Open "POST", URL
XML.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
XML.SetRequestHeader "Content-Length", LenB(StrConv(PostData, vbFromUnicode))
XML.Send PostData
PostData = XML.ResponseText
Set XML = Nothing
I = InStr(PostData, "error_code")
If I 0 Then
Result = "错误代码:" Mid(PostData, I + 13, InStr(I + 13, PostData, """") - I - 13)
I = InStr(PostData, "error_msg")
Result = Result ",说明:" Mid(PostData, I + 12, InStr(I + 12, PostData, """") - I - 12)
Else
I = 1
PostData = Replace(PostData, "\""", "\'")
Do Until InStr(I, PostData, """dst"":""") = 0
I = InStr(I, PostData, """dst"":""") + 7
Result = IIf(Len(Result) = 0, "", Result vbCrLf) Mid(PostData, I, InStr(I, PostData, """") - I)
Loop
Result = Replace(Result, "\'", """")
ReDim Arr(1)
Do Until InStr(Result, "\u") = 0
I = InStr(Result, "\u")
Result = Replace(Result, Mid(Result, I, 6), ChrW("H" Mid(Result, I + 2, 4)))
Loop
End If
Translate = Result
End Function
调用有道翻译开放api接口：Text1 = Translate("Hello World!")
申请ID和KEY地址有道翻译开放api接口：http://api.fanyi.baidu.com 关于有道翻译开放api接口和有道文档翻译功能的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。 有道翻译开放api接口的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于有道文档翻译功能、有道翻译开放api接口的信息别忘了在本站进行查找喔。

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。