以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助 JASON 文件里取不到值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120713)

--  作者:lin1221
--  发布时间:2018/6/22 13:32:00
--  求助 JASON 文件里取不到值
微信公众号里有个openlocation,但是设定jason文件后, 点击就是不显示地图,
图片点击可在新窗口打开查看此主题相关图片如下:经纬度显示.jpg
图片点击可在新窗口打开查看
jason文件内容
wx.ready(function () {
    document.getElementById(\'btn1\').onclick = function () {
        wx.getLocation({
            type: \'gcj02\',
            success: function (res) {
res.latitude = document.getElementById(\'number\').value;
res.longtitude = document.getElementById(\'product\').value;
                wx.openLocation({  
                    latitude : res.latitude, // 纬度,浮点数,范围为90 ~ -90  
                    longitude : res.longtitude, // 经度,浮点数,范围为180 ~ -180。
                   name : \'\', // 位置名  
                    address : \'\', // 地址详情说明  
                    scale : 6, // 地图缩放级别,整形值,范围从1~28。默认为最大  
                    infoUrl : \'\' // 在查看位置界面底部显示的超链接,可点击跳转(测试好像不可用)  
                     });
            }
        });
    };
});
wx.error(function (res) {
    //alert(res.errMsg);
});

HTTPREQUEST内容:
    Case "maplist1.htm",""
        wb.AppendHTML("<script src=\'http://res.wx.qq.com/open/js/jweixin-1.2.0.js\'></script>",True) \'引入JS-SDK库
        wb.AppendHTML("<script src=\'./lib/jssdk1.js\'></script>") \'引入脚本文件
        \'在页面注入权限验证配置
        Dim st As New Date(1970,1,1,8,0,0)
        Dim appid As String = "wxf411b4d9008f11a0" \'开发者ID
        Dim timestamp As Integer = CInt((Date.Now - st).TotalSeconds()) \'时间戳
        Dim noncestr As String = Rand.NextString(16) \'随机字符
        Dim url As String  = e.Request.URL.ToString \'当前页面地址
        Dim signature As String = Functions.Execute("GetJsSignature", noncestr, timestamp, url) \'生成权限验证签名
        Dim cfg As String = "wx.config({appId:\'{0}\',timestamp:{1},nonceStr:\'{2}\',signature:\'{3}\',jsApiList:[\'openLocation\']});"
        wb.AppendHTML("<script>" & CExp(cfg,appid,timestamp,noncestr,signature) & "</script>",True)
        \'开始正常生成网页内容
        Dim PrimaryKey As Integer = e.GetValues("key")
        Dim dr01 As DataRow = DataTables("跟踪表").SQLFind("[_Identify]= " & PrimaryKey)
        If dr01 IsNot Nothing Then
            wb.addform("","form1","maplist1.htm?key=" & PrimaryKey)
            With wb.AddInputGroup("form1","ipg1","在途查询")
                .AddInput("product","经度","text").Value = dr01("经度")
                .AddInput("number","纬度","text").Value = dr01("纬度")
            End With
            With wb.AddButtonGroup("form1","btg1",True)
                .add("btn1","确定","submit")
            End With
        End If


--  作者:有点甜
--  发布时间:2018/6/22 14:32:00
--  

 .add("btn1","确定","submit")

 

改成

 

 .add("btn1","确定","button")


--  作者:lin1221
--  发布时间:2018/6/22 14:52:00
--  
@有点甜 老师:
修改成 .add("btn1","确定","button") 后, 
安卓系统需要点击2次能显示地图, 但是ios系统没反应


--  作者:有点甜
--  发布时间:2018/6/22 15:09:00
--  

js改成,看弹出什么

 

alert(111);

wx.ready(function () {
alert(222);
    document.getElementById(\'btn1\').onclick = function () {
var latitude = document.getElementById(\'number\').value;
var longtitude = document.getElementById(\'product\').value;
alert(333);
                wx.openLocation({  
                    latitude : latitude, // 纬度,浮点数,范围为90 ~ -90  
                    longitude : longtitude, // 经度,浮点数,范围为180 ~ -180。
                   name : \'\', // 位置名  
                    address : \'\', // 地址详情说明  
                    scale : 6, // 地图缩放级别,整形值,范围从1~28。默认为最大  
                    infoUrl : \'\' // 在查看位置界面底部显示的超链接,可点击跳转(测试好像不可用)  
                     });
alert(444);
    };
});

--  作者:lin1221
--  发布时间:2018/6/22 15:21:00
--  
@有点甜 老师:js改成上面的后
1)安卓系统, 
111 - 正常跳出;
222-正常跳出
点击确定后,
333-正常跳出,
444-正常跳出,
切换到地图,无异常
2)IOS系统
先显示111,后切换到maplist1.htm
显示222
点击确定按钮
显示333
显示444
然后就不跳转了, 海在当前页面, 继续点击确定,重复从333开始


--  作者:有点甜
--  发布时间:2018/6/22 16:30:00
--  

 

alert(111);

wx.ready(function () {
alert(222);
    document.getElementById(\'btn1\').onclick = function () {
var latitude = Number(document.getElementById(\'number\').value);
var longtitude = Number(documet.getElementById(\'product\').value);
alert(333);
                wx.openLocation({  
                    latitude : latitude, // 纬度,浮点数,范围为90 ~ -90  
                    longitude : longtitude, // 经度,浮点数,范围为180 ~ -180。
                   name : \'\', // 位置名  
                    address : \'\', // 地址详情说明  
                    scale : 6, // 地图缩放级别,整形值,范围从1~28。默认为最大  
                    infoUrl : \'\' // 在查看位置界面底部显示的超链接,可点击跳转(测试好像不可用)  
                     });
alert(444);
    };
});

--  作者:lin1221
--  发布时间:2018/6/22 16:37:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:444.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:333.jpg
图片点击可在新窗口打开查看
加入Number后还是一样不跳转地图, 依然停留在maplsit1.htm这里。与不加Number显示的结果一样

图片点击可在新窗口打开查看此主题相关图片如下:222.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2018/6/22 16:40:32编辑过]

--  作者:lin1221
--  发布时间:2018/6/22 17:49:00
--  
这个查了半天也没找到哪里错, 就是IOS系统显示不出地图
--  作者:有点甜
--  发布时间:2018/6/22 17:54:00
--  
修改成6楼还是不行?
--  作者:lin1221
--  发布时间:2018/6/22 18:28:00
--  
修改成6楼还是不行,结果都一样, IOS无法显示地图
加入Number后还是一样不跳转地图, 依然停留在maplsit1.htm这里。与不加Number显示的结果一样
[此贴子已经被作者于2018/6/22 18:28:51编辑过]