asp/vbscript将json字符解析为json对象的方法，如果asp使用jscript来编写服务器端代码操作json字符串就简单了，vbscript需要MSScriptControl.ScriptControl或者服务器端的jscript来作为中间体才行。
vbscript将json字符解析为json对象的方法一
使用MSScriptControl.ScriptControl组件，请用IE浏览器运行本示例，会有安全提示，需要点击“是”允许创建。
代码如下:
<script language="vbscript">
Dim sc4Json
Sub InitScriptControl
Set sc4Json = CreateObject("MSScriptControl.ScriptControl")
sc4Json.Language = "JavaScript"
sc4Json.AddCode "var itemTemp=null;function getJSArray(arr, index){itemTemp=arr[index];}"
End Sub
Function getJSONObject(strJSON)
sc4Json.AddCode "var jsonObject = " & strJSON
Set getJSONObject = sc4Json.CodeObject.jsonObject
End Function
Sub getJSArrayItem(objDest,objJSArray,index)
On Error Resume Next
sc4Json.Run "getJSArray",objJSArray, index
Set objDest = sc4Json.CodeObject.itemTemp
If Err.number=0 Then Exit Sub
objDest = sc4Json.CodeObject.itemTemp
End Sub
Dim strTest
strTest = "{name:""alonely"", age:24,hello:function(){return '你好！';}, email:[""ycplxl1314@163.com"",""ycplxl1314@gmail.com""], family:{parents:[""父亲"",""母亲""],toString:function(){return ""家庭成员"";}}}"
Dim objTest
Call InitScriptControl'初始化MSScriptControl.ScriptControl组件
Set objTest = getJSONObject(strTest)'创建JSON对象
'对象属性操作
msgbox objTest.name&"-"&objTest.age
'数组操作
getJSArrayItem email,objTest.email,0
msgbox email
'执行方法
msgbox objTest.hello()
msgbox objTest.family.toString()
</script>
vbscript将json字符解析为json对象的方法二
用jscript作为中间体
代码如下:
<script language="javascript">//运行在服务器端时，增加runat="server"属性
Array.prototype.get = function(x) { return this[x]; };
function parseJSON(strJSON) { return eval("(" + strJSON + ")"); }
</script>
<script language="vbscript">
Dim json, obj
json = "{a:""aaa"", b:{ name:""bb"", value:""text"" }, c:[""item0"", ""item1"", ""item2""]}"
Set obj = parseJSON(json)
- 最初梦想话题作文精选
- 以我的外公作文600字精选
- 传统文化600字话题作文合集
- 关于知恩图报500字作文合集
- 自信的自己话题作文
- 天天向上优秀范文精选
- 读书的快乐六年级话题作文
- 温暖阳光作文小学生大全
- 说心里话优秀范文精选
- 我的爷爷600字话题作文合集
- 关于学会拒绝话题作文大全
- 不信任600字作文大全
- 开学典礼600字作文精选
- 友谊话题作文小学生大全
- 生活的乐趣600字作文大全
- 以我的生活作文600字
- 思念亲人优秀范文大全
- 小升初优秀满分作文
- 遵守规则话题初中作文合集
- 小升初经典满分作文500字大全
- 面对生活话题作文初中合集
- 竞选班干600字作文大全
- 关于播种梦想500字作文合集
- 关于不想长大话题作文大全
- 关于播种梦想话题作文锦集
- property rights
- property-rights
- property tax
- property-tax
- proper usage
- proper ventilation
- proper verification
- prophase
- prophecy
- prophesied
- 你追我赶
- 佣中佼佼
- 佩紫怀黄
- 佯输诈败
- 佯风诈冒
- 佳人才子
- 佳人薄命
- 佳儿佳妇
- 佳兵不祥
- 佶屈聱牙
- 2024年中山市南头镇人民政府所属事业单位招聘事业单位人员公告
- 2024年中山市教育和体育局直属学校（中山市特殊教育学校）招聘教职员公告
- 2024年上海健康医学院招聘工作人员公告
- 2024年大理州永平县校园招聘卫生专业技术人员招聘拟聘用人员公示
- 2024年上海中医药大学招聘公告
- 2024年上海电力大学岗位招聘公告
- 2024年大理州巍山县供销合作社联合社招聘公益性岗位人员公告
- 2024年上海市特种设备监督检验技术研究院招聘工作人员公告
- 2024年上海商学院招聘公告
- 2024年红河州第二人民医院编制外工作人员招聘公告（第一期）