(Classic ASP) JSON AppendObject Example
Demonstrates the AppendObject function.
<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 }")
' Append an empty object named "addr"
' jObj is a Chilkat.JsonObject
Set jObj = json.AppendObject("addr")
Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"
' Expected output is: {"name":"John","marbles":100,"addr":{}}
' Add members to the object.
success = jObj.AppendString("street","1200 Elm St.")
success = jObj.AppendString("city","Springfield")
success = jObj.AppendInt("zip",60606)
Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"
' Expected output is: {"name":"John","marbles":100,"addr":{"street":"1200 Elm St.","city":"Springfield","zip":60606}}
%>
</body>
</html>
|
