VBA调用百度OCR识别图片中的文字，英文能识别，中文乱码

chenjyjustin · 发表于 2018-1-26 22:21

使用方法：

用QQ截图这张图片，
然后在代码页面执行：CommandOCR_Click()

识别结果：
Oh!I see you!
ä¸oä»ä1
百度OCR返回的Json：
{"log_id": 6364828412917695569, "words_result_num": 2, "words_result": [{"words": "Oh!I see you!"}, {"words": "??o????1?"}]}

chenjyjustin · 发表于 2018-1-26 22:26

以下文件是调用百度OCR的源码

chenjyjustin · 发表于 2018-1-26 22:59

源码中有一些杂七杂八的代码不相关，请忽略。
以下是百度通用文字识别API说明
https://cloud.baidu.com/doc/OCR/ ... 7.E8.AF.86.E5.88.AB

chenjyjustin · 发表于 2018-1-29 18:21

参考了本站的一系列帖子，找到了解决办法：
http://club.excelhome.net/thread-1076257-1-1.html
http://blog.sina.com.cn/s/blog_979d1c9f0101llld.html
最终的解决办法是：
使用MSXML2.XMLHttp对象，并对POST内容进行UTF-8编码

chenjyjustin · 发表于 2018-2-8 19:57

修改后能执行的文件

horizon2 · 发表于 2018-2-27 11:14

d:\wenti.jpg
我是64为的，将函数申明改为“Private Declare PtrSafe Function”，执行到这里报错了。
请问那里有问题呀？

chenjyjustin · 发表于 2018-3-9 19:14

horizon2 发表于 2018-2-27 11:14
我是64为的，将函数申明改为“Private Declare PtrSafe Function”，执行到这里报错了。
请问那里有问题 ...

参考这个例子里面的图片保存函数：
http://club.excelhome.net/forum. ... 951&pid=9435940

titi2000 · 发表于 2018-7-3 22:28

修改后能执行的文件也无法执行？

chenjyjustin · 发表于 2018-7-4 11:37

titi2000 发表于 2018-7-3 22:28
修改后能执行的文件也无法执行？

64位的不行，我也不知道怎么改api声明

titi2000 · 发表于 2018-7-15 12:07

chenjyjustin 发表于 2018-7-4 11:37
64位的不行，我也不知道怎么改api声明

我再试试，谢谢回复

		自动登录	找回密码
密码			免费注册

VBA调用百度OCR识别图片中的文字，英文能识别，中文乱码

评分

评分