Opening IE w/ Google Maps 1

[rasticle]

Hi,

I've look around and haven't found the answer I'm looking for. I'm trying to just open Google Maps in IE with a button in Access. I'm making some silly error that I can't seem to figure out. Just need a second set of eyes to maybe tell me what I'm doing wrong.

Private Sub google_Click()
vUrl = "[URL unfurl="true"]http://maps.google.com/maps?q="[/URL]
vUrl = vUrl & "42.5393+90.6453&t=k&iwloc=A&hl=en"
Call Shell("explorer.exe " & vUrl, vbMaximizedFocus)
End Sub

I'm obviously going to change the string so that the lat/long values are pulled from the form. It will eventually look like:

vUrl = "[URL unfurl="true"]http://maps.google.com/maps?q="[/URL]
vUrl = vUrl & me.lat.value & "+" & me.long.value & ""
vUrl = vUrl & "&t=k&iwloc=A&hl=en"

But I'm getting a warning saying:
"The path 'en' does not exist or is not a directory."

This happens when I click the button to execute this code.

Any thoughts?

Thanks,
Shawn

 

[rasticle]

I figured it out.

I was calling the IE incorrectly.

Private Sub google_Click()
  Dim vUrl As String
  vUrl = "[URL unfurl="true"]http://maps.google.com/maps?q="[/URL] & Me.Long.Value & "+" & Me.Lat.Value & "&iwloc=A&hl=en"
  Call Shell("C:\Program Files\Internet Explorer\Iexplore.exe " & vUrl, vbMaximizedFocus)
End Sub

Worked.

Thanks anyway!

 

[PHV]

Why not simply this ?
FollowHyperlink "

http://maps.google.com/maps?q="

& Me!Long & "+" & Me!Lat & "&iwloc=A&hl=en"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[rasticle]

I was unaware of that syntax! That would save some time. =)

Thanks PHV.