Генерация динамического класса от XML до JSON

Question

То, что я пытаюсь достичь, - преобразовать XML в объект JSON. В настоящее время я делаю это так:

Public Class Person 
    Public Property Name As String 
    ' other properties here' 
End Class 

Dim doc As XmlDocument 
doc.LoadXml(arg_strXml) 
Dim jsonValue As String = JsonConvert.SerializeXmlNode(doc) 
Dim jsonObject = JsonConvert.DeserializeObject(Of Person)(jsonValue) 

Dim firstName As String = jsonObject.Name 

Однако вопрос извлеченную XML, и, таким образом, десериализованный объект JSON имеет различные поля/свойства/элементов в зависимости от правильного функционирования. Было бы кошмаром иметь класс для каждого возможного XML.

Есть ли способ обойтись без создания определенного класса (Person в этом случае) для каждого десериализации?

Answer 1

Вы можете deserialze/parse строку JSON в Newtonsoft's JObject. Тогда вы можете получить доступ к свойствам, как Dictionary(Of String, String), например:

Dim arg_strXml = "<Person><Name>foo</Name></Person>" 
Dim doc = New XmlDocument() 
doc.LoadXml(arg_strXml) 
Dim jsonValue = JsonConvert.SerializeXmlNode(doc) 
Dim jsonObject = JObject.Parse(jsonValue) 
Console.WriteLine(jsonObject("Person")("Name")) 

dotnetfiddle demo

выход:

foo