(Classic ASP) JSON AppendArrayCopy Example

Demonstrates the AppendArrayCopy function.

Note: This example requires Chilkat v9.5.0.82 or above.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set json = Server.CreateObject("Chilkat.JsonObject")
success = json.Load("{ ""name"": ""John"", ""marbles"": 100 }")

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonArray")
set jarr = Server.CreateObject("Chilkat.JsonArray")
success = jarr.Load("[ 1, 2, 3, ""apple"", ""orange"", [ 10, 20, 30 ], { ""name"": ""Alfred""} ]")

' Copy the contents of jar to a new array member named "stuff".
success = json.AppendArrayCopy("stuff",jarr)

Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"
' Expected output is:  {"name":"John","marbles":100,"stuff":[1,2,3,"apple","orange",[10,20,30],{"name":"Alfred"}]}

' Note: The contents of the array were copied.
' If we modify the contents of jarr, it does not modify the array contained within "json" because it is a separate copy.
' For example:
success = jarr.AddIntAt(-1,2020)
Response.Write "<pre>" & Server.HTMLEncode( jarr.Emit()) & "</pre>"
' Expected output: [1,2,3,"apple","orange",[10,20,30],{"name":"Alfred"},2020]

Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"
' Remains unchanged: {"name":"John","marbles":100,"stuff":[1,2,3,"apple","orange",[10,20,30],{"name":"Alfred"}]}

%>
</body>
</html>