实例介绍
【实例截图】
【核心代码】
<!doctype html> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="X-UA-Compatible" content="IE=edge"> <meta name="viewport" content="initial-scale=1.0, user-scalable=no, width=device-width"> <link rel="stylesheet" href="/Public/Css/demo.Default.css" type="text/css" /> <title>地理解析(地址匹配)</title> <script type="text/javascript" src="http://webapi.amap.com/maps?v=1.3&key=d8440a22fb3fc04b72a61aa6b51902a2&plugin=AMap.PlaceSearch,AMap.DistrictSearch"></script> </head> <body onload="mapInit()"> <div> <input type="file" id="f" /><br><br> <label>读取表格的经纬度列</label><input type="text" id="column" value="3" style="width:60px"> <label>写入表格的道路数列</label><input type="text" id="columnresult" value="4" style="width:60px"><br><br> <input type="button" id="b" value="读取" onclick="if(f.value=='')alert('请选择xls文件');else importXLS(f.value)"/>  <input type="text" id="numdistance" value="搜索范围(米)" style="width:80px"/> <input type="button" value="搜索" onclick="bdSEAR();"/> <input type="text" id="num" value="搜素数目" style="width:80px"/><br> </div> <div id="iCenter" style="height:600px;width:100%"> </div> </body> <script language="javascript"> var mapObj,toolbar,overview,scale; var addressRusluts = new Array(); var Realsluts = new Array(); var strs= new Array(); //定义一数组 var colcount=0; //excle表利用行数 var index=0; var Roadcount = 0;//道路数; function mapInit() { var opt = { level:13,//设置地图缩放级别 center:new AMap.LngLat(116.397428,39.90923),//设置地图中心点 doubleClickZoom:true,//双击放大地图 scrollWheel:true//鼠标滚轮缩放地图 } mapObj = new AMap.Map("iCenter",opt); mapObj.plugin(["AMap.ToolBar","AMap.OverView","AMap.Scale"],function() { toolbar = new AMap.ToolBar(); toolbar.autoPosition=false; //加载工具条 mapObj.addControl(toolbar); overview = new AMap.OverView(); //加载鹰眼 mapObj.addControl(overview); scale = new AMap.Scale(); //加载比例尺 mapObj.addControl(scale); }); } function importXLS(path){ var columnNum=parseInt(document.getElementById("column").value); var tempStr = ""; //存储地址字符串 var oXL = new ActiveXObject("Excel.application"); var oWB = oXL.Workbooks.open(path); oWB.worksheets(1).select(); var oSheet = oWB.ActiveSheet; colcount=oWB.Worksheets(1).UsedRange.Cells.Rows.Count ; try{ for(var i=2;i<= colcount;i ) { if(!oSheet.Cells(i,columnNum).value) { tempStr="null"; } else { tempStr=oSheet.Cells(i,columnNum).value; } addressRusluts.push(tempStr); } } catch(e) { alert("读取失败!"); } if(colcount!=(addressRusluts.length 1)) { alert("读取错误,请重新加载数据!"); return; } oXL.Quit(); CollectGarbage(); alert("读取完毕!"); } //地址解析 function bdSEAR(){ var addressRuslut=addressRusluts[index]; rooadSearch(addressRuslut); index ; } function rooadSearch(str){ if(index < addressRusluts.length){ roadsearcher(str); setTimeout(window.bdSEAR,150); } else{ outportXLS(); } } function roadsearcher(str) { var placeSearch = new AMap.PlaceSearch({ //构造地点查询类 type:"道路名" }); //道路搜索返回搜索数目 strs=str.split(";"); //字符分割 var cpoint = [parseFloat(strs[0]), parseFloat(strs[1])]; //中心点坐标 var distance= parseInt(document.getElementById("numdistance").value); placeSearch.searchNearBy('', cpoint, distance, function(status, result){ if (status === 'complete' && result.info === 'OK') { placeSearch_CallBack(result); } else{ Realsluts.push("null"); //alert("解析失败!"); //tf.WriteLine(index ',解析失败') } }); } function placeSearch_CallBack(data) { Roadcount=data.poiList.count; Realsluts.push(Roadcount.toString()); document.getElementById("num").value=index; //获取打点条数 } function outportXLS(){ var rescolumn=parseInt(document.getElementById("columnresult").value); var filepath=document.getElementById("f").value; var oXL = new ActiveXObject("Excel.application"); var oWB = oXL.Workbooks.open(filepath); oWB.worksheets(1).select(); var oSheet = oWB.ActiveSheet; try{ for(var i=2;i<= colcount;i ) { oSheet.Cells(i,rescolumn).value=Realsluts[i-2]; } } catch(e) { alert("写入失败!"); } oXL.Quit(); CollectGarbage(); alert("处理完成!"); } </script> </html>
标签: 高德
相关文章
小贴士
感谢您为本站写下的评论,您的评论对其它用户来说具有重要的参考价值,所以请认真填写。
- 类似“顶”、“沙发”之类没有营养的文字,对勤劳贡献的楼主来说是令人沮丧的反馈信息。
- 相信您也不想看到一排文字/表情墙,所以请不要反馈意义不大的重复字符,也请尽量不要纯表情的回复。
- 提问之前请再仔细看一遍楼主的说明,或许是您遗漏了。
- 请勿到处挖坑绊人、招贴广告。既占空间让人厌烦,又没人会搭理,于人于己都无利。
关于好例子网
本站旨在为广大IT学习爱好者提供一个非营利性互相学习交流分享平台。本站所有资源都可以被免费获取学习研究。本站资源来自网友分享,对搜索内容的合法性不具有预见性、识别性、控制性,仅供学习研究,请务必在下载后24小时内给予删除,不得用于其他任何用途,否则后果自负。基于互联网的特殊性,平台无法对用户传输的作品、信息、内容的权属或合法性、安全性、合规性、真实性、科学性、完整权、有效性等进行实质审查;无论平台是否已进行审查,用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。本站所有资源不代表本站的观点或立场,基于网友分享,根据中国法律《信息网络传播权保护条例》第二十二与二十三条之规定,若资源存在侵权或相关问题请联系本站客服人员,点此联系我们。关于更多版权及免责申明参见 版权及免责申明
网友评论
我要评论