John,
First off I don't think the phone number you posted is valid (couldn't find it at all). When I use my own number it certainly returns the correct information but doesn't parse the info correctly (get a page that says 'Your browser sent no query information'). However, if you replace the readURL() function with a TextRange object you can get it to work:
MYHTML=readurl(OIE.document.url)
oRange = oIE.document.body.CreateTextRange()
lcText = oRange.text
lcHTMLText = oRange.HTMLtext
Martyn