TUrl,TIPClientHttp devuelve NOCONNET en uno de los usuarios.

TUrl,TIPClientHttp devuelve NOCONNET en uno de los usuarios.

Postby jnavas » Fri Sep 08, 2023 1:46 am

Saludos
Poseo aplicación que lee esta pagina web y obtiene valores de la divisa.
En varios PC de otros usuarios en diferentes redes funciona sin novedad. En otro usuario en otra red devuelve NOCONNET, agradecemos sus recomendaciones.

Code: Select all  Expand view


DEFAULT cUrl := "https://www.bcv.org.ve"

   BEGIN SEQUENCE

        oUrl = TUrl():New( cUrl )

        IF EMPTY( oUrl )
            BREAK
        ENDIF

        oCli = TIPClientHttp():New( oUrl )

        IF EMPTY( oCli )
           BREAK
        ENDIF

        IF !oCli:Open( oUrl )
           BREAK
        ENDIF

        WHILE .T.

          cString := oCli:Read()

          IF Empty(cString)
            EXIT
          ENDIF

          cMemo:=cMemo+cString
 
User avatar
jnavas
 
Posts: 479
Joined: Wed Nov 16, 2005 12:03 pm
Location: Caracas - Venezuela

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 59 guests