Classic ASP
Sort JSON Object by Member Key Name

Demonstrates how to sort the members of a JSON object by the key name.
Chilkat Classic ASP Downloads

Classic ASP
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set json = Server.CreateObject("Chilkat.JsonObject")

success = json.UpdateString("xyz","1234")
success = json.UpdateString("abc.xyz","1234")
success = json.UpdateString("abc.def","1234")
success = json.UpdateString("abc.aaa","1234")
success = json.UpdateString("ghi","1234")
success = json.UpdateString("nmo","1234")

json.EmitCompact = 0
Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"

' This is our initial JSON:

' {
'   "xyz": "1234",
'   "abc": {
'     "xyz": "1234",
'     "def": "1234",
'     "aaa": "1234"
'   },
'   "ghi": "1234",
'   "nmo": "1234"
' }

' Sort the top-level JSON object by key.
ascending = 1
caseSensitive = 1
json.Sort ascending,caseSensitive

' Look at the sorted JSON..
Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"

' {
'   "abc": {
'     "xyz": "1234",
'     "def": "1234",
'     "aaa": "1234"
'   },
'   "ghi": "1234",
'   "nmo": "1234",
'   "xyz": "1234"
' }

' Now sort the members of the "abc" object..
set jsonAbc = Server.CreateObject("Chilkat.JsonObject")
success = json.ObjectOf2("abc",jsonAbc)

jsonAbc.Sort ascending,caseSensitive

' Now look at the JSON with the members under "abc" also sorted..
Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"

' {
'   "abc": {
'     "aaa": "1234",
'     "def": "1234",
'     "xyz": "1234"
'   },
'   "ghi": "1234",
'   "nmo": "1234",
'   "xyz": "1234"
' }

%>
</body>
</html>