Foxtable(狐表)用户栏目专家坐堂 → 复杂的二维码提取信息


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

主题:复杂的二维码提取信息

帅哥哟,离线,有人找我吗?
石四
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 13:01:00 [只看该作者]

textbox控件属性已改为多行文本,仍然读不齐二维码信息。

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


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

试试在表格单元格里能不能获取完整,在列记录窗口里能不能获取完整?新建一个文本框有没有问题?

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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:07:00 [只看该作者]

在表单元格试,字符型不可以,长度不够,改为备注型好了,字符完整了,之前是受限信息被截断。

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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:10:00 [只看该作者]

textbox控件最大长度3万多,理论上怎么也够了。通过扫描枪还是被截断。

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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:14:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信截图_99.png
图片点击可在新窗口打开查看
备注型单元格完整的字符串

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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:27:00 [只看该作者]

好奇怪!在另外项目窗口插入一个文本框试,能扫出完整字符。
这个要应用的项目窗口里,删了前面的文本框再添加一个新文本框试,扫出比正常多的字符,且每次都不相同。

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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:32:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信截图_88.png
图片点击可在新窗口打开查看
正常的

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_77.png
图片点击可在新窗口打开查看
这个不正常。
同一二维码图形扫出来的。两个都是多行文本框


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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:40:00 [只看该作者]

这个异常和项目有关,诡异!
把那个正常的窗口转到这个项目试,就不正常,扫出大量字符!

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


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2019/7/24 14:46:00 [只看该作者]

项目重新打开后正常了,匪夷所思!

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


加好友 发短信
等级:幼狐 帖子:154 积分:1462 威望:0 精华:0 注册:2013/11/7 17:13:00
  发帖心情 Post By:2019/7/24 15:41:00 [只看该作者]




图片点击可在新窗口打开查看此主题相关图片如下:fox-1.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:fox-2.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:fox-3.jpg
图片点击可在新窗口打开查看

解析 json

Dim jsonStr=e.Form.Controls("TextBox1").value
Dim jo As JObject = JObject.Parse(jsonStr)
e.Form.Controls("TextBox2").value=jo("D").Tostring

Dim ja As JArray = jo("I")
Dim msg As String=""
For i As Integer = 0 To ja.Count - 1
    Dim jo2 As JObject =ja(i)
    msg & = jo2("I").Tostring & " > " & jo2("N").Tostring & " > " & jo2("P").Tostring  & vbCrLf
Next
e.Form.Controls("TextBox3").value=msg


[此贴子已经被作者于2019/7/24 15:42:03编辑过]

 回到顶部
总数 28 上一页 1 2 3 下一页