Новая справка для получения исходного значения из строки Json. Данные в приведенном ниже фрагменте кода содержат код "\"
------------- Данные Json -----------------
{
"type": "push",
"targets": ["stream"],
"push": {
"type": "mirror",
"source_device_iden": "ujzp6Xr9A4asjyjskXPzu8",
"source_user_iden": "ujzp6Xr9A4a",
"client_version": 354,
"dismissible": true,
"icon": "test",
"title": "ok",
"body": "Hi",
"application_name": "android",
"package_name": "com.android",
"notification_id": "1",
"notification_tag": "y9x5Q2YAI\/pqPhZwbaN6TpoW4eJhe0kAe0HfmWOQyWA=\n",
"conversation_iden": "{\"package_name\":\"com.android\",\"tag\":\"y9x5Q2YAI\\\/pqPhZwbaN6TpoW4eJhe0kAe0HfmWOQyWA=\\n\",\"id\":1}"
}
}
-------------------- VB код ---------------------------
Private Sub jsonData(JsonStr As String)
Dim json As String = JsonStr
Dim ser As JObject = JObject.Parse(json)
Dim data As List(Of JToken) = ser.Children().ToList
Dim Result as string
For Each item As JProperty In data
item.CreateReader()
Select Case item.Name
Case "push"
For Each msg As JObject In item
Result = msg("conversation_iden")
Next
End Select
Next
End Sub
--------------------------- resulet -----------------------------
Result = "{" package_name ":" com. com.android "," tag ":" y9x5Q2YAI / pqPhZwbaN6TpoW4eJhe0kAe0HfmWOQyWA = \ n "," id ": 1}"
исходное значение: "{\" имя_пакета \ ": \" com.android \ ",\ "тег \": \ "y9x5Q2YAI \ / pqPhZwbaN6TpoW4eJhe0kAe0HfmWOQyWA = \ п \", \ "идентификатор \": 1} "