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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 二维码扫描

共有2961人关注过本帖树形打印复制链接主题：二维码扫描

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110629 积分：563047 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/4/7 9:21:00 [显示全部帖子]

wb.InsertHTML("<script>function scaned( t, r, f ) {location='zy.htm?nr=' + r;}</script>")

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110629 积分：563047 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/4/7 14:39:00 [显示全部帖子]

卸载，然后重新打包安装试试。用甜版给的例子测试有没有问题？

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110629 积分：563047 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/4/7 16:51:00 [显示全部帖子]

accept.htm只是返回r的值，还不如直接赋值

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

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110629 积分：563047 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/4/7 17:38:00 [显示全部帖子]

accept.htm 代码如下：

Dim e As RequestEventArgs = args(0)

msgbox(e.PlainText) ‘服务器能否弹出提示’

e.Writestring(e.PlainText)

function scaned( t, r, f ) {

var result = sendAjaxText(r,'accept.htm','',False);

alert( result); //服务器有没有返回内容

document.getElementById('p1').innerHTML=result;

}

主题：二维码扫描