Access JSON object keys having space in name in ASP.Net using C# and VB.Net

Hi aliyuusman,

Use the JsonProperty attribute to indicate the name.

Like below.

VB.Net

Public Class PaymentJSONresponce
    <JsonProperty("Order Id")>
    Public Property OrderId As String
    Public Property Amount As String
    Public Property Description As String
    <JsonProperty("Convenience Fee")>
    Public Property ConvenienceFee As String
    Public Property Currency As String
    Public Property Status As String
    <JsonProperty("Card Holder")>
    Public Property CardHolder As String
    Public Property PAN As String
    Public Property Scheme As String
    Public Property TranTime As String
    Public Property StatusDescription As String
End Class

C#

public class PaymentJSONresponce
{
    [JsonProperty("Order Id")]
    public string OrderId { get; set; }
    public string Amount { get; set; }
    public string Description { get; set; }
    [JsonProperty("Convenience Fee")]
    public string ConvenienceFee { get; set; }
    public string Currency { get; set; }
    public string Status { get; set; }
    [JsonProperty("Card Holder")]
    public string CardHolder { get; set; }
    public string PAN { get; set; }
    public string Scheme { get; set; }
    public string TranTime { get; set; }
    public string StatusDescription { get; set; }
}

Code

Dim GetURL As String = "https://sample.com/Status/" & txtPaymentrefrence.Text
Dim myGETRequest As HttpWebRequest = CType(WebRequest.Create(GetURL), HttpWebRequest)
myGETRequest.Method = "GET"
myGETRequest.Accept = "application/json"
Dim GETresponse As HttpWebResponse = CType(myGETRequest.GetResponse(), HttpWebResponse)
Dim GETStream As Stream = GETresponse.GetResponseStream()
Dim ReadGETstream As StreamReader = New StreamReader(GETStream, Text.Encoding.UTF8)
Dim JResult As String = ReadGETstream.ReadToEnd()
Dim Result As PaymentJSONresponce = Deserialize(Of PaymentJSONresponce)(JResult)
txtAmount.Text = Result.Amount
txtDescription.Text = Result.Description
txtScheme.Text = Result.Scheme
txtStatus.Text = Result.Status
txtTranDateTime.Text = Result.TranDateTime
txtPAN.Text = Result.PAN
txtJSON.Text = JResult.ToString
txtOrderId.Text = Result.OrderId
txtConvenienceFee.Text = Result.ConvenienceFee
txtCardHolder.Text = Result.CardHolder