[WebService em VB6]

Pessoal preciso de ajuda

Nessa brincadeira de web service eu ainda estou bem no inicio. Tenho uma aplicação em VB6 e preciso ler uma web service que me traz esse resultado abaixo

<BaseResponse xmlns:i="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://schemas.datacontract.org/2004/07/Southwayy.PrintWayy.WebService.Models"i:type="PrinterResponse">

<Code>0</Code>

<Success>true</Success>

<Printers>

<Printer>

<SerialNumber>AK18054352</SerialNumber>

<Department/>

<IPAddress>10.10.6.55</IPAddress>

<GeneralCountStartDateOfCapture>2017-09-20T17:48:32.287</GeneralCountStartDateOfCapture>

<GeneralCountEndDateOfCapture>2017-09-21T16:57:31.317</GeneralCountEndDateOfCapture>

<GeneralCountStart>18943</GeneralCountStart>

<GeneralCountEnd>18987</GeneralCountEnd>

<MonoCountStartDateOfCapture>2017-09-20T17:48:32.287</MonoCountStartDateOfCapture>

<MonoCountEndDateOfCapture>2017-09-21T16:57:31.317</MonoCountEndDateOfCapture>

<MonoCountStart>18943</MonoCountStart>

<MonoCountEnd>18987</MonoCountEnd>

<ColorCountStartDateOfCapture>0001-01-01T00:00:00</ColorCountStartDateOfCapture>

<ColorCountEndDateOfCapture>0001-01-01T00:00:00</ColorCountEndDateOfCapture>

<ColorCountStart>0</ColorCountStart>

<ColorCountEnd>0</ColorCountEnd>

<ScanCountStartDateOfCapture>0001-01-01T00:00:00</ScanCountStartDateOfCapture>

<ScanCountEndDateOfCapture>0001-01-01T00:00:00</ScanCountEndDateOfCapture>

<ScanCountStart>0</ScanCountStart>

<ScanCountEnd>0</ScanCountEnd>

<A3MonoCountStartDateOfCapture>0001-01-01T00:00:00</A3MonoCountStartDateOfCapture>

<A3MonoCountEndDateOfCapture>0001-01-01T00:00:00</A3MonoCountEndDateOfCapture>

<A3MonoCountStart>0</A3MonoCountStart>

<A3MonoCountEnd>0</A3MonoCountEnd>

<A3ColorCountStartDateOfCapture>0001-01-01T00:00:00</A3ColorCountStartDateOfCapture>

<A3ColorCountEndDateOfCapture>0001-01-01T00:00:00</A3ColorCountEndDateOfCapture>

<A3ColorCountStart>0</A3ColorCountStart>

<A3ColorCountEnd>0</A3ColorCountEnd>

</Printer>

</Printers>

</BaseResponse>

 

No modelo desse exemplo está bem mais simplificado o resultado, eu gostaria de saber como consigo ler isso com esse exemplo do comando que vocês fizeram nesse tópico. Eu fiz os testes com o CEP e tudo funciona bem. Tem algum segredo que possa me ajudar? é uma urgência por favor

[POST JSON NO VB6]

Preciso de uma pessoa que entenda post / json no vb6. Alguém tem artigos sobre isso? Alguém poderia dar um treinamento sobre o assunto?