我正在嘗試反序列化 JSON 回傳,但是當我嘗試在最高級別反序列化時它會出錯,或者如果我開始深入研究 json 則不會出錯并且只回傳空值。
我的反序列化的其余部分只得到“空”回傳——我已經成功地messages單獨反序列化了,但是當我嘗試做很多事情時,它只會將空值回傳給我的所有值。
當我嘗試在 處反序列化時response,它提供了錯誤,我不清楚究竟是什么錯誤。
模型
Public Class response
public property http_code as string
public property response_code as string
public property response_msg as string
public property data as smsdata
End Class
Public Class smsdata
public property total_price as string
public property total_count as string
public property queued_count as string
public property messages as messages
End Class
Public Class messages
Public property messages as list(of message)
End Class
Public Class message
Public Property direction as string
<JsonProperty("date")>
Public property daterange as string
<JsonProperty("to")>
public property recipient as string
public property body as string
public property from as string
public property schedule as string
public property message_id as string
public property message_parts as string
public property message_price as string
public property from_email as string
public property list_id as string
public property custom_string as string
public property contact_id as string
public property user_id as string
public property subaccount_id as string
public property country as string
public property carrier as string
public property status as string
End Class```
Module Program
Sub Main(args As String())
dim jsonstring as string = "{ 'http_code': 200, 'response_code': 'SUCCESS', 'response_msg': 'Messages queued for delivery.', 'data': { 'total_price': 0.0516, 'total_count': 2, 'queued_count': 2, 'messages': [ { 'direction': 'out', 'date': 1637744634, 'to': ' 44771111111111', 'body': 'test message, please ignore 1', 'from': 'Shield', 'schedule': 1637744634, 'message_id': 'A3F48CA8-79E6-416F-A8C6-7660BD7B7632', 'message_parts': 1, 'message_price': '0.0258', 'from_email': null, 'list_id': null, 'custom_string': '', 'contact_id': null, 'user_id': 100525, 'subaccount_id': 116285, 'country': 'GB', 'carrier': 'O2', 'status': 'SUCCESS' }, { 'direction': 'out', 'date': 1637744634, 'to': ' 4477222222222', 'body': 'test message, please ignore 2', 'from': 'Clubcare', 'schedule': 1637744634, 'message_id': '670E96E2-ED4F-4FAB-8594-D49B244EA2C3', 'message_parts': 1, 'message_price': '0.0258', 'from_email': null, 'list_id': null, 'custom_string': '', 'contact_id': null, 'user_id': 100525, 'subaccount_id': 116285, 'country': 'GB', 'carrier': 'O2', 'status': 'SUCCESS' } ], '_currency': { 'currency_name_short': 'GBP', 'currency_prefix_d': '£', 'currency_prefix_c': 'p', 'currency_name_long': 'British Pounds' } } }"
dim results = JsonConvert.DeserializeObject(Of response)(jsonstring)
End Sub
End Module
uj5u.com熱心網友回復:
檢查您的代碼和示例資料:
Public Class smsdata
public property total_price as string
public property total_count as string
public property queued_count as string
public property messages as List (Of message)
End Class
應該可以解決問題,您可以轉儲 Messages 類
(從單個 qoutes 開始:我從未使用過它們,但是 VS-Code 將它們標記為錯誤,但是 :-))
轉載請註明出處,本文鏈接:https://www.uj5u.com/ruanti/366496.html
