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


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

主题:[求助]数据合并

帅哥哟,离线,有人找我吗?
lxhmax
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:636 积分:5699 威望:0 精华:0 注册:2012/8/2 19:04:00
[求助]数据合并  发帖心情 Post By:2012/8/23 15:50:00 [显示全部帖子]

  

       求教各位,如何根据表1的内容生成表2的内容,过程为,将“编号”,“依据”同样的数据中的“项目”合并在同一个表格内!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:数据合并.table


 回到顶部
帅哥哟,离线,有人找我吗?
lxhmax
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:636 积分:5699 威望:0 精华:0 注册:2012/8/2 19:04:00
  发帖心情 Post By:2012/8/23 16:55:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-8-23 16:42:00的发言:

这样更加简单:

 

For Each pr As DataRow In DataTables("表2").DataRows
    pr("项目")  =  DataTables("表1").GetComboListString("项目","编号 = '" & pr("编号") & "' And 类别 = '" & pr("类别") & "'")
Next

狐爸,我的意思是在表2没有数据的情况下,根据表1的内容生成表2的内容!


 回到顶部
帅哥哟,离线,有人找我吗?
lxhmax
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:636 积分:5699 威望:0 精华:0 注册:2012/8/2 19:04:00
  发帖心情 Post By:2012/8/23 17:57:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-8-23 17:06:00的发言:
DataTables("表2").DataRows.Clear
Dim f As New Filler
f.SourceTable = DataTables("表1") '指定数据来源
f.SourceCols = "编号,类别" '指定数据来源列
f.DataTable = DataTables("表2") '指定数据接收表
f.DataCols = "编号,类别" '指定数据接收列
f.Fill() '填充数据
For Each pr As DataRow In DataTables("表2").DataRows
    pr("项目")  =  DataTables("表1").GetComboListString("项目","编号 = '" & pr("编号") & "' And 类别 = '" & pr("类别") & "'")
Next
太感谢狐爸了,再问个小问题,如何将"|”替换为","~~

 回到顶部
帅哥哟,离线,有人找我吗?
lxhmax
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:636 积分:5699 威望:0 精华:0 注册:2012/8/2 19:04:00
  发帖心情 Post By:2012/8/24 16:49:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-8-24 8:37:00的发言:
DataTables("表2").DataRows.Clear
Dim f As New Filler
f.SourceTable = DataTables("表1") '指定数据来源
f.SourceCols = "编号,类别" '指定数据来源列
f.DataTable = DataTables("表2") '指定数据接收表
f.DataCols = "编号,类别" '指定数据接收列
f.Fill() '填充数据
For Each pr As DataRow In DataTables("表2").DataRows
    Dim s As String =  DataTables("表1").GetComboListString("项目","编号 = '" & pr("编号") & "' And 类别 = '" & pr("类别") & "'")
    pr("项目")  = s.Replace("|",",")
Next

非常感谢狐爸的帮助,表1的数据是不断增加的,表2 的数据也是不断累积的,要对表1新增指定的内容添加到表2,再次麻烦狐爸,这个要怎么弄~!


 回到顶部
帅哥哟,离线,有人找我吗?
lxhmax
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:636 积分:5699 威望:0 精华:0 注册:2012/8/2 19:04:00
  发帖心情 Post By:2012/9/5 16:30:00 [显示全部帖子]

求救,对于这个问题我还没没搞懂呢~!

 

  表1的数据是不断增加的,表2 的数据也是不断累积的,要对表1新增指定的内容添加到表2,再次麻烦狐爸,这个要怎么弄~!


 回到顶部
帅哥哟,离线,有人找我吗?
lxhmax
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:636 积分:5699 威望:0 精华:0 注册:2012/8/2 19:04:00
  发帖心情 Post By:2012/9/6 10:08:00 [显示全部帖子]

谢谢狐爸~~

 回到顶部