。。。
Dim j : set j = Easp.Json.NewObject j("a") = "b" j("c") = Array(1,2,3,4) j("d") = Easp.Json.NewArray ....... j.toString()