vb.net devuelve el objeto json con múltiples tipos?
Necesito devolver algunos datos de un servicio web que se parece a esto:
data.page = 1
data.count = 12883
data.rows(0).id = 1
data.rows(0).name = "bob"
data.rows(1).id = 2
data.rows(1).name = "steve"
data.rows(2).id = 3
data.rows(2).name = "fred"
No tengo ni idea de cómo hacer esto. He recuperado tipos simples y matrices simples, pero nunca un objeto como este.
La fuente de datos es una base de datos sql. El objetivo es una función javascript / ajax. Actualmente estoy devolviendo con éxito las filas como un conjunto de datos y funciona, pero necesito agregar el conteo y un par de otras variables de "nivel principal".
En aras de la divulgación completa, aquí está el código que funciona:
<WebMethod()> _
Public Function rptPendingServerRequests() As DataSet
Dim connetionString As String
Dim connection As SqlConnection
Dim command As SqlCommand
Dim adapter As New SqlDataAdapter
Dim ds As New DataSet
Dim sql As String
connetionString = "..."
sql = "SELECT usm_request.request_id, usm_request.status, usm_request.req_by_user_id " +
"FROM usm_request " +
"WHERE usm_request.request_id in " +
"(SELECT distinct(usm_request.request_id) from usm_request, usm_subscription_detail WHERE usm_request.request_id = usm_subscription_detail.request_id " +
"AND usm_subscription_detail.offering_id = 10307) ORDER BY usm_request.request_id DESC"
connection = New SqlConnection(connetionString)
Try
connection.Open()
command = New SqlCommand(sql, connection)
adapter.SelectCommand = command
adapter.Fill(ds)
adapter.Dispose()
command.Dispose()
connection.Close()
Return ds
Catch ex As Exception
End Try
End Function
Y estoy tratando de consumirlo con FlexiGrid. Llevo unas horas trabajando en ello sin suerte. Básicamente necesito convertir el PHP en el siguiente sitio a .net
http://code.google.com/p/flexigrid/wiki/TutorialPropertiesAndDocumentation