Foxtable(狐表)用户栏目专家坐堂 → [求助]如何导入数据到关联表。


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

主题:[求助]如何导入数据到关联表。

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


加好友 发短信
等级:童狐 帖子:205 积分:1468 威望:0 精华:0 注册:2013/2/1 21:25:00
[求助]如何导入数据到关联表。  发帖心情 Post By:2013/12/9 9:51:00 [只看该作者]

是否能实现把数据导入到关联表?(比如:Tables("表A.表B"))


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/9 9:53:00 [只看该作者]

你导入到明细表,实际上不就是导入到关联表吗?

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


加好友 发短信
等级:童狐 帖子:205 积分:1468 威望:0 精华:0 注册:2013/2/1 21:25:00
  发帖心情 Post By:2013/12/9 9:58:00 [只看该作者]

外部表关联的那一列没有,我现在能做的是导入完后一个一个输入或者在导入之前把外部表增加一列(关联列)把数据输进去,我是觉得有点麻烦

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


加好友 发短信
等级:童狐 帖子:205 积分:1468 威望:0 精华:0 注册:2013/2/1 21:25:00
  发帖心情 Post By:2013/12/9 9:59:00 [只看该作者]

我就想实现导入的数据等同于给关联表增加行

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/9 10:02:00 [只看该作者]

你可以尝试一下看看是否能合并到关联表,如果不可以使用代码方式合并肯定可以


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


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/12/9 10:27:00 [只看该作者]

导入到关联表,可以简化为:

 

1、导入到子表

2、将新导入的数据的关联列,设置为父表当前行的关联列

 

所以代码可以这样写:

 

Dim pr As Row  = Tables("父表").Row

dim cnt As Count = DataTables("子表").Datarows.Count

这里按常规编码导入数据到子表,你原来导入数据的代码复制到这里来

For i as integer = cnt to DataTables("子表").Datarows.Count -1

    DataTables("子表").Datarows(i)("关联列") = pr("关联列")

next

[此贴子已经被作者于2013-12-9 10:34:15编辑过]

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


加好友 发短信
等级:童狐 帖子:205 积分:1468 威望:0 精华:0 注册:2013/2/1 21:25:00
  发帖心情 Post By:2013/12/9 11:40:00 [只看该作者]

谢谢提醒,我在子表的Datarowadding中编写代码

  Dim pr As Row  = Tables("父表").Current
 e.DataRow("关联列") = pr(“关联列")

 实现了!


 回到顶部