Foxtable(狐表)用户栏目专家坐堂 → [求助]


  共有3219人关注过本帖树形打印复制链接

主题:[求助]

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109482 积分:557072 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/21 15:31:00 [显示全部帖子]

增加什么数据?增加到哪里?把后面10行代码文字发上来,不要截图

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109482 积分:557072 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/21 15:53:00 [显示全部帖子]

发不了是sql的原因,所以让您发后面10行:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=69632

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109482 积分:557072 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/21 16:10:00 [显示全部帖子]

这个意思?要添加什么数据直接添加后面就行了

Dim arr As New JArray
Dim i As Integer = 0
For Each dc As DataCol In dt.DataCols
    arr.Add(New JObject)
    arr(i)("field") = dc.Name
    arr(i)("title") = ns(i)
    arr(i)("halign") = "center"
    i += 1
Next
dim dt2 as datatable = 加载另外一个表格数据
For Each dc As DataCol In dt2.DataCols
    arr.Add(New JObject)
    arr(i)("field") = dc.Name
    arr(i)("title") = ns(i)
    arr(i)("halign") = "center"
    i += 1
Next

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109482 积分:557072 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/21 16:41:00 [显示全部帖子]

直接在后面添加啊

Dim arr As New JArray
Dim i As Integer = 0
For Each dc As DataCol In dt.DataCols
    arr.Add(New JObject)
    arr(i)("field") = dc.Name
    arr(i)("title") = ns(i)
    arr(i)("halign") = "center"
    i += 1
Next
arr.Add(New JObject)
arr(i)("field") = "xx数据数量"

 回到顶部