asp如何解析json序列

[haobojunsun]

一个JSON序列
{"uid":"1","username":"abc","email":"[e-mail]"}

我如果使用ASP得到uid,username,email的值呢？

[haobojunsun]

是否有现成的类？

[mrshelly]

www.json.org

http://code.google.com/p/aspjson/

http://www.webdevbros.net/2007/04/26/generate-json-from-asp-datatypes/

[haobojunsun]

www.json.org

http://code.google.com/p/aspjson/

http://www.webdevbros.net/2007/04/26/generate-json-from-asp-datatypes/

=====================================================================


我只找到了如何将变量转换为JSON序列，但是如何将JSON序列转换成OBJECT或者ARRAY呢？

[heatonc]

这个不是很明白 坐看 高手解答!~

[xuStanly]

asp有点古老，恐怕没什么现成的框架吧，
要不自己写parse，要不就只有换asp.net了。

另外，json.org出的那json.js好像也有点问题，
解析IList<someobject>输出的json的时候不行，
直接用eval()倒是可以。

[haobojunsun]

asp有点古老，恐怕没什么现成的框架吧，
要不自己写parse，要不就只有换asp.net了。

另外，json.org出的那json.js好像也有点问题，
解析IList <someobject>输出的json的时候不行，
直接用eval()倒是可以。
========================================

感谢回复，刚做的接口，得提供多种语言调用示例，所以不得不写个ASP版本的。
找了一下午都没有找到现成的哦。莫非要自己写。。。

[xuStanly]

我提到json.js是因为js也可以做服务器脚本语言，
asp是支持的，所以可以参考json.js来写asp的parser

[wcwtitxu]

ASP 也可以用 JS 啊

<script language="JScript" runat="Server">
function toObject(json) {
	eval("var o=" + json);
	return o;
}
</script>
<%

Dim json
json = "{'uid':'1','username':'abc','email':'[e-mail]'}"
Set json = toObject(json)

Response.Write json.uid & "<br/>"
Response.Write json.username & "<br/>"
Response.Write json.email & "<br/>"

Set json = Nothing
%>

[haobojunsun]

谢谢楼上，问题解决

[spark_li]

不错不错。

不错不错。

不错不错。

[xuezj508]

[Quote=引用 8 楼 wcwtitxu 的回复:]
ASP 也可以用 JS 啊
HTML code

<script language="JScript" runat="Server">
function toObject(json) {
eval("var o=" + json);
return o;
}
</script>
<%

Dim json
json = "{'uid':'1','username':'abc','e……
[/Quote]


不错

[biz0098]

这个怎么样 ？
<script language="javascript" runat="server" src="json2.min.asp"></script>
<script language="vbscript" runat="server">
Option Explicit

Dim car: Set car = JSON.parse("{""brand"":""subaru"",""model"":""outback sport"",""year"":2003," & _
"""colour"":""green"",""accessories"":[" & _
"{""foglamps"":true},{""abs"":true},{""heatedSeats"":true}]}")

Response.Write("brand: " & car.brand & "<br/>")
Response.Write("model: " & car.model & "<br/>")
Response.Write("colour: " & car.colour & "<br/>")
Response.Write("has foglamps: " & CStr(car.accessories.get(0).foglamps) & "<br/>")
car.accessories.get(0).foglamps = false
Response.Write("has foglamps: " & CStr(car.accessories.get(0).foglamps) & "<br/>")
Response.Write("new Json: " & JSON.stringify(car) & "<br/>")

Set car = Nothing
</script>
是不是需要的东西？

http://tforster.wik.is/ASP_Classic_Practices_For_The_21st_Century/JSON4ASP

就是这个地址

[gothis]

看看 我也想学学

[autoww]

如何判断某个节点不存在呢？

[zs1005]

用sc4Json