どうぞ。
<script language="javascript" runat="server" src="http://www.JSON.org/json2.js"></script>
<%
DIM jsonQueryString
SET jsonQueryString = JSON.parse("{}")
For Each item In Request.QueryString
DIM key : key = Request.QueryString.Key(item)
DIM val : val = Request.QueryString(key)(1)
jsonQueryString.set key, val
Next
Response.Write JSON.stringify(jsonQueryString)
%>
更新: 含まれている json2.js ファイルは json パーサー クラスですが、その場所にはありません。サーバーにあるコピーをダウンロードし、現在使用しています。次の URL で最新のコピーを見つけることができます - https://github.com/douglascrockford/JSON-js。
したがって、次の URL でテスト ページにアクセスすると、
http://localhost:8080/tests/ws/parsequerytojson.asp?a=1&b=2&c=3
次の JSON 形式の応答を取得します -
{
a: "1",
b: "2",
c: "3"
}