Here's how I got around it. It never needed more than a second try, but I set it to loop 5 times before it quits.

 Code:
function GetIEUserAgent()
  dim $ie,$page,$i,$j
  $ie=createobject("InternetExplorer.Application")
  while $GetIEUserAgent="" and $j<5
    $ie.navigate("http://whatsmyuseragent.com/")
    while $ie.busy and $ie.readystate <> 4 loop
    if $ie.document
      $page=split($ie.document.documentelement.innerhtml,chr(10))
      for $i=0 to ubound($page)
        if instr($page[$i],"Your User Agent:</strong>")
          $GetIEUserAgent=trim(split(split($page[$i],"Your User Agent:</strong>")[1],"<")[0])
        endif
      next
    endif
    $j=$j+1
  loop
  $ie.quit
endfunction
_________________________
(... better days ahead)