[EtC] Classic ASP 에서 외부링크의 JSON 결과 가지고 오기

Dim result
Dim xmlhttp
Set xmlhttp = Server.CreateObject("Microsoft.XMLHTTP")
 
xmlhttp.Open "GET", "http://test.url?idx=" & session("idx"), false
xmlhttp.setRequestHeader "Content-Type", "application/json; charset=utf-8"
xmlhttp.send
result = xmlhttp.responseText
Set xmlhttp = Nothing
Response.Write result

참고 : Classic ASP 용 JSON Parser http://www.aspjson.com/