如何读取经典 asp 中的 json 响应字段值

Question

请帮我阅读经典 asp 中的 json 响应字段值。

例如：

我在经典 asp 中的反应低于标准。我需要 deliveryNo 和内容值。请对此提供帮助：

{"labels":[{"shipmentID":"a2f3vh3","deliveryNo":"1234","content":"test","invoice":null,"responseStatus":{"code":200,"message":"SUCCESS","messageDetails":"All shipments processed and label/invoice generated successfully","logMsg":[]}}],"responseStatus":{"code":200,"message":"SUCCESS","messageDetails":"All shipments processed successfully","logMsg":[]}}

Answer 1

你可以使用 ASPJSON

aspjson is JSON serializer for VBScript based ASP server technology.

Answer 2

冒着回答已经回答过很多次的问题而惹恼别人的风险，我使用了一个以前可以通过 http://www.aspjson.com/ 获得的解决方案，但该网站现在似乎已关闭。

虽然我仍然使用代码 - 它在这里 http://pastebin.com/qvn2UxXV

这是一个非常简单的示例，说明如何将它用于您的数据，以获取 deliveryNo 和 Content：

<!--#INCLUDE file="aspJSON.asp" -->
<%
Set oJSON = New aspJSON

jsonstring = "{""labels"":[{""shipmentID"":""a2f3vh3"",""deliveryNo"":""1234"",""content"":""test"",""invoice"":null,""responseStatus"":{""code"":200,""message"":""SUCCESS"",""messageDetails"":""All shipments processed and label/invoice generated successfully"",""logMsg"":[]}}],""responseStatus"":{""code"":200,""message"":""SUCCESS"",""messageDetails"":""All shipments processed successfully"",""logMsg"":[]}}"

Set oJSON = New aspJSON
oJSON.loadJSON(jsonstring)

For Each result In oJSON.data("labels")

    Set this = oJSON.data("labels").item(data)

    var_deliveryNo = this.item("deliveryNo")
    var_content = this.item("content")

    response.write "deliveryNo: " & var_deliveryNo & "<br />"
    response.write "content: " & var_content & "<br />"

Next
%>

如何读取经典 asp 中的 json 响应字段值

How to read json respone field value in classic asp

json

asp-classic