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

本文介绍如何使用asp解析json字符串,大家都知道asp对json的处理没有php那么简单,也没有键值对数组,这可能也是它最终被php取代的直接原因。

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

代码如下:

Dim scriptCtrl
Function 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.result
End Function
Dim json
json = "{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 = Nothing
Set scriptCtrl = Nothing

本文由www.sxiaw.com提供,

文章地址:http://www.sxiaw.com/csharp-article-377133.html

学编程就来www.sxiaw.com www.sxiaw.com

以上就是asp如何解析json字符串并转化为asp对象的详细内容,更多请关注https://www.sxiaw.com/其它相关文章!