Public Function hstbl_json(ByVal droc As Dictionary(Of String, Object)) As String '转化为带[]的json格式
Dim jss As JavaScriptSerializer = New JavaScriptSerializer
Dim dic As ArrayList = New ArrayList()
dic.Add(droc)
Return jss.Serialize(dic)
End Function
net转化为json格式
最新推荐文章于 2024-08-24 23:02:54 发布