asp生成json格式(常用示例方法)

【核心代码】

<!--#include file="json.inc"-->
<%
dim json,json1,json2,json3,jsonStr
set json=new Aien_Json '定义主json对象
json.JsonType="object" 'json数据结构为对象
json.addData "name","anlige" '添加数据
json.addData "isboy",true
json.addData "age",23
json.addData "luckyNumber",Array(34,31,42)

set json2=new Aien_Json '定义一个json子对象
json2.JsonType="object" '数据结构为对象
json2.addData "wife","Tandy" '添加数据
json2.addData "school","OUC"

set json3=new Aien_Json '定义一个json子对象
json3.JsonType="object" '数据结构为对象
json3.addData "chinese",85 '添加数据
json3.addData "english",90

set json1=new Aien_Json '定义一个json子对象
json1.JsonType="array" '数据结构为数组
json1.addData "color1","green" '添加数据
json1.addData "color2","red"

json2.addData "'classes'",json3 '把json3添加到json2中，键名为classes
json.addData "colors",json1 '把json1添加到json中，键名为colors
json.addData "others",json2 '把json2添加到json中，键名为others

jsonStr=json.getJson(json) '获取最后生成的json字符串，本函数只有第一次调用有效
set json3=nothing
set json2=nothing
set json1=nothing
set json=nothing
response.Write jsonStr

%> 
<script type="text/javascript">
/*var myinfo=<%'=jsonStr%>;
document.title="我的简介";
document.writeln("我的名字是" myinfo.name ",");
document.writeln((myinfo.isboy?"是":"不是") "一个男孩,");
document.writeln("今年" myinfo.age "岁了,");
document.writeln("我的幸运数字是" myinfo.luckyNumber "。<br />");
document.writeln("我有一些其他信息，我的妻子叫" myinfo.others.wife ",我在" myinfo.others.school "上学;<br />");
document.writeln("另外，我还修了两门课程");
for(var i in myinfo.others.classes){
document.writeln(i "得分" myinfo.others.classes[i] "");
}
document.writeln("。<br />我喜欢的颜色" myinfo.colors "。");
*/
</script>