艾恩Asp生成Json数据类

2023/2/22 17:11:41来源：CSDN13 阅读

dim json,json1,json2,json3,jsonStr,json4
set json=new Aien_Json				'定义主json对象
json.JsonType="object"				'json数据结构为对象
json.addData "name","panzhiming"		'添加数据
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","xiaoming"		'添加数据
json2.addData "school","miliangxiaoxue"
	
set json3=new Aien_Json				'定义一个json子对象
json3.JsonType="object"				'数据结构为对象
json3.addData "chinese",85			'添加数据
json3.addData "english",90

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

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

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

json2.addData "classes",Array(json3,json4)		'把json3添加到json2中，键名为classes	
json.addData "colors",json1			'把json1添加到json中，键名为colors
json.addData "others",json2		'把json2添加到json中，键名为others
json.addData "data",json5	



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

set json4=nothing
set json3=nothing
set json2=nothing
set json1=nothing
set json=nothing

Response.write jsonStr

'//输出生成数据

{
    "name": "panzhiming", 
    "isboy": "true", 
    "age": "23", 
    "luckyNumber": [
        "34", 
        "31", 
        "42"
    ], 
    "colors": [
        "green", 
        "red"
    ], 
    "others": {
        "wife": "xiaoming", 
        "school": "miliangxiaoxue", 
        "classes": [
            {
                "chinese": "85", 
                "english": "90"
            }, 
            {
                "chinese": "85", 
                "english": "90"
            }
        ]
    }, 
    "data": {
        "chinese": "85", 
        "english": "90"
    }
}


来源参考：https://blog.csdn.net/boys1999/article/details/43575811

下一条：asp各种文件操作UTF-8