ASP JSON 파싱

'code_text
{
  "data": {
    "00": {
      "name": "데이터1",            
      "qty": "99999"      
    },
    "01": {
      "name": "데이터2",      
      "qty": "99999"     
    }
  }
}

'json2.asp 인클루드 필요

Dim jsonData : Set jsonData = JSON.parse(join(array(code_text)))
Dim jsonDataList

for each key in jsonData.data.enumerate()
	Set jsonDataList = jsonData.data.Get(key) 'data 는 json 내의 data	

	option_name=jsonDataList.name 'json내의 name
Next