(Excel) JSON Insert Empty Array or Object

Demonstrates how to use the UpdateNewArray and UpdateNewObject methods to insert an empty array or object.

Note: The UpdateNewArray an UpdateNewObject methods were introduced in Chilkat v9.5.0.75.

Download Excel Class Modules Chilkat Excel Class Modules

Dim json As Chilkat.JsonObject
Set json = Chilkat.NewJsonObject

' The following code builds the following JSON, which contains both an empty array and empty object:

' 	{
' 	  "abc": {
' 	    "xyz": [
' 	      {
' 	        "Name": "myName",
' 	        "Description": "description",
' 	        "ScheduleDefinition": "schedule definition",
' 	        "ExceptionScheduleDefinition": "",
' 	        "Attribute": [
' 	        ],
' 	        "SomeEmptyObject": {},
' 	        "token": "token"
' 	      }
' 	    ]
' 	  }
' 	}

Dim success As Boolean
success = json.UpdateString("abc.xyz[0].Name","myName")
success = json.UpdateString("abc.xyz[0].Description","description")
success = json.UpdateString("abc.xyz[0].ScheduleDefinition","schedule definition")
success = json.UpdateString("abc.xyz[0].ExceptionScheduleDefinition","")
success = json.UpdateNewArray("abc.xyz[0].Attribute")
success = json.UpdateNewObject("abc.xyz[0].SomeEmptyObject")
success = json.UpdateString("abc.xyz[0].token","token")

json.EmitCompact = False
Debug.Print json.Emit()