Foxtable(狐表)用户栏目专家坐堂 → 网络阅卷探索


  共有2946人关注过本帖树形打印复制链接

主题:网络阅卷探索

帅哥,在线噢!
有点蓝
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106688 积分:542629 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/29 21:08:00 [只看该作者]

office的组件都比较麻烦,经常无法释放,不能重复创建。

试试把doc定义到全局变量,然后在afteropenproject调用一次createobject。不要重复调用createobject。

另外office的这个组件识别率并不高

 回到顶部
帅哥哟,离线,有人找我吗?
刘林
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1936 积分:14844 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2019/3/29 21:28:00 [只看该作者]

我试了如图是电子档文字的图片就可以识别,但当图片效果差或手写的就出现上面问题,看来这个没什么办法了,现在的问题是怎么做更好呢

 回到顶部
帅哥,在线噢!
有点蓝
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106688 积分:542629 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/29 22:02:00 [只看该作者]

调用BAT或各大厂提供的图形识别接口。当然一般都是收费的。

 回到顶部
帅哥哟,离线,有人找我吗?
刘林
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1936 积分:14844 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2019/3/30 8:18:00 [只看该作者]

https://www.kancloud.cn/iflytek_restapi/rest_api/487336##


在网上查了个手写识别的接口,没做过接口,文档读不懂,请老师帮指导下这该如何下手,在FOXTABLE的语言怎么改写?

 回到顶部
帅哥,在线噢!
有点蓝
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106688 积分:542629 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/30 9:03:00 [只看该作者]

参考:http://www.foxtable.com/mobilehelp/scr/0246.htm

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=106768&skin=0

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=104710&skin=0

 回到顶部
帅哥哟,离线,有人找我吗?
刘林
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1936 积分:14844 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2019/3/31 9:26:00 [只看该作者]

For i As Integer = 1 To 4
    Dim wj As String = "d:\cs" & i & ".jpg"
    If FileSys.FileExists(wj)
        Dim doc = CreateObject("MODI.Document")
        doc.Create(wj)
        doc.OCR(2052, True, True)
        For ii As Integer = 0 To doc.Images.count - 1
            Dim layout = doc.images(ii).Layout
            output.show(left((layout.text).Replace(" ",""),10))
            rename(wj,"d:\" & left((layout.text).Replace(" ",""),10) & ".jpg")
        Next
        doc.close
        doc = Nothing
    End If
Next
老师,我测试了几个图片
1、感觉速度不够快,有什么办法提点速不
2、如何循环一个文件夹中的所有图片文件
3、如何取图片文件的某个部分来识别

我的想法是手写识别现在没这个知识基础,先试一下在试卷上贴一张考号签,然后将答题卡上贴在某个区域的考号识别出来,并将试卷图片更名为考号为名,当然这个我知道有点低级,先试一下看看图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/1 11:36:00 [只看该作者]

1、这个没办法,这个是本身的问题;

 

2、http://www.foxtable.com/webhelp/scr/0341.htm

 

3、截取识别,参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=109014&skin=0

 


 回到顶部
总数 17 上一页 1 2