json使用数组解析asp Xtreme

问题描述:

所以我想要的是以下解析的json。
相反,我得到了Object doesn't support this property or method: 'Data'的错误。
我确定该错误不是从数据库中获取数据,而是在我不尝试解析数据时正常工作。
PS:我在这里起诉asp extreme的插件。json使用数组解析asp Xtreme

{ 
     "checkins": { 
      "data": [ 
      { 
       "strFirstName": "james", 
       "strDateEntered": "2013-03-01 15:13:49" 
      }, 
      { 
       "strFirstName": "john", 
       "strDateEntered": "2013-03-05 15:13:49" 
      } 
    ] 
    } 
}  

代码:

Set Dataset = JSON.parse("{}") 
Dataset.set "checkins", JSON.parse("{ ""data"": [] }") 

SQL = "SELECT C.CheckinID, C.MemberID, C.VENUENAME, C.VenueLat, C.VenueLng, C.VENUECREATEDAT, C.CheckInDateEntered" 
SQL = SQL & " FROM CHECKINS C" 
SQL = SQL & " ORDER BY VENUECREATEDAT DESC" 
Set objCheckins = objConn.Execute(SQL) 


If NOT objCheckins.EOF Then 
    Do While NOT objCheckins.EOF 

     SQL = "SELECT FirstName, LastName" 
     SQL = SQL & " FROM MEMBERS" 
     Set objMember = objConn.Execute(SQL) 

     Set Record = JSON.parse("{}") 
      Record.set "strFirstName", ""& objMember("FirstName") & "" 
      Record.set "strDateEntered", ""& objCheckins("VENUECREATEDAT") & "" 
      Dataset.data.push(Record) 
     Set Record = nothing 

     Data = JSON.stringify(Dataset, null, 2) 

    objCheckins.Movenext 
    Loop 

End If 
objCheckins.Close 
Set objCheckins = Nothing 

Response.Write Data 

你的意思是这个 “插件”:Asp Extreme Evolution

如果你看看他们给出的例子,你应该使用

Record.setElement "..field..", "..value.." 

此外,Set Record = JSON(...Set Record = Nothing应前,分别被移动和ObjCheckings循环之后。

如果您使用其他方式,请让我们知道确切的插件。