IE Help Needed

[KenNichols]

Even with the same addresses 9 out of 10 times this function works perfect!

Not sure why it doesn't always work though.

CODE

Func MileageandTravelTime($fadd, $fcity, $fstate, $tAdd, $tcity, $tstate)

$Start = ($fadd & ", " & $fcity & " " & $fstate)

$End = ($tAdd & ", " & $tcity & " " & $tstate)

$sUrl = "http://maps.google.com/maps?f=d&hl=en&saddr=" & StringReplace($Start & "&daddr=" & $End, " ", "+")

$oIE = _IECreate($sUrl, 0, 0)

_IELoadWait($oIE)

$oDiv = _IEGetObjById($oIE, "dditd")

$Result = (_IEPropertyGet($oDiv, "innertext"))

If $Result = "" Then

_IEQuit($oIE)

EndIf

$data = StringSplit($Result, "")

If @error = 1 Then

_ArrayInsert($data, 1, "Error: Mi ")

_ArrayInsert($data, 2, " Error: Distance ")

EndIf

$data1 = StringTrimRight($data[1], 1)

$data1 = $data1 & "les"

$data2 = StringTrimLeft($data[2], 7)

$data2 = StringTrimRight($data2, 1)

If StringRight($data2, 3) = "min" Then

$data2 = $data2 & "utes"

ElseIf StringRight($data2, 3) = "our" Then

$data2 = $data2 & "s"

Else

$data2 = $data2

EndIf

$MileageandTi = ($data1 & @CRLF & $data2)

_IEQuit($oIE)

Return $MileageandTi

EndFunc ;==>MileageandTravelTime

[PsaltyDS]

Even with the same addresses 9 out of 10 times this function works perfect!

Not sure why it doesn't always work though.

You need to say exactly what happens when it doesn't work.

[KenNichols]

You need to say exactly what happens when it doesn't work.

While writing this reply and trying to explain exactly what was/wasn't happening. I figured out why I was getting the error.

Thanks!