Предыстория:
Имеется программа, которую разрабатываю и использую в повседневке несколько лет, она написана под .NEW framework 3.5 и перейти на другую более новую версию, пока нет возможности. В ней есть куча настроек, которые хранятся в едином конфиге, собираемом через SOAP сериализацию в XML файл. В который в свою очередь записываются массивы, строки, справочники, хеши и конвертированные в JSON объекты. В связи с тем что программа постоянно дорабатывается, возникает момент когда нужно добавить в какой то JSON конфиг объект, новые свойства и после их добавления в программе, файлы проектов перестают конвертироваться при чтении, так как не видят новых свойств в уже сохраненном на диске конфиге.
Есть мысли о решении, собрал небольшое демо (консольное приложение):
Imports System.IO
Imports System.Runtime.Serialization.Json
Imports System.Text
Module MD
Private storeObject As DataConfig
Private loadObject As DataConfig
Private tmpJson As String
Sub Main()
' Создаем тестовый объект
storeObject = New DataConfig
' Присвоим пару значений
With storeObject
.PropertyOne = "значение 1"
.PropertyTwo = "значение 2"
End With
' Конвертнем в Json
tmpJson = ToJSON(storeObject)
' Пытаемся восстановить объект
loadObject = ToDataConfig(tmpJson)
End Sub
Function ToJSON(ByRef obj As DataConfig) As String
Dim stream1 As New MemoryStream()
Dim ser As New DataContractJsonSerializer(GetType(DataConfig))
ser.WriteObject(stream1, obj)
stream1.Position = 0
Dim sr As New StreamReader(stream1)
Dim jsonOut As String = sr.ReadToEnd
Return jsonOut
End Function
Function ToDataConfig(ByVal json As String) As DataConfig
Dim js As New DataContractJsonSerializer(GetType(DataConfig))
Dim ms As New IO.MemoryStream(UTF8Encoding.UTF8.GetBytes(json))
Return js.ReadObject(ms)
End Function
End Module
Код класса DataConfig
Public Class DataConfig
Private _property_one As String
Public Property PropertyOne() As String
Get
Return _property_one
End Get
Set(ByVal value As String)
_property_one = value
End Set
End Property
Private _property_two As String
Public Property PropertyTwo() As String
Get
Return _property_two
End Get
Set(ByVal value As String)
_property_two = value
End Set
End Property
End Class
Вопрос:
Слышал про то, что есть в .NET, динамические объекты, и возможность динамически задавать свойства объекту во время выполнения программы.
- Как собственно дописать класс
DataConfig
для подобного использования? - Как использовать в примере, между конвертацией в json и восстановлением обратно в объект?
ссылка на проект, на яндекс диске
update
Ответ на C# не принимается, у вопроса нет метки C#, нужно изменить код приведенный в вопросе.
update
update
Применил библиотеку Newtonsoft.Json
при попытке десериализации ошибок не выдает, но и объект не заполняет вложенными свойствами, заполняет только свойства верхнего уровня.
Испытуемый JSON:
{
"ExProperty": {
"_disabled": false,
"_el_class": null,
"_enum_values": [],
"_id": "124",
"_inline_script": null,
"_inline_style": null,
"_innerHTML": null,
"_input_max": 0,
"_input_min": 0,
"_input_min_zero": false,
"_input_subtype": null,
"_nolabel": true,
"_onclick": null,
"_order": 0,
"_parent_wrapp_class": "rrrrrrr",
"_placeholder": null,
"_value": null,
"_width": 0,
"_wrapp_class": null,
"_wrapp_col_md": 55,
"_wrapp_label_class": "eeee",
"_dt_append": null,
"_dt_append_name": null,
"_dt_name": null,
"_fieldSet": [
"qqqqqqqqqqqqq",
"aaaaaaaaaaa",
"ssssssssssssss",
"dddddddddddddd",
"fgfffffffffffffffffff"
],
"_fieldset_name": "aaaaaaaaaaa",
"_isfiltr": false,
"_lbl": null,
"_lbl_short": null,
"_lkp_filter": null,
"_lkp_idas": null,
"_lkp_nameas": null,
"_lkp_table": null,
"_req": false,
"_sh_in_add": false,
"_sh_in_edit": false,
"_sh_in_list": false,
"_type": null
},
"PropertyOne": "значение 1",
"PropertyThree": null,
"PropertyTwo": "значение 2"
}
Код который пытается выполнить десериализацию.
tmpJson = File.ReadAllText("test.json")
loadObject = JsonConvert.DeserializeObject(Of DataConfig)(tmpJson)
В ходе обратных испытаний, выяснилось что форматы не совпадают, то есть сконвертировав объект методом
tmpJson = File.ReadAllText("test.json")
loadObject = ToDataConfig(tmpJson)
tmpJson = JsonConvert.SerializeObject(loadObject)
На выходе получим похожий JSON, но в другом порядке.
{
"PropertyOne": "значение 1",
"PropertyTwo": "значение 2",
"PropertyThree": null,
"ExProperty": {
"fieldSets": [
"qqqqqqqqqqqqq",
"aaaaaaaaaaa",
"ssssssssssssss",
"dddddddddddddd",
"fgfffffffffffffffffff"
],
"fieldset_name": "aaaaaaaaaaa",
"lbl": null,
"lbl_short": null,
"type": 0,
"req": false,
"lkp_table": null,
"lkp_nameas": null,
"lkp_idas": null,
"lkp_filter": null,
"dt_name": null,
"dt_append_name": null,
"dt_append": null,
"sh_in_edit": false,
"sh_in_add": false,
"sh_in_list": false,
"isfiltr": false,
"order": 0,
"wrapp_col_md": 55,
"parent_wrapp_class": "rrrrrrr",
"wrapp_class": null,
"wrapp_label_class": "eeee",
"el_class": null,
"value": null,
"innerHTML": null,
"placeholder": null,
"nolabel": true,
"width": 0,
"onClick": null,
"inlineStyle": null,
"Disabled": false,
"Id": "124",
"inlineScript": null,
"inputSubtype": null,
"InputMinZero": false,
"inputMin": 0,
"inputMax": 0,
"EnumValues": []
}
}
Задача почти решена, но требует доработки все же.
update
Добавил ссылку на проект с демонстрацией вложенного объекта ExProperty
ExProperty
?Newtonsoft.Json
чувствителен к формату, он сохраняет не приватные а публичные свойства объекта, когда какDataContractJsonSerializer
сохраняет приватные свойства.