我做了一个xxx.json的文件,里面放了这个数据:
[
{
"_Identify": 1,
"医院名称": "上海长宁美奥",
"分院名称": "上海长宁美奥",
"所属区域": "长宁区",
"医院编码": "01",
"链接": "Provider=SQLOLEDB.1;Password=Passw0rD9191;Persist Security Info=True;User ID=sa;Initial Catalog=HIS_SHANGHAI;Data Source=47.96.248.28,6699",
"显示": "1",
"远程链接": "上海长宁美奥远程",
"拼音": "shanghai"
}]
按照论坛的做法是直接读文本框的数据生成表.
我现在这样写不对.应该如何修改?
Dim myjson As String = JArray.Parse(FileSys.ReadAllText(ProjectPath & "dll\donName.json", Encoding.Default))
Dim dt As System.Data.DataTable = Newtonsoft.Json.JsonConvert.DeserializeObject(Of System.Data.DataTable)(myjson)
Dim tb As Table = e.Form.Controls("Table1").Table
tb.DataSource = dt