Позвольте мне сэкономить массу хлопот и помочь вам с вашим набором данных (я предполагаю, что это ваш веб-сервис, если не я извиняюсь).
Вместо сериализации всего набора данных сначала запустите его через эту функцию и верните в виде строки.
Public Function FormatDataSet(ByVal ds As DataSet)
Try
Dim xmlstream As New StringBuilder
Dim write As XmlWriter = XmlWriter.Create(xmlstream)
write.WriteProcessingInstruction("xml", "version='1.0' encoding='utf-8'")
ds.WriteXml(write)
Return xmlstream.ToString()
Catch ex As Exception
Return ex.Message
End Try
End Function
Это исключит схему .NET и предоставит вам легко анализируемый XML (даже SimpleXML сможет его проанализировать). Вам понадобятся System.Text и System.Xml