- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 如果根据条件 复制子表 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=48194)
-- 发布时间：2014/3/25 3:46:00
-- 如果根据条件 复制子表
此主题相关图片如下：123.jpg
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.zip |
-- 发布时间：2014/3/25 7:50:00
--
http://www.foxtable.com/help/topics/0680.htm
-- 发布时间：2014/3/25 8:46:00
--
就这么简单：
Dim f As New Filler
f.SourceTable = DataTables("订单明细表") \'指定数据来源
f.DataTable = DataTables("核销表") \'指定数据接收表
f.Filter = "订单编号 = \'" & e.Form.Controls("订单编号").Value & "\'" \'指定复制条件
f.Fill() \'填充数据
[此贴子已经被作者于2014-3-25 8:46:35编辑过]
-- 发布时间：2022/8/11 14:46:00
--
狐爸：
你好，如下这组代码是指定数据来源的复制条件，那如何实现指定数据接收表的某行来收接数据来源表的数据呢？
Dim f As New Filler
f.SourceTable = DataTables("订单明细表") \'指定数据来源
f.DataTable = DataTables("核销表") \'指定数据接收表
f.Filter = "订单编号 = \'" & e.Form.Controls("订单编号").Value & "\'" \'指定复制条件
f.Fill() \'填充数据
-- 发布时间：2022/8/11 14:51:00
--
Filler无法指定行，考虑自己写代码填充数据：http://www.foxtable.com/webhelp/topics/1533.htm