|
hi!
Here is the code. And it works great for England.
for example:
100 Abbey road, london, england
works fine. But I cant get it to parse most other EU addresses.
Dim oMap As MapPoint.Map
Dim MPLoc As MapPoint.Location
Dim objSA As MapPoint.StreetAddress
objSA = oMap.ParseStreetAddress(myAddString)
MPLoc = oMap.FindAddressResults(objSA.Street, objSA.City, , , , objSA.Country)(1)
Thanks in advance for any help. |