以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么一键设置表1里的数据复制到表2里  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60012)

--  作者:xjc620
--  发布时间:2014/11/16 16:25:00
--  怎么一键设置表1里的数据复制到表2里
怎么一键设置表1里的数据复制到表2里,然后清空表1里面的数据,两个表是结构是完全一样的表,清空后在表1里再次录入数据,再次复制表1里的数据复制到表2(表2里是累计添加)
--  作者:有点甜
--  发布时间:2014/11/16 16:29:00
--  

http://www.foxtable.com/help/topics/0680.htm

 


--  作者:xjc620
--  发布时间:2014/11/16 16:30:00
--  
dim f As New Filler
f
.SourceTable = DataTables("订单"\'指定数据来源
f
.SourceCols = "产品,客户" \'指定数据来源列
f
.DataTable = DataTables("统计"\'指定数据接收表
f
.DataCols = "产品,客户" \'指定数据接收列
f
.Fill() 
\'填充数据为
为什么这个代码是填充不重复的客户,我想如果我想把订单中的所有数据完全填充到统计表里,不管理重复不重复,应该怎么做



--  作者:有点甜
--  发布时间:2014/11/16 16:33:00
--  

 设置成false

 

Distinct

逻辑型,是否排除重复内容,默认为True;如果设为False,将不会排除重复内容,也不会排除已有内容和空白值。


--  作者:xjc620
--  发布时间:2014/11/16 16:35:00
--  

加上这句?

f.Distinct = false


--  作者:有点甜
--  发布时间:2014/11/16 16:36:00
--  

--  作者:xjc620
--  发布时间:2014/11/16 16:46:00
--  
Dim f As New Filler
f.Distinct = False
f.SourceTable = DataTables("收入") \'指定数据来源
f.SourceCols = "日期" \'指定数据来源列
f.DataTable = DataTables("四") \'指定数据接收表
f.DataCols = "日期" \'指定数据接收列
f.Fill()
不执行

--  作者:有点甜
--  发布时间:2014/11/16 16:48:00
--  
 不可能不执行
--  作者:xjc620
--  发布时间:2014/11/16 16:51:00
--  
密码158998,按键就是打开项目第一表里面的窗口新建的
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:日新车队管理系统.table


--  作者:有点甜
--  发布时间:2014/11/16 16:54:00
--  
 明明就有效啊,自己看表四