json.asp
<script language="JScript" runat="server">
var JSON;
if (!JSON) {
JSON = {};
}
(function () {
function f(n) {
// Format integers to have at least two digits.
return n < 10 ?
}
if (typeof Date.prototype.toJSON !==
Date.prototype.toJSON = function (key) {
return isFinite(this.valueOf())
? this.getUTCFullYear() +
f(this.getUTCMonth() + 1) +
f(this.getUTCDate()) +
f(this.getUTCHours()) +
f(this.getUTCMinutes()) +
f(this.getUTCSeconds()) +
: null;
};
String.prototype.toJSON =
Number.prototype.toJSON =
Boolean.prototype.toJSON = function (key) {
return this.valueOf();
};
}
var cx = /[\u0000\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g,
escapable = /[\\\"\x00-\x1f\x7f-\x9f\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g,
gap,
indent,
meta = { // table of character substitutions
'\b': '\\b',
'\t': '\\t',
'\n': '\\n',
'\f': '\\f',
'\r': '\\r',
'"
},
rep;
function quote(string) {
// If the string contains no control characters, no quote characters, and no
// backslash characters, then we can safely slap some quotes around it.
// Otherwise we must also replace the offending characters with safe escape
// sequences.
escapable.lastIndex = 0;
return escapable.test(string) ?
var c = meta[a];
return typeof c ===
? c
:
}) +
}
function str(key, holder) {
// Produce a string from holder[key].
var i, // The loop counter.
k, // The member key.
v, // The member value.
length,
mind = gap,
partial,
value = holder[key];
// If the value has a toJSON method, call it to obtain a replacement value.
if (value && typeof value ===
typeof value.toJSON ===
value = value.toJSON(key);
}
// If we were called with a replacer function, then call the replacer to
// obtain a replacement value.
if (typeof rep ===
value = rep.call(holder, key, value);
}
// What happens next depends on the value
switch (typeof value) {
case
return quote(value);
case
// JSON numbers must be finite. Encode non-finite numbers as null.
return isFinite(value) ? String(value) :
case
case
// If the value is a boolean or null, convert it to a string. Note:
// typeof null does not produce
// the remote chance that this gets fixed someday.
return String(value);
// If the type is
// null.
case
// Due to a specification blunder in ECMAScript, typeof null is
// so watch out for that case.
if (!value) {
return
}
// Make an array to hold the partial results of stringifying this object value.
gap += indent;
partial = [];
// Is the value an array?
if (Object.prototype.toString.apply(value) ===
// The value is an array. Stringify every element. Use null as a placeholder
// for non-JSON values.
length = value.length;
for (i = 0; i < length; i += 1) {
partial[i] = str(i, value) ||
}
// Join all of the elements together, separated with commas, and wrap them in
// brackets.
v = partial.length === 0
?
: gap
?
:
gap = mind;
return v;
}
// If the replacer is an array, use it to select the members to be stringified.
if (rep && typeof rep ===
length = rep.length;
for (i = 0; i < length; i += 1) {
if (typeof rep[i] ===
k = rep[i];
v = str(k, value);
if (v) {
partial.push(quote(k) + (gap ?
}
}
}
} else {
// Otherwise, iterate through all of the keys in the object.
for (k in value) {
if (Object.prototype.hasOwnProperty.call(value, k)) {
v = str(k, value);
if (v) {
partial.push(quote(k) + (gap ?
}
}
}
}
// Join all of the member texts together, separated with commas,
// and wrap them in braces.
v = partial.length === 0
?
: gap
?
:
gap = mind;
return v;
}
}
// If the JSON object does not yet have a stringify method, give it one.
if (typeof JSON.stringify !==
JSON.stringify = function (value, replacer, space) {
// The stringify method takes a value and an optional replacer, and an optional
// space parameter, and returns a JSON text. The replacer can be a function
// that can replace values, or an array of strings that will select the keys.
// A default replacer method can be provided. Use of the space parameter can
// produce text that is more easily readable.
var i;
gap =
indent =
// If the space parameter is a number, make an indent string containing that
// many spaces.
if (typeof space ===
for (i = 0; i < space; i += 1) {
indent +=
}
// If the space parameter is a string, it will be used as the indent string.
} else if (typeof space ===
indent = space;
}
// If there is a replacer, it must be a function or an array.
// Otherwise, throw an error.
rep = replacer;
if (replacer && typeof replacer !==
(typeof replacer !==
typeof replacer.length !==
throw new Error(
}
// Make a fake root object containing our value under the key of
// Return the result of stringifying the value.
return str(
};
}
// If the JSON object does not yet have a parse method, give it one.
if (typeof JSON.parse !==
JSON.parse = function (text, reviver) {
// The parse method takes a text and an optional reviver function, and returns
// a JavaScript value if the text is a valid JSON text.
var j;
function walk(holder, key) {
// The walk method is used to recursively walk the resulting structure so
// that modifications can be made.
var k, v, value = holder[key];
if (value && typeof value ===
for (k in value) {
if (Object.prototype.hasOwnProperty.call(value, k)) {
v = walk(value, k);
if (v !== undefined) {
value[k] = v;
} else {
delete value[k];
}
}
}
}
return reviver.call(holder, key, value);
}
// Parsing happens in four stages. In the first stage, we replace certain
// Unicode characters with escape sequences. JavaScript handles many characters
// incorrectly, either silently deleting them, or treating them as line endings.
text = String(text);
cx.lastIndex = 0;
if (cx.test(text)) {
text = text.replace(cx, function (a) {
return
(
});
}
// In the second stage, we run the text against regular expressions that look
// for non-JSON patterns. We are especially concerned with
// because they can cause invocation, and
// But just to be safe, we want to reject all unexpected forms.
// We split the second stage into 4 regexp operations in order to work around
// crippling inefficiencies in IE
// replace the JSON backslash pairs with
// replace all simple value tokens with
// open brackets that follow a colon or comma or that begin the text. Finally,
// we look to see that the remaining characters are only whitespace or
//
if (/^[\],:{}\s]*$/
.test(text.replace(/\\(?:["\\\/bfnrt]|u[0-9a-fA-F]{4})/g, '@')
.replace(/"[^"\\\n\r]*"|true|false|null|-?\d+(?:\.\d*)?(?:[eE][+\-]?\d+)?/g,
.replace(/(?:^|:|,)(?:\s*\[)+/g,
// In the third stage we use the eval function to compile the text into a
// JavaScript structure. The
// in JavaScript: it can begin a block or an object literal. We wrap the text
// in parens to eliminate the ambiguity.
j = eval(
// In the optional fourth stage, we recursively walk the new structure, passing
// each name/value pair to a reviver function for possible transformation.
return typeof reviver ===
? walk({
: j;
}
// If the text is not JSON parseable, then a SyntaxError is thrown.
throw new SyntaxError(
};
}
}());
</script>
출처: 쿠팡 https://developers.coupangcorp.com/hc/en-us/articles/360033396834-Classic-ASP-Example 최하단 제공하는 소스압축 파일내 존재함
<!--#include file="json.asp"-->
<%
Call Response.AddHeader("Access-Control-Allow-Origin", "*")
Response.ContentType = "application/json"
dim bytes,binary,reqbody
bytes=Request.TotalBytes
binary=Request.BinaryRead(bytes)
set stream = Server.CreateObject("Adodb.Stream")
stream.type = 1
stream.open
stream.write(binary)
stream.position = 0
stream.type = 2
stream.charset = "utf-8"
reqbody=stream.readtext()
stream.close
set stream = nothing
dim params
set params = JSON.parse(reqbody)
%>
json이 { "id": "test", "age": 100, "group": { "group_name": "dev" } }라고 치면
params.id
params.age
params.group.group_name
으로 접근가능함
<%
set params = nothing
%>
