以文本方式查看主题

-  易表在线答疑  (http://egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://egrid2000.com/dvbbs/list.asp?boardid=2)
----  [讨论]在关联表自动添加(增加)数据问题  (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=4062)

--  作者:laodai
--  发布时间:2006/9/24 12:41:00
--  [讨论]在关联表自动添加(增加)数据问题
if(FindRow("省月报表","单位标示", "=" ,[单位标示])=0,AddRow("省月报表","时间_年,时间_月,单位名称,单位标示",[时间_年],[时间_月],[单位名称],[单位标示]),True) And if(FindRow("月报表台帐","单位标示", "=" ,[单位标示])=0,AddRow("月报表台帐","时间_年,时间_月,单位名称,单位标示",[时间_年],[时间_月],[单位名称],[单位标示]),True)


这样设置 ,增加一条可以在后面关联表自动增加数据,但是用合并表,就不能自动增加,怎么解决


--  作者:wjq1072
--  发布时间:2006/9/24 12:57:00
--  
将当前表中符合条件的行复制到其它表中。
CopyRows(Grid,CompareCol,CompareMode,CompareValue....,Option)
Grid         目标表,可以用表名,也可以用表位置表示
CompareCol   进行比较的列,可以用列名称表示,也可以用位置表示。<BR>CompareMode 比较方式,包括=、>、<、>=、<=、<>、Like、Instr共8种比较方式。
CompareValue 比较值
Option       选项,0匹配列名称,1不匹配列名称,默认为0

例子:
CopyRows("汇总表")
将当前表所有行复制到汇总表

CopyRows("汇总表","客户","=","CS01")
将当前表中客户CS01的数据复制到汇总表

CopyRows("汇总表","客户","=","CS01",1)
将当前表中客户CS01的数据复制到汇总表,且无需匹配列名称。


--  作者:laodai
--  发布时间:2006/9/24 13:05:00
--  
问题是后面的表还要自动增加行啊
--  作者:czy
--  发布时间:2006/9/24 15:34:00
--  
问题好象没交代清楚,你的公式只能在关联表中增加一行,如果合并一条同样的数据后还想再增加行,你可以增加一个辅助列,合并表后自动在新合并的数据行做标记,这样改一下在一楼的公式的FindRow中加个条件判断。