>lcURL='http://www.levelextreme.com' >lnTime=1200 && 12 seconds >lox=Createobject('internetexplorer.application') >lox.Visible=.t. >lox.Navigate(lcURL) >lox.Visible=.T. >Wait 'Navigating!' Window Nowait >If !NavComplete(lox,lnTime) > ??Chr(7) > Wait 'Timeout feil!' Window > lox.Visible=.F. > Release lox > Return >Endif >Wait Clear >lcHTML=lox.document.body.innertext >If !Empty(lcHTML) > MessageBox(lcHTML) >EndIf > >***************************************************************************** >Function NavComplete > Lpara toIE, tnTimeout > lnTimeout=Iif( Type("tnTimeout")="N",tnTimeout ,60 ) > lnTimeElapsed=0 > lnStartSeconds=Seconds() > Do While .T. > If toIE.ReadyState=4 And !toIE.Busy > Do While .T. > If toIE.Document.ReadyState="complete" > Return .T. > Endif > If (Seconds()-lnStartSeconds)>lnTimeout > Return .F. > Endif > Enddo > Endif > If (Seconds()-lnStartSeconds)>lnTimeout > Return .F. > Endif > Enddo >EndfuncTakk Tore. Between your code and Rick's, I think I am over the rough spot in this app.