以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  扫描框没调出来  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116791)

--  作者:刘林
--  发布时间:2018/3/31 11:39:00
--  扫描框没调出来
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=107063&skin=0
老师,请问按这个一步一步做了
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180331113622.jpg
图片点击可在新窗口打开查看
但点扫一扫就一直显示载入...后就不动了,不能调出扫描框,请问是什么原因?

--  作者:有点蓝
--  发布时间:2018/3/31 11:54:00
--  
写了什么代码?
--  作者:刘林
--  发布时间:2018/3/31 12:09:00
--  
没有,我是照着http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=107063&skin=0下载,只是改为了
HttpServer.close
HttpServer.Prefixes.Add("http://192.168.1.100/")
HttpServer.Start()

其他没改,现在的问题的点扫一扫只显示...加载...没反应,点从相册选择二维码也没反应

--  作者:有点蓝
--  发布时间:2018/3/31 12:24:00
--  
用hbuildr发布了吗,这个例子要发布才有效的
--  作者:刘林
--  发布时间:2018/3/31 13:56:00
--  
调出来了,非常有用,有很多内容只有照着结果去看,现在
wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById(\'姓名\').value=r;}</script>")
句可以二维码信信息扫入姓名,我想如果二维码内容是“刘林,13696057348”也就是姓名和电话,如何将姓名扫入姓名,电话扫入电话框呢


--  作者:有点蓝
--  发布时间:2018/3/31 15:11:00
--  
在扫描回调函数里

var res = "扫描内容"
document.getElementById(\'姓名标签\').value = res.split(",")[0];
--  作者:刘林
--  发布时间:2018/3/31 19:42:00
--  
Dim e As RequestEventArgs = args(0)
Dim path As String = "foxtableAppTest"
Dim wb As new weui
wb.AppendHTML("<script type=\'text/javascript\' src=\'/" & path & "/js/common.js\'></script>", True)
wb.AppendHTML("<link rel=\'stylesheet\' href=\'/" & path & "/css/common.css\' Type=\'text/css\' charset=\'utf-8\'/>", True)
wb.InsertHTML("<h1 align=\'center\' style=""color:blue;background-image:url(\'./images/b1.jpg\')"">会议签到</h1>")
wb.AddForm("","form1","test.htm")
With wb.AddInputGroup("form1","ipg1","")
    Dim dr As DataRow
    dr = DataTables("用户").sqlfind("身份证号 = \'" & e.Cookies("username") & "\'")
    Dim In1 = .AddInput("姓名","姓&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;名","Text")
    In1.readonly = True
    In1.value = dr("name")
    Dim In2= .AddInput("单位","单&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;位","Text")
    In2.readonly = True
    In2.value = dr("group")
    .AddInput("会议","会议名称","Text").readonly = True
End With
With wb.AddButtonGroup("form1","btg1",True)
    .Add("btn1", "扫二维码", "button").Attribute = " & path & "/plus/barcode_scan.html\',true,true);"""
    .Add("btn2", "确定签到", "button")
End With
wb.InsertHTML("<script>function scaned( t, r, f ) {var res=r document.getElementById(\'会议\').value=var.split(",")[1]; }</script>")
e.WriteString(wb.Build)


是这样改吗,现在的想法是做二维码时,做成“主办单位,会议名称”,扫后提出两个内容填充,是不是这样改的意思 

--  作者:刘林
--  发布时间:2018/4/1 9:04:00
--  
再请教个问题,该方案在调出扫描框时,用两个手指不能调焦距,针对二维码签到时如果距离远了就扫不成功,请老师指点如何能实现有调焦功能?我试过支付宝,微信的扫一扫均可以调焦,并测试发现微信的扫码识别力最高,提高识别力又如何调呢?
--  作者:有点甜
--  发布时间:2018/4/1 17:14:00
--  
以下是引用刘林在2018/3/31 19:42:00的发言:
 
是这样改吗,现在的想法是做二维码时,做成“主办单位,会议名称”,扫后提出两个内容填充,是不是这样改的意思 

 

wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById(\'姓名\').value=r.split(\',\')[0]; document.getElementById(\'年龄\').value=r.split(\',\')[1];}</script>")


--  作者:有点甜
--  发布时间:2018/4/1 17:18:00
--  
以下是引用刘林在2018/4/1 9:04:00的发言:
再请教个问题,该方案在调出扫描框时,用两个手指不能调焦距,针对二维码签到时如果距离远了就扫不成功,请老师指点如何能实现有调焦功能?我试过支付宝,微信的扫一扫均可以调焦,并测试发现微信的扫码识别力最高,提高识别力又如何调呢?

 

不支持,扫描插件本身不支持此功能。