扫码加查询 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

http://www.foxtable.com/mobilehelp/topics/0247.htm、http://www.foxtable.com/mobilehelp/topics/0108.htm

2、在d:\web\lib目录下新建一个文本文件jssdk.js，内容为：

wx.ready(function () {
    document.getElementById('scan').onclick = function () {
        wx.scanQRCode({
            needResult: 1,
            scanType: ['qrCode','barCode'],
            success: function (res) {
                document.getElementById('number').value = res.resultStr;

var result = sendAjaxText(res.resultStr,"查询.htm","",false);

document.getElementById("设备名称").value =result;
            }
        });
    };
});
wx.error(function (res) {
    //alert(res.errMsg);
});

后台代码

Case "查询.htm"

dim 编号 as string = e.PlainText

dim dr as datarow = datatables("表A").find("编号='" & 编号 & "'")

if dr isnot nothing

e.WriteString(dr("名称"))

else

e.WriteString("没有编号对应的名称")

end if

[此贴子已经被作者于2024/9/20 11:33:05编辑过]

主题：扫码加查询