Something ike:
#DEFINE READYSTATE_COMPLETE 4
#DEFINE MAX_TIME 30
oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = .T.
oIE.Navigate("
http://www.microsoft.com")
lnStarted = SECONDS()
do while oIE.Readystate <> READYSTATE_COMPLETE
if Seconds() - lnStarted >= MAX_TIME
exit
endif
enddo
if Seconds() - lnStarted < MAX_TIME
lcInnerText = oIE.Document.Body.InnerText
else
lcInnerText="???????????????"
endif
oIE=NULL
release oIE
>I'v looked the Create a Visual FoxPro web browser demo but nothing there.
>Do you have lines before oInt....
>
>AT