asp如何解析json字符串并转化为asp对象

下面代码经本人测试可用，

代码如下：

Dim scriptCtrlFunction parseJSON(str)    If Not IsObject(scriptCtrl) Then        Set scriptCtrl = Server.CreateObject("mSScriptControl.ScriptControl")        scriptCtrl.Language = "JScript"        scriptCtrl.AddCode "Array.PRototyPE.get = function(x) {
     return this[x];
 }
    ;
     VAR result = null;
    "    End If    scriptCtrl.Executestatement "result = " &
     str &
     ";
"    Set parseJSON = scriptCtrl.CodeObject.resultEnd FunctionDim jsonjson = "{
a:""aaa"", b:{
 name:""bb"", value:""text"" }
, c:[""ITem0"", ""item1"", ""item2""]}
    "Set obj = parseJSON(json)Response.Write obj.a &
     "br />
    "Response.Write obj.b.name &
     "br />
    "Response.Write obj.c.length &
     "br />
    "Response.Write obj.c.get(0) &
     "br />
    "Set obj = NothingSet scriptCtrl = Nothing

本文由PHP中文网提供，

文章地址：http://www.php.cn/csharp-article-377133.htML

学编程就来PHP中文网 www.php.cn

以上就是asp如何解析json字符串并转化为asp对象的详细内容，更多请关注其它相关文章！

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！