In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Interactuar con una REST api

Foro de Xailer profesional en español
Responder
Claudio C
Mensajes: 60
Registrado: Dom Sep 20, 2015 8:13 pm
Ubicación: Buenos Aires

Interactuar con una REST api

Mensaje por Claudio C »

Estimados:

Debo interactuar con una API_REST.
Luego de semanas logre 'leer' con el siguiente ejemplo

cURL:="https://www.elsitio.com.ar/index.php?ro ... s&id=50013"
WITH OBJECT TInternet():New( Self )
:nPort := inetHTTPS
:cAgent := "Panel2"
:nTimeOut:= 60000
IF :Open()
cTexto:=''
hData := :OpenURL( cURL )
WHILE :ReadFile( hData, @cData, 65536 )
cTexto += cData
ENDDO
nLen := hb_jsondecode( cTexto, @hData )
IF nLen > 0
.... Aca proceso el JSon
ENDIF
ENDIF
END WITH

Asi recibo correctamente el JSon de respuesta de varios comandos. Todo lo que es 'lectura' de informacion lo puedo hacer de esta manera.

Pero ahora me falta enviar información.
La pregunta es:
¿Como le paso un JSon a la Url?
Leí y probé con todo lo que encontré:
TInternet:OpenRequest -> probe de todas formas y siempre dio handler cero.
THTTPRequest -> nunca logré que se "despierte"

Agradeceria cualquier pista o ejemplo.
Desde ya gracias por su atencion.
Claudio.
Claudio C
Mensajes: 60
Registrado: Dom Sep 20, 2015 8:13 pm
Ubicación: Buenos Aires

Re: Interactuar con una REST api

Mensaje por Claudio C »

Sigo varado en este tema
Alguna pista?
Gracias
Responder