JsonObject의 속성을 어떻게 동적으로 설정합니까?

Question

jquery와 ajax를 사용하여 내 마크 업과의 사이에서 Json을 전달하는 방법을 사용하고 있습니다. 이이 페이지에 자세히 설명 할 수 있습니다

 Dim objOrder As Object = New JsonObject() 
     For Each Order As BoVendorOrder In Orders 
      Dim Vendor As New BoVendor(Order.VendorID) 
      Dim test As String = Order.VendorOrderID 
      objOrder.test = Vendor.VendorName + " - " + Order.VendorOrderPoNumber 
     Next 

:이 코드 조각에서 http://blogs.telerik.com/aspnet-ajax/posts/12-04-27/the-present-and-future-of-using-json-in-webforms.aspx

, 나는 비즈니스 오브젝트의 값을 "테스트"라는 문자열 변수를 설정하여 동적 객체의 값을 설정하려고

간결함을 위해 몇 가지 코드를 생략했습니다.

이

 { 
      "123456": "VendorName - PONumber", 
      "678901": "VendorName - PONumber" 
     } 

당신의 상관 거기에이 작업을 수행하는 방법을 알고있는 사람 다음 JSON은 다음과 같습니다 있도록 목표는 objOrder.test가 VendorOrderID (우리의 SQL 데이터베이스의 수)와 동일하게 얻을 수 있습니다?

Answer 1

개체의 속성으로 주문 ID가 정말로 필요합니까? 직렬화 된 Dictionary (String, String 중)를 반환하는 것이 더 쉽습니다. 주문 ID로 여전히 조회 할 수 있으며 Javascript 객체의 소품보다 쉽게 ​​반복 할 수 있습니다.

다음은 사전 접근법을 사용 할 필요가했던 것과의 예 :

Dim OrdersDict as New Dictionary(Of String, String)() 
For Each Order as BoVendorOrder In Orders 
    If Not OrdersDict.ContainsKey(Order.VendorOrderID) Then 
     OrdersDict.Add(Order.VendorOrderID, Vendor.VendorName + " - " + Order.VendorOrderPoNumber) 
    End If 
Next 

' Serialize the dictionary object to JSON 

' Using System.Web.Script.Serialization.JavascriptSerializer: 
Dim Serializer As New JavaScriptSerializer 
If MaxLength Then Serializer.MaxJsonLength = Int32.MaxValue 
Dim x as String = Serializer.Serialize(OrdersDict) 'Return or response.write x as needed 

'or 

'Using JSON.net 
Dim x as String = JsonConvert.SerializeObject(OrdersDict) 'Return or response.write x as needed