' Il seguente frammento di codice assegna alla variabile "json" la serializzaione della riga corrente della QWTable contenuta nella variabile "d" dim json as string dim i as integer Dim row As new system.collections.generic.Dictionary(Of String, Object) for i=1 to d.rowset.fields.count() row.add(d.rowset.fields(i).fieldname,d.rowset.fields(i).value) next json=Newtonsoft.Json.JsonConvert.SerializeObject(row)