Looping через JSON using ASPJSON

Question

Я использую классический ASP и ASPJSON (http://www.aspjson.com/), чтобы попытаться пройти через тестовые данные JSON, возвращенные через WebHook Mandrill.

Это пример данных JSON - я понимаю, что второй блок совпадает с первым, но мне нужно использовать его, поскольку, когда я это делаю в живой системе, данные webhook будут возвращаться партиями в одном JSON файл/сообщение.

{ 
    "event":"hard_bounce", 
    "msg":{ 
    "ts":1365109999, 
    "subject":"This an example webhook message", 
    "email":"example.webhook@mandrillapp.com", 
    "sender":"example.sender@mandrillapp.com", 
    "tags":[ 
     "webhook-example" 
    ], 
    "state":"bounced", 
    "metadata":{ 
     "user_id":111 
    }, 
    "_id":"exampleaaaaaaaaaaaaaaaaaaaaaaaaa", 
    "_version":"exampleaaaaaaaaaaaaaaa", 
    "bounce_description":"bad_mailbox", 
    "bgtools_code":10, 
    "diag":"smtp;550 5.1.1 The email account that you tried to reach does not exist. Please try double-checking the recipient's email address for typos or unnecessary spaces." 
    }, 
    "_id":"exampleaaaaaaaaaaaaaaaaaaaaaaaaa", 
    "ts":1433940242 
}, 
{ 
    "event":"hard_bounce", 
    "msg":{ 
    "ts":1365109999, 
    "subject":"This an example webhook message", 
    "email":"example.webhook@mandrillapp.com", 
    "sender":"example.sender@mandrillapp.com", 
    "tags":[ 
     "webhook-example" 
    ], 
    "state":"bounced", 
    "metadata":{ 
     "user_id":111 
    }, 
    "_id":"exampleaaaaaaaaaaaaaaaaaaaaaaaaa1", 
    "_version":"exampleaaaaaaaaaaaaaaa", 
    "bounce_description":"bad_mailbox", 
    "bgtools_code":10, 
    "diag":"smtp;550 5.1.1 The email account that you tried to reach does not exist. Please try double-checking the recipient's email address for typos or unnecessary spaces." 
    }, 
    "_id":"exampleaaaaaaaaaaaaaaaaaaaaaaaaa1", 
    "ts":1433940242 
} 

В моей тестовой ASP странице, я попытался простой тест (я уже подтвердил данные в формате JSON является действительным, сохранив его в базу данных и проверки содержания)

<!--#INCLUDE file="aspJSON.asp" --> 
str2 = <POST DATA FROM MANDRILL> 
Set oJSON = New aspJSON 
oJSON.loadJSON(str2) 

Response.Write oJSON.data("event") & "<hr>" 
response.write "<h1>test</h1>" 

For Each phonenr In oJSON.data("msg") 
    Set this = oJSON.data("msg").item(phonenr) 
    Response.Write _ 
    this.item("subject") & ": " & _ 
    this.item("diag") & "<br>" 
Next 

Когда Mandrill называет ASP, он возвращает эту ошибку:

Описание: Объект не коллекция:.

Для этой линии: Для каждого phonenr В oJSON.data («сообщение»)

Я застрял рабочих, как, для каждого события, я могу цикл через него и получить атрибуты из «MSG» и значение «_id».

Answer 1

Оберните str2 так, чтобы он был действительной коллекцией JSON и обновил ваш код, чтобы перебрать эту коллекцию, как показано ниже.

<!--#INCLUDE file="aspJSON.asp" --> 
str2 = <POST DATA FROM MANDRILL> 

' Wrap str2 to turn it into a collection 
str2 = "{""events"":[" & str2 & "]}" 

Set oJSON = New aspJSON 
oJSON.loadJSON(str2) 

response.write "<h1>test</h1>" 

For Each eventrec In oJSON.data("events") ' Iterate through events 
    Set this = oJSON.data("events").item(eventrec).item("msg") ' select msg in each eventrec 
    Response.Write _ 
    this.item("subject") & ": " & _ 
    this.item("diag") & "<br>" 
Next