That looked like a really good start, Yuri. I modified your code as follows to see what I was getting:

if oShell.AppActivate(OIE.DOCUMENT.title)
    oShell.SendKeys(lcAddress+"{ENTER}")
    WAIT WINDOW TIMEOUT 1.0 ""

     DO case
	    	CASE "Did you mean:" $ OIE.DOCUMENT.body.innerText
				lcresult = SUBSTR(OIE.DOCUMENT.body.innerText, AT("Did you mean:",OIE.DOCUMENT.body.innerText))
				?LEFT(lcresult,AT(CHR(13),lcresult))
				?substr(lcresult,AT(CHR(13),lcresult)+2,AT(CHR(13),lcresult,2) -AT(CHR(13),lcresult)-1)
			
			OTHERWISE
				lcResult = OIE.DOCUMENT.body.innerText
				STRTOFILE(lcResult,'temp.txt')
     ENDCASE
endif

I sent it my own address: "11 Chestnut Ridge, Tannersville, PA" and the contents of TEMP.TXT (below) are more or less useless. What am I missing?

Screen reader users: click here for plain HTMLWeb Images Maps News Video Gmail more ?Shopping
 
Groups
 
Books
 
Scholar
 
Finance
 
Blogs
 
YouTube
 
Calendar
 
Photos
 
Documents
 
Reader
 
Sites
 
even more »
 Loading...Still loading... Slow? Try Basic HTMLSign in | Help
All resultsLocationsBusinessesUser-created contentRelated mapsMapped web pagesReal estateShow search optionsRemove search options
Find businesses, addresses and places of interest. Learn more.


 RSS  
 View in Google Earth  
 Print   Send   Link©2009 Google - Map data ©2009 Europa Technologies, LeadDog Consulting, Tele Atlas - Terms of UseMapSatellite
Show labelsTerrain500 mi500 kmTrafficMore...Photos
Videos
Wikipedia
Webcams

Hide allStreet ViewDrag me to a street!<>

Get DirectionsGet Directions  My MapsMy Maps









Add Destination - Show optionsHide options




Note: Public transit coverage may not be available in this area.


Change default location
Set default location
Change default location
Set default location

Remove

Put your business on Google Maps
Display your ads on Google Maps


Hide all

PhotosVideosWikipediaTransitWebcams