[Resolvido] Erro ao ler xml

[eduardohaag 0]

Olá estou criando um sistema onde preciso calcular a previsão de envio do pedido em dias uteis, para isso estou usando um webservice gratuito que retorna um xml, porém estou tendo o erroSystem.XML.XmlException: 'Dados no nível raiz inválidos. Linha 1, posição 1.'

 

Meu código é 

Sub Preenchedata()
        Dim sql = "SELECT PrazoPadraoProducao FROM Configuracoes"
        Dim dr As DataTable = AcessoDB.ExecutarComando(sql, CommandType.Text, Nothing, AcessoDB.TipoDeComando.ExecuteDataTable)

        Dim ds As New DataSet
        Dim xml As String = "https://elekto.com.br/api/Calendars/br-BC/Add?initialDate=" & Now.Year & "-" & Now.Month & "-" & Now.Day & "&days=" & dr.Rows(0).Item(0) & "&type=work"
        ds.ReadXml(xml)

 

e o xml retornado é 

 

<dateTime xmlns="http://schemas.microsoft.com/2003/10/Serialization/">2019-05-03T00:00:00Z</dateTime>

 

Alguém tem alguma ideia de como posso eliminar o erro?

[quintelab 91]

Em qual parte do codigo esta lendo o valor do xml retornado ? 

O que eu vejo no código não é um xml.

[eduardohaag 0]

Estava tentando passar o retorno para um dataset.

 

A documentação do webservice esta em https://elekto.com.br/Blog/ComoConsumirApiDeCalendarios

Estou tentando utilizar a parte de Calendars/:businessCalendarCode/Add.

[quintelab 91]

Mas esta errada a forma como esta fazendo.  Você não esta chamando o webservice e usando o resultado dele.

 

Primeiro pesquise sobre como chamar um webservice.

[eduardohaag 0]

Optei por fazer criar um banco de dados com todos os feriados e fazer a consulta direto dentro do sistema sem usar o webservice.

Obrigado pelo auxilio