请教关于数据填充 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教关于数据填充

共有2412人关注过本帖树形打印复制链接主题：请教关于数据填充

lilywang

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：81 积分：627 威望：0 精华：0 注册：2016/7/29 11:24:00

请教关于数据填充 发帖心情

Post By：2016/12/27 15:58:00 [只看该作者]

----------MainTableChanging

Dim g As New Filler

DataTables("B表").DataRows.Clear

g.SourceTable = DataTables("A表")

g.SourceCols = "所属片区,合同号,项目名称,客户名称"

g.DataTable = DataTables("B表")

g.DataCols = "区域,合同号,项目名称,客户名称"

g.Fill() '填充数据

----------

我要A表有数据更新时切换到B表时自动把新的数据填充进B表里但是B表的其他列反而写数据保存不了请问这段代码怎么改好？

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/27 16:03:00 [只看该作者]

试试

Dim g As New Filler
g.SourceTable = DataTables("A表")
g.SourceCols = "所属片区,合同号,项目名称,客户名称"
g.DataTable = DataTables("B表")
g.DataCols = "区域,合同号,项目名称,客户名称"
g.Append = False
g.ExcludeExistValue = true
g.Fill() '填充数据