(Snipped from system)
*determine the default address

cadds=Alltrim(cadds)
If Left(cadds,1)=","
   cadds=Substr(cadds,2,100)
Endif
cAddress = Alltrim(cadds)

*call a form if you wish to check or change the search address
*DO FORM trgoogle

IF !EMPTY(cAddress)
   Wait Window Nowait "The system will try and find "+cadds
   Local loIE
   loIE=Createobject('internetexplorer.application')
   loIE.Navigate( "http://maps.google.com/maps?q="+Strtran(cAddress,"
","+") )
   loIE.Visible = .T.
ENDIF

Hope this helps






On Wed, Jan 8, 2014 at 11:20 AM, Rafael Copquin <rcopq...@fibertel.com.ar>wrote:

> I just got a request to show a google map on a form, when an address is
> given. IOW, the user opens a customer screen and it would contain, among
> other things, the full address.
>
> The user clicks on a button and a google map appears, pointing to that
> address. Then he can use the map just like when one uses a google map, even
> getting directions on how to get there, etc.
>
> I am thinking of one way to do this with VFP and that is, call the browser
> and go directly to the google map with the address built in.
>
> I do not know how to do this, though.
>
> Is there a better way?
>
> Please give me some pointers, code samples, whatever.
>
> It would be greatly appreciated
>
> Rafael Copquin
>
>
[excessive quoting removed by server]

_______________________________________________
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/CAG1nNy-o3QhukHD=gwfZTjVrquPpyX+cOR98jcNQhY_hNHKR=w...@mail.gmail.com
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to