hb_jsonDecode() this Website
Posted: Sun Mar 19, 2023 4:10 am
hi,
i try to use hb_jsonDecode() for "this" Website but i got NIL ...
---
my old working Way
this way i got Website from "cURL" as "cFile" in HTML Format which i try to "analyze" to get Information
...
1st Try :
i try to use cFile which i have download above
but aReturn is NIL and aArray is Empty ...
what i´m doing wrong
---
i try to change oHttp:setRequestHeader() to
and try
but still Result x1 is NIL and aArray is Empty ...
---
can somebody show me how use use hb_jsonDecode() for "this" Website
need some help please
i try to use hb_jsonDecode() for "this" Website but i got NIL ...
---
my old working Way
Code: Select all | Expand
cUrl := "https://forums.fivetechsupport.com/viewtopic.php?t=42918"
oHttp:Open( "GET", cUrl, .F. )
oHttp:setRequestHeader( "User-Agent", "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:68.0) Gecko/20100101 Firefox/68.0" )
oHttp:Send()
IF nStatus = 200
StrFile( oHttp:ResponseBody(), cFile )...
1st Try :
Code: Select all | Expand
PROCEDURE TestJSON()
LOCAL cFile, cMemo, aReturn,ii,nMax,aArray
cFile := "d:\PHPFORUM\FWH\T0042918.HTML"
cMemo := MEMOREAD(cFile)
aReturn := hb_jsonDecode(cMemo, @aArray )
altd()
RETURNbut aReturn is NIL and aArray is Empty ...
what i´m doing wrong
---
i try to change oHttp:setRequestHeader() to
Code: Select all | Expand
oHttp:setRequestHeader( "Content-Type", "text/xml; charset=utf-8")Code: Select all | Expand
* x1 := hb_jsonDecode( oHttp:responseText, @aArray )
x1 := hb_jsonDecode( oHttp:ResponseBody(), @aArray )
altd()---
can somebody show me how use use hb_jsonDecode() for "this" Website
need some help please