Lparameters lcfile,M.LAT,M.LONG * just pass the fullpath, latitude,longitude,caption Set Safety Off If Parameters()<1 Messagebox('Pass file name',16,'Alert',4) Return Endif *!* m.latx=TRANSFORM(checkadds.lat) *!* m.longx=TRANSFORM(checkadds.long) Loca *INDEX on long TAG long Count To lnrecs *SKIP INT(RECCOUNT()/2) Locate Scatter Memvar lcfile='' Set Textmerge On Set Text To (lcfile) Noshow * kiosk server google api key ABQIAAAAkgy8Ufju8MmwuwcRfunFIhTutbnR_kcC9XzHscZz6PIEe4fV8xRa6TJ3UXG_zql3xm99dCU_-8MkPw \<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" \ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> \<html xmlns="http://www.w3.org/1999/xhtml"> \ <head> LCDESCR=ALLTRIM(UPPER(Poll)) \<img src = "http://maps.google.com/mapfiles/kml/pal4/icon49.png" style="display:none"> \ <meta http-equiv="content-type" content="text/html; charset=utf-8"/> \<META HTTP-EQUIV="CACHE-CONTROL" CONTENT="NO-CACHE"> \<META HTTP-EQUIV="PRAGMA" CONTENT="NO-CACHE"> \<META HTTP-EQUIV="EXPIRES" \CONTENT="Mon, 22 Jul 2002 11:12:01 GMT"> \ <title>Memphis Police Department's Real Time Crime Center - Reported Crimes</title> \ <script src="http://maps.google.com/maps?file=api&v=2&key=ABQIAAAAkgy8Ufju8MmwuwcRfunFIhTutbnR_kcC9XzHscZz6PIEe4fV8xRa6TJ3UXG_zql3xm99dCU_-8MkPw" \ type="text/javascript"></script> \ <script type="text/javascript"> \ \ //<![CDATA[ \ function load() { \ if (GBrowserIsCompatible()) { \ var map = new GMap2(document.getElementById("map")); \ map.addControl(new GLargeMapControl()); \ map.addControl(new GMapTypeControl()); \ map.setCenter(new GLatLng(35.135173,-90.000082), 10); * the lat and lon above were hardcoded, change those to the coordinates for your centerpoint \ \ // Create a base icon for all of our markers that specifies the \ // shadow, icon dimensions, etc. \ var baseIcon = new GIcon(); *http://www.google.com/intl/en_ALL/mapfiles/ \ // baseIcon.shadow = "https://kiosk.memphispolice.org/images/shadow50.png"; \ baseIcon.iconSize = new GSize(20, 34); \ baseIcon.shadowSize = new GSize(37, 34); \ baseIcon.iconAnchor = new GPoint(9, 34); \ baseIcon.infoWindowAnchor = new GPoint(9, 2); \ baseIcon.infoShadowAnchor = new GPoint(18, 25); \ \ // Creates a marker whose info window displays the letter corresponding \ // to the given index. \ function createMarker(point, index, lctext) { \ // Create a lettered icon for this point using our icon class \ var icon = new GIcon(baseIcon); \ var lcicon = "http://www.google.com/mapfiles/markerO.png" \ icon.image = lcicon; \ var marker = new GMarker(point, icon); \ \ GEvent.addListener(marker, "click", function() { \ marker.openInfoWindowHtml("<b>" + lctext+ "</b>"); \ }); \ return marker; \ } \ \ // Add markers to the map at locations \ var bounds = map.getBounds(); \ var southWest = bounds.getSouthWest(); \ var northEast = bounds.getNorthEast(); \ var lngSpan = northEast.lng() - southWest.lng(); \ var latSpan = northEast.lat() - southWest.lat(); \ for (var i = 0; i < <<lnrecs+1>>; i++) { SCAN * I have a table with fields named lat,long,address,poll. scanning through the following puts the * points on the map \ var point = new GLatLng(<<lat>>,<<long>>); LCINFO=['Poll: ]+Alltrim(poll)+'</BR> Address:'+Alltrim(address)+'</BR> '+['] \ var lctext = <<ALLTRIM(LCINFO)>>; \ map.addOverlay(createMarker(point, i,lctext)); Endscan \ } \ } \ } \ \ //]]> \ </script> \ </head> \ <body onload="load()" onunload="GUnload()"> \ <div id="map" style="width: 600px; height: 400px"></div> Loca \<p> \ \ \ cnt=0 \<<TRANSFORM(RECCOUNT())>> Polls</br> SCAN *display the fields of this table in an html table cnt=cnt+1 IF cnt=1 \<table style="FONT: 10pt Verdana; BORDER-COLLAPSE: collapse" cellSpacing="0" cellPadding="3" width="75%" bgColor="#eeeeee" border="1"> \ <tr bgColor="darkblue"> \ <th style="COLOR: white; FONT-FAMILY: Verdana,Helvetica">Number</th> \ <th style="COLOR: white; FONT-FAMILY: Verdana,Helvetica">Poll</th> \ <th style="COLOR: white; FONT-FAMILY: Verdana,Helvetica">Address</th> \ </tr> endif \ <tr style="BACKGROUND: #ccccff" vAlign="top"><td align="left"><<cnt>></td><td align="left"><<Poll>></td><td><<address>></td></tr> Endscan *!* \</font></tr> \</table> \ </body> \</html> Locate Set Textmerge To Set Textmerge Off