以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  移动端扫码的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143689)

--  作者:dengk03
--  发布时间:2019/12/1 23:20:00
--  移动端扫码的问题
看了例子,想在移动端实现一个扫码功能:如图,该表单有两行文本框,都需要通过扫码的方式录入。
1.每一行都包括一个文本框,一个按钮,按钮功能为扫一扫,如何在weui下实现这种排布?
2.每一行的扫一扫都将扫到的信息输入到对应的文本框中。
例子中只讲到如果扫一个,按照上述需求代码该如何写?

 Case "list.htm"
        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.AddForm("","form1","test.htm")
        With wb.AddInputGroup("form1","ipg1","测试")
            With .AddInput("gwqm","工位全码","text")
                .Readonly= True 
            End With
            With .AddInput("wpqm","网片全码","text")
                .Readonly= True 
            End With           
        End With
        With wb.AddButtonGroup("","btg2", True)
            .Add("btn1", "扫工位", "button").Attribute = " & path & "/plus/barcode_scan.html\',true,true);"""
            .Add("btn3", "返回首页", "button","default.htm").kind=2
         End With
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20191201231339.png
图片点击可在新窗口打开查看
         
        wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById(\'gwqm\').value=r;}</script>")

 end select


--  作者:有点蓝
--  发布时间:2019/12/2 9:00:00
--  
1、参考:http://www.foxtable.com/mobilehelp/topics/0051.htm
2、在调用扫描代码之前先把点击的是哪一个按钮保存到js变量中,扫描后根据js变量的内容判断把结果填入哪一个文本框

--  作者:dengk03
--  发布时间:2019/12/2 15:57:00
--  
With .AddInputCell("ic4"\'通过InputCell增加输入框
                .AddLabel("lsj",
"
手机",0\'增加标签,0显示在左边
                .AddInput("sj","text",1
\'
增加输入框,1表示显示在中间
                
.AddVcodeButton("hym","获取验证码",2\'增加获取验证码按钮,2表示显示在右边
是用这个么?

--  作者:有点蓝
--  发布时间:2019/12/2 16:13:00
--  
是的