TUrl,TIPClientHttp devuelve NOCONNET en uno de los usuarios.
Posted: 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.
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
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