以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教 根据条件在另一表中查找符合条件的行,自动复制到需求表中  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9867)

--  作者:卟离卟弃
--  发布时间:2011/5/11 11:37:00
--  请教 根据条件在另一表中查找符合条件的行,自动复制到需求表中

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

在 总表 中 选中自动配置列后,以总表中的总装号为条件,自动查找清单表中的总装号的清单明细,将所查找到的清单明细自动添加到 总表的关联表中。。

 

 

 


--  作者:blackzhu
--  发布时间:2011/5/11 14:13:00
--  
这样对吗?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:从另表找到数据填充.table


--  作者:xmj09663
--  发布时间:2011/5/11 14:27:00
--  

Dim f加载 As New Filler
f加载.SourceTable = DataTables("表名")  \'指定数据来源
f加载.SourceCols = "列名1,列名2"  \'指定数据来源列(可以指定多列)
f加载.DataTable = DataTables("表名")  \'指定数据接收表
f加载.DataCols = "列名1,列名2"  \'指定数据接收列(可以指定多列)
f加载.ExcludeExistValue = True  \'逻辑型,设为True,排除接收表中已经存在的内容。
f加载.ExcludeNullValue = True  \'逻辑型,设为True,排除空白值。
f加载.Filter()  \'填充条件,请参考表达式的运算符和函数 和 条件表达式。
f加载.Distinct = True   \'逻辑型,是否排除重复内容,默认为True;如果设为False,将不会排除重复内容,也不会排除已有内容和空白值。
f加载.Append = True   \'辑型,默认为True,在接收表中增加新行用于接收数据,设为False,则在原有的行中填充,如果不够再增加新行。

f加载..Fill() \'填充数据
\'提示:数据来源列和数据接收列是可以省略的,或者只设置其中一个,Filler会自动查找同名列进行匹配填充


--  作者:blackzhu
--  发布时间:2011/5/11 14:37:00
--  
用填充也行
--  作者:卟离卟弃
--  发布时间:2011/5/11 14:44:00
--  

当我在 配置明细列中打钩时,能实现功能,第二次打钩时,不能实现功能,为什么第二次打钩时,不能重新 添加清单信息?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:从另表找到数据填充.table


 


--  作者:blackzhu
--  发布时间:2011/5/11 15:10:00
--  
怎么理解?看不到勾选.


--  作者:卟离卟弃
--  发布时间:2011/5/11 15:16:00
--  

你把明细表中的数据全部删除

 

然后在总表的自动配置明细列中,打上钩,接着会自动复制数据,然后你取消打钩,在进行第二次打钩,接着也会自动添加行,但不复制数据。。。


--  作者:blackzhu
--  发布时间:2011/5/11 15:25:00
--  
我明白了,你不要修改我的额代码.用关联的表名代替我的表名,这样有问题的.
--  作者:卟离卟弃
--  发布时间:2011/5/11 15:52:00
--  

我测试过了,都是一样的效果。。。。

 


--  作者:blackzhu
--  发布时间:2011/5/11 15:56:00
--  
能用就行,我测试没有反应,但是我改过来了,测试N多次都没有问题.