Const adTypeText = 2

Const adTypeBinary = 1

'Create Stream object

Dim BinaryStream 'As New Stream

Set BinaryStream = CreateObject("ADODB.Stream")

'Specify stream type - we want To save text/string data.

BinaryStream.Type = adTypeBinary

'Open the stream And write text/string data To the object

BinaryStream.Open

BinaryStream.Write objXMLHTTP.responseBody

'Change stream type To binary

BinaryStream.Position = 0

BinaryStream.Type = adTypeText

'Specify charset For the source text (unicode) data.

BinaryStream.CharSet = "us-ascii"

'Open the stream And get binary data from the object

myString = BinaryStream.ReadText

 Is there another way I can read the answer from the server without using ADODB.Stream?

It seems like it is not supported ind Windows CE (the operating system of the panel)

I have to get the answer in a tag, så I can take some actions.