Foxtable(狐表)用户栏目专家坐堂 → [分享]百度地图简单应用,作为引子,之后大家自由发挥。(更新,例子在26楼,总结在1楼)


  共有50377人关注过本帖树形打印复制链接

主题:[分享]百度地图简单应用,作为引子,之后大家自由发挥。(更新,例子在26楼,总结在1楼)

帅哥哟,离线,有人找我吗?
lin_hailun
  91楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6714 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/5 15:20:00 [只看该作者]

以下是引用baoxyang在2013-2-5 15:17:00的发言:
如果驾车线路呢?有什么技巧吗?这个简单的代码就搞定了。我还是不能找到规律哦。晕死了!


驾车线路同样这样弄。替换坐标的值就行了。自己看代码。

 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  92楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3312 积分:21145 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2013/2/5 15:41:00 [只看该作者]

谢了!还是不会弄,再研究吧!估计难哦。这个比较深奥哦。

 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  93楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3312 积分:21145 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2013/2/5 21:46:00 [只看该作者]

请问下楼主,
图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看
弹出的线路图不完整,没有拉动条。这个有办法处理吗?

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  94楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6714 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/5 23:50:00 [只看该作者]

 改样式,加一个滚动条。

#r-result{height:100%;width:20%;float:left;overflow-y:scroll}

 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  95楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3312 积分:21145 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2013/2/6 9:17:00 [只看该作者]

OK!多谢了!!终于有点眉目了!!!多谢指点!!!顺便请教下,地图的大小可以设定吗?现在感觉小了,但浏览窗口控件增大,地图不会增大范围。

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  96楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6714 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/6 9:23:00 [只看该作者]

 地图的大小可以控制的,也就是控制#allmap的样式。默认是浏览器的大小。应该是自适应的吧?

#allmap {width: 100%;height: 100%;overflow: hidden;margin:0;}

 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  97楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3312 积分:21145 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2013/2/6 10:30:00 [只看该作者]

哦。如有时间的话,帮看看如何在狐表中获取数据。
<html>
<head>
<meta http-equiv="Content-Type" c />
<style type="text/css">
body, html,#allmap {width: 100%;height: 100%;overflow: hidden;margin:0;}
#l-map{height:100%;width:78%;float:left;border-right:2px solid #bcbcbc;}
#r-result{height:100%;width:20%;float:left;overflow-y:scroll}
</style>
<script type="text/javascript" src="http://api.map.baidu.com/api?v=1.4"></script>
<title>根据起终点经纬度驾车导航</title>
</head>
<body>
<div id="l-map"></div>
<div id="r-result"></div>
<div id="allmap"></div>
<input type="hidden" id="jcsj_value" value="0" />
<input type="hidden" id="jcgl_value" value="0" />
</body>
</html>
<script type="text/javascript">
var jcsj_value = document.getElementById("jcsj_value");
var jcgl_value = document.getElementById("jcgl_value");
var map = new BMap.Map("l-map");
map.centerAndZoom(new BMap.Point(/*经度*/, /*纬度*/), /*等级*/);
var p1 = new BMap.Point(/*px1*/,/*py1*/);
var p2 = new BMap.Point(/*px2*/,/*py2*/);
var driving = new BMap.DrivingRoute(map, {renderOptions: {map: map, panel: "r-result", autoViewport: true}});
driving.search(p1, p2);

var map1 = new BMap.Map("allmap");
map1.centerAndZoom(new BMap.Point(/*经度*/, /*纬度*/), /*等级*/);
var output = "从上地到西单驾车需要";
var searchComplete = function (results){
    if (transit.getStatus() != BMAP_STATUS_SUCCESS){
        return ;
    }  
        var plan = results.getPlan(0);
        output += plan.getDuration(true) + "\n";  
        jcsj_value.value = plan.getDuration(true); 
              //获取时间
        output += "总路程为:" ;
        jcgl_value.value = plan.getDistance(true);
        output += plan.getDistance(true) + "\n";             //获取距离
}
var transit = new BMap.DrivingRoute(map, {renderOptions: {map: map},
    onSearchComplete: searchComplete,
    onPolylinesSet: function(){        
        setTimeout(function(){alert(output)},"1000");
    }});
transit.search(p1, p2);
</script>


jcgl_value及jcgl_value这两变量是我加上去,但不成功不知错在哪,水平有限!参考失败!!
我想狐表这样调用:
e.Form.Controls("WebBrowser1").Address = ProjectPath & "map1.htm"
Dim tdom As System.Windows.Forms.HtmlDocument = e.Form.Controls("WebBrowser1").BaseControl.Document
Dim g1 As String = tdom.GetElementById("jcsj_value").GetAttribute("value")
Dim g2 As String = tdom.GetElementById("jcgl_value").GetAttribute("value")
请指点!!先谢了!!

 回到顶部
帅哥哟,离线,有人找我吗?
lihe60
  98楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6415 积分:39974 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2013/2/6 10:33:00 [只看该作者]

以下是引用baoxyang在2013-2-5 21:46:00的发言:
请问下楼主,
图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看
弹出的线路图不完整,没有拉动条。这个有办法处理吗?

如果能定位就绝了。


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  99楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6714 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/6 13:34:00 [只看该作者]

 代码看着没什么问题,是应该可以获取到的。我测试可以。

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  100楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6714 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/6 13:34:00 [只看该作者]

 你做个例子出来吧,说说哪里有问题,哪里需要改进。

 回到顶部