Hi José,

this is the code my applications use to establish a connection to a home banking site, including a progress bar for the user.
The max time given to the web browser control to open the site is in lnHBFailureDelay.

    loIE.Navigate(lcHBURL)
    llReady = .F.
    ltStart = DATETIME()
    lfrmPB  = CREATEOBJECT("frmprogressbar",
                           "WebSite der Bank wird gesucht... (max. Dauer: "
                           +TRANSFORM(lnHBFailureDelay)+" s)")
    WITH lfrmPB
      .setBar(0)
      .Show()
      lnSec = 0
      DO WHILE (DATETIME()-ltStart) <= lnHBFailureDelay
        lnBuf = INT(DATETIME()-ltStart)
        IF lnBuf > lnSec 
          lnSec = lnBuf
          .setBar(100*lnSec/lnHBFailureDelay)
          IF loIE.ReadyState >= READYSTATE_LOADED
            llReady = .T.
            EXIT
          ENDIF
        ENDIF
      ENDDO
    ENDWITH
    lfrmPB = .NULL.
    IF NOT llReady
* site is not there 
    ENDIF

HTH Robert