以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  地图定位  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=158541)

--  作者:blsu33
--  发布时间:2020/11/23 16:45:00
--  地图定位
老师,如何写代码,点击按钮定位到北京天安门。麻烦您了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:地图.rar


--  作者:有点蓝
--  发布时间:2020/11/23 20:35:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:地图.zip


--  作者:blsu33
--  发布时间:2020/11/24 17:55:00
--  
嗯,谢谢老师,如何用代码标注出显示出定位的图标;
另外,如何能让地图变得更小些,点击定位的过程慢慢的从最大的中国,到河北,到廊坊,再到最终要定位的位置呢,定位的过程显示出来,慢放的感觉。
所有的需求这些了。

--  作者:有点蓝
--  发布时间:2020/11/24 20:19:00
--  
请自行研究百度地图接口:http://lbsyun.baidu.com/index.php?title=jspopular3.0
--  作者:blsu33
--  发布时间:2020/11/24 21:57:00
--  
嗯,老师,看了,不是很明白道理,您能在给个答案吗,我在对比看下什么意思。跪求
--  作者:有点蓝
--  发布时间:2020/11/24 22:14:00
--  
到网页里添加函数,调用地图接口的各种js用法。使用按钮的用法大概解释一下

Dim web = e.Form.Controls("WebBrowser1").BaseControl
Dim args As Object() = new Object(){116.404, 39.915} 定义一个数组,就是js函数需要的参数,比如函数function setmappoint(x,y)里需要x和y2个参数对应地图的经纬度值
web.Document.InvokeScript("setmappoint",args ) web.Document.InvokeScript是一个固定用法可以调用浏览器控件显示的网页里的js函数,需要2个参数,第一个是函数名称,第二个是参数数组

另外注意全局代码和窗口afterload的用法,这个是保证可以调用浏览器控件显示的网页里的js函数的一个处理。

至于地图接口的各种js用法请自行看地图接口的文档,如果看不懂,先学一下基础的js知识。