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.
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.
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
Re: Interactuar con una REST api
Sigo varado en este tema
Alguna pista?
Gracias
Alguna pista?
Gracias