图片文字识别，百度AI调用

zpy2

whlbliss 发表于 2019-7-23 13:03
我是想通过图片识别，识别手写的分数。

不清楚你的情况，我是身份证凭证上传OCR的，效果还行。

擎、天

whlbliss 发表于 2019-7-23 13:00
这么牛！惊叹

额，你调有道的接口也可以做的，不过有道识别数学公式的接口 。。。。。。

geniux

感谢楼主所做的贡献，本人才疏学浅，但是基于楼主的文档实现了自己的需求，做了个增值税发票识别的。实际测试发现几个小问题
1，原程序URLencode太慢，图片一大就扑街。
以下为 原文档 GetUrl 函数的同等功能函数速度快很多，本人实测没发现问题，可以测试一下；（非原创）
Public Function URLEncode( _
   StringVal As String, _
   Optional SpaceAsPlus As Boolean = False _
) As String

  Dim StringLen As Long: StringLen = Len(StringVal)

  If StringLen > 0 Then
    ReDim result(StringLen) As String
    Dim i As Long, CharCode As Integer
    Dim Char As String, Space As String

    If SpaceAsPlus Then Space = "+" Else Space = "%20"

    For i = 1 To StringLen
      Char = Mid$(StringVal, i, 1)
      CharCode = Asc(Char)
      Select Case CharCode
        Case 97 To 122, 65 To 90, 48 To 57, 45, 46, 95, 126
          result(i) = Char
        Case 32
          result(i) = Space
        Case 0 To 15
          result(i) = "%0" & Hex(CharCode)
        Case Else
          result(i) = "%" & Hex(CharCode)
      End Select
    Next i
    URLEncode = Join(result, "")
  End If
End Function
2，数据返回，没有错误处理。  （免费上限和QPS错误很容易触发）  批量识别时需设置延时，否则很容易出发QPS错误
本人实现批量识别时，直接获取文件夹所有文件路径，循环识别，实现批量识别的。

EH_LOVE

geniux 发表于 2019-9-15 22:28
感谢楼主所做的贡献，本人才疏学浅，但是基于楼主的文档实现了自己的需求，做了个增值税发票识别的。实际测 ...

额感谢兄弟发现的问题,回头我将更新一下!另外把各大网站的例子都 集成进来供大家参考使用 并改正 谢谢

dongdonggege

感谢楼主，我测试的是这个图片，但是出现错误。baiduai模块，d:\32.bmp，ActiveX部件不能创建对象。
jsonobject.jsonRead (http.getResponseText())

请问：是什么原因？

EH_LOVE

dongdonggege 发表于 2019-9-16 09:26
感谢楼主，我测试的是这个图片，但是出现错误。baiduai模块，d:\32.bmp，ActiveX部件不能创建对象。
jsono ...

可能是JSON 解析的问题，你用自已的方式来解析一下JSON 即可我封装的不 是很好

dongdonggege

老师，出现错误，是不是需要下载什么的？比如sdk和json等，不懂，第一次接触，请老师指点。

老磨石

请问一下，这个程序要连网才能识别吗

zpy2

老磨石 发表于 2019-10-3 18:29
请问一下，这个程序要连网才能识别吗

是的，调用web  在线api

zhyf360

谢谢大神，值得学习