FiveTech Support Forums

Hi, all !

I make a request to the site and want to get the DOM document

TRY
oHttp:= CreateObject( "MSXML2.XMLHTTP" )
CATCH
oHttp:= CreateObject( "microsoft.XMLHTTP" )
END

oHttp:Open( "GET", MyURL, 1)
oHttp:setRequestHeader( 'Content-type', 'text/xml')
oHttp:Send(NIL)

fl:=int(gettickcount()/1000)
do while .T.
    if oHttp:readyState=4.and.oHttp:Status=200
      cTxt:=oHttp:responseText
      oDc:=oHttp:responseXML
      exit
  endif
  millisec(50)

enddo

Everything works fine. oHttp:responseText returns an html text page, but the responseXML is empty. What am I doing wrong ?

Thank you, Enrico, for your help. However responceBody returns HTML, but not the document

What do you mean with "the document"? XML is a text, just like html body.

EMG

WEB document-page website. Respobsetext/Responsebody return a html page. ResponseXML returns a DOM-compatible document page, which you can parse with DOM tools.
For example oHttp:responseXML:getElementById("ABC")

In fact oHttp:Open( "GET", MyURL, 1), no different from oHttp:Open( "GET", MyURL, .T.)
It's still not working

Ok. I don't know why ResponseXML it's empty, sorry.

EMG

try with: oHttp:responseText