Foxtable(狐表)用户栏目专家坐堂 → Hbuilder 二维码内容拆解!


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

主题:Hbuilder 二维码内容拆解!

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


加好友 发短信
等级:三尾狐 帖子:731 积分:6493 威望:0 精华:0 注册:2011/6/26 11:45:00
Hbuilder 二维码内容拆解!  发帖心情 Post By:2018/5/23 10:21:00 [只看该作者]

wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById('姓名').value=r;}</script>")

扫二维码得到r值:DTXT:SUB:张三;TXT:25;;    


如何将这个r值拆解分别填到:姓名和年龄里面去呢?

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


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

合成二维码的时候,请这样合成,如

 

张三|男|25|大学本科

 

然后,分割获取,即可,如js代码

 

var r = '张三|男|25|大学本科';

var ary = r.split('|');

alert(ary[0]);

alert(ary[1]);

document.getElementById('年龄').value=ary[2];


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


加好友 发短信
等级:三尾狐 帖子:731 积分:6493 威望:0 精华:0 注册:2011/6/26 11:45:00
  发帖心情 Post By:2018/5/23 10:45:00 [只看该作者]

OK!明白!谢谢甜版!

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


加好友 发短信
等级:狐神 帖子:6886 积分:43605 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2018/6/1 9:50:00 [只看该作者]

楼主,我扫描出来的结果,如果是中文就是乱码,你这个中文是怎么扫出来的?

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


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

以下是引用lihe60在2018/6/1 9:50:00的发言:
楼主,我扫描出来的结果,如果是中文就是乱码,你这个中文是怎么扫出来的?

 

你二维码的问题,生成二维码请使用utf8编码生成。


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


加好友 发短信
等级:狐神 帖子:6886 积分:43605 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2018/6/1 10:34:00 [只看该作者]

生成二维码请使用utf8编码生成,代码如何写?

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


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


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


加好友 发短信
等级:狐神 帖子:6886 积分:43605 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2018/6/1 13:06:00 [只看该作者]

下面的代码生成的二维码,扫出来是乱码,代码如何写?

Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.QRCode
Bar.Code = "a张"
Bar.BarWidth = 0.3
Bar.BarHeight = 8
Bar.SaveImage("d:\data\MyBar.jpg")

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


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

加上代码

 

Bar.QRCodeByteEncodingName = "utf-8"

 


 回到顶部