打印本文 打印本文 关闭窗口 关闭窗口
由神秘到简单 教你在网页中添加微软地图
作者:武汉SEO闵涛  文章来源:敏韬网  点击数2650  更新时间:2009/4/23 11:26:09  文章录入:mintao  责任编辑:mintao
 el.style.zIndex=31;
 el.style.width = 93;
 el.style.height = 91;

 VE_Compass.element=el;

 document.body.appendChild(el);
}

function OnPageLoad()
{
 CreateCompass();

 map = new VE_MapControl(32.69, -117.13, 12, ’r’, "absolute", 10, 100, 700, 500);
 document.body.appendChild(map.element);

 var updateInfo = function(e)
 {
  document.getElementById("info").innerHTML =
   ’Latitude = ’ + e.latitude +
   ’, Longitude = ’ + e.longitude +
   ’, Zoom=’ + e.zoomLevel;
 }

 map.onEndContinuousPan = updateInfo;
 map.onEndZoom = updateInfo;

 map.onMouseClick = function(e)
 {
  map.RemovePushpin(’pin’);
  map.AddPushpin(’pin’, e.latitude, e.longitude, 88, 34, ’pin’, ’MyPin’);
 }

 PositionElement(document.getElementById("VE_MapScale"), 300, 550, 150, 18);
 UpdateMapScale();

 var zm = VE_ZoomControl.Create(5,550,9,"absolute");
 document.body.appendChild(zm);

 windowWidth=700;
 windowHeight=500;

 VE_Scratchpad.Add=function()
 {
  VE_Scratchpad.AddLocation("Point",map.GetCenterLatitude(),map.GetCenterLongitude(),"my added point","LOC");
 }

 VE_Scratchpad.Email=function()
 {
  var body="";
  var urlprefix=GetUrlPrefix();
  var first=true;
  var ids="";
  var e=VE_Scratchpad.entities;
  if(e==null||e.length==0)
  {
   alert("Nothing to send!");
   return;
  }

  var lengthToSend=Math.min(MaxScratchpadItemsToSend,e.length);
  for(var i=0;i<lengthToSend;i++)
  {
   var escapedID=escape(e[i].GetSerializedId());
   if(!escapedID) {continue;}
   body+=escape(e[i].name+"\n"+e[i].description+"\n\n");
   if(!first) { ids+=","; }
   ids+=escapedID;
   first=false;
  }

  var allids=escape("Virtual Earth Scratch Pad from Dr. Neil\n" + urlprefix + "\n\n");
  window.open(’mailto:?subject=My%20Virtual%20Earth%20Scratch%20Pad&body=’ + allids + body);
 }

 VE_Scratchpad._GetToolbar=function()
 {
  var html="<table cellpadding=\"0\" cellspacing=\"0\" ";
  html+="border=\"0\" align=\"left\">";
  html+="<tr><td valign=\"top\" align=\"center\">";
  html+="<a href=\"javascript:VE_Scratchpad.Clear();\" ";
  html+="oncontextmenu=\"return false;\">Clear Pad</a> | ";
  html+="<a href=\"javascript:VE_Scratchpad.Email();\" ";
  html+="oncontextmenu=\"return false;\">Email this...</a> ";
  html+="</td></tr><tr><td> </td></tr></table>";
  return html;
 }

 VE_Scratchpad._introText="Your scratchpad is empty.";
 VE_Scratchpad.CreatePanel();
 VE_Scratchpad.Show();
}

function ChangeMapStyle()
{
 var Aerial = document.getElementById("AerialStyleCheck");
 var Vector = document.getElementById("VectorStyleCheck");
 var s = ’r’;
 if (Aerial.checked && Vector.checked)
 {
  s = ’h’;
 }
 else if (Aerial.checked)
 {
  s = ’a’;
 }
 map.SetMapStyle(s);
}

function DoPanUp() { map.ContinuousPan(0, -10, 20); }
function DoPanDown() { map.ContinuousPan(0, 10, 20); }
function DoPanLeft() { map.ContinuousPan(-10, 0, 20); }
function DoPanRight() { map.ContinuousPan(10, 0, 20); }

function DoZoomIn() { map.ZoomIn(); }
function DoZoomOut() { map.ZoomOut(); }

function DoFind()
{
 var where = document.getElementById("WhereText").value;
 var a="";
 var b=escape(where);
 var c=map.GetLatitude(0);
 var d=map.GetLongitude(windowWidth);
 var e=map.GetLatitude(windowHeight);
 var f=map.GetLongitude(0);
 var g="";
 var i="";
 var r=0;
 var  url="http://virtualearth.msn.com/search.aspx"+"?a="+a+"&b="+b+"&c="+c+"&d="+d+"&e="+e+"&f="+f+"&g="+g+"&i="+i+"&r="+r;

 if(!VE_SearchManager.xmlHttp)
 {
  VE_SearchManager.xmlHttp=GetXmlHttp();
 }

 var xmlHttp=VE_SearchManager.xmlHttp;
 if(xmlHttp)
 {
  xmlHttp.open("POST",url,true);
  xmlHttp.onreadystatechange=FindResponseHandler;
  VE_SearchManager.searching=true;
  xmlHttp.send("");
 }
}

FindResponseHandler=function()
{
 var x = VE_SearchManager.xmlHttp;
 if(x.readyState==4)
 {
  VE_SearchManager.searching = false;
  var code = x.responseText;

  try
  {
   eval(code);
  }
  catch(ex){}

  VE_Scratchpad.AddLocation(
   document.getElementById("WhereText").value,
    map.GetCenterLatitude(),
    map.GetCenterLongitude(), "", "LOC");
 }
}
</script>
</head>
<body onLoad="OnPageLoad()">
<div id="info" style="font-size:10pt">
</div>
<div id="MapStyle" style="POSITION:absolute;LEFT:470px;TOP:60px">
<input id="VectorStyleCheck" type="checkbox" name="VectorStyleCheck" onclick="ChangeMapStyle()" checked="checked">
Street Style
<input id="AerialStyleCheck" type="checkbox" name="AerialStyleCheck" onclick="ChangeMapStyle()">
Aerial Style
</div>

<input type="button" value="Pan Up" onclick="DoPanUp()" id="PanUpButton" name="PanUpButton" style="position:absolute;left:60px;top:600"/>

<input type="button" value="Pan Left" onclick="DoPanLeft()" id="PanLeftButton" name="PanLeftButton" style="position:absolute;left:10px;top:630"/>

<input type="button" value="Pan Right" onclick="DoPanRight()" id="PanRightButton" name="PanRightButton" style="position:absolute;left:100px;top:630"/>

<input type="button" value="Pan Down" onclick="DoPanDown()" id="PanDownButton" name="PanDownButton" style="position:absolute;left:45px;top:660"/>

<input type="button" value="Zoom In" onclick="DoZoomIn()" id="ZoomInButton" name="ZoomInButton" style="position:absolute;left:250px;top:630"/>
<input type="button" value="Zoom Out" onclick="DoZoomOut()" id="ZoomOutButton" name="ZoomOutButton" style="position:absolute;left:340px;top:630"/>

<table id="VE_MapScale" cellpadding="0" cellspacing="0" unselectable="on">
<tr>
<td>
<div id="VE_MapScaleLabel" unselectable="on">
</div>
</td>
</tr>
<tr>
<td>
<div id="VE_MapScaleBar" unselectable="on">
</div>
</td>
</tr>
</table>

<input type="button" value="Find" onclick="DoFind()" id="FindButton" name="FindButton" style="position:absolute;left:10px;top:700"/>
<input type="text" name="WhereText" size="20" id="WhereText" style="position:absolute;left:60px;top:700"/>
</body>
</html>

上一页  [1] [2] [3] [4] 

打印本文 打印本文 关闭窗口 关闭窗口