主题：如何同时复制到表去？

各位大师！好
如何把表a.egd的表1的内容同时复制到表b.edg、c.egd、d.egd等n具表中的表1去结构相同复过去不覆盖以前的数据？？

Export
将当前文件指定表中符合条件的行复制到其他文件的指定表。

语法：
Export(FileName,Grid,Password,SourceGrid,CompareCol,CompareMode,CompareValue...,Option)

FileName       目标文件，包括路径和文件名
Grid           目标文件中的某个表，一定要用表名指定。
Password       目标文件的管理员密码
SourceGrid     当前文件中的某个表，用表名或者位置指定，将从该表复制数据到目标文件中。
CompareCol     进行比较的列，可以用列名称表示，也可以用位置表示。
CompareMode    比较方式，包括=、>、<、>=、<=、<>、Like、Instr共8种比较方式。
CompareValue   比较值
Option         可选参数。
              1：不包括隐藏行(默认包括)
              2：清除目标表原有数据(默认不清除)
              4：不匹配同名列(默认匹配)
              参数可以组合，例如参数设为3(2+1)，表示不包括隐藏行，同时清除目标表原有数据。

可以设置多个比较条件，也可以不设置，从第五个参数开始，每三个参数组成一个比较条件。如果比较方式选择的是Instr,则进行包含查询；如果比较方式选择"Like"，则可以在比较值中使用通配符进行类似查询。

例子：
Export("c:\备份.egd","结帐订单","888","本月销售","结帐","=",-1)
将当前文件本月销售表中已经结帐的订单复制到文件（c:\备份.egd)的结帐订单表中。

谢谢！ 这得多做才行的！

RAR文件下载

4楼文件存在函数嵌套问题，可能会引起错误，解决办法，在444表中增加一个表达式变量，公式：ListFor("表3","文件名",1)，将窗口的按钮公式改成：SetLabel("","正在发布最新数据...") And Eval("Export(docdir+"""+Substitute([%A%],"|",""",""表2"",""888"",GridName,""a"",""="",0) And Export(docdir+""")+""",""表2"",""888"",GridName,""a"",""="",0)") And EvalFor(Grid,"a","-1") And Save() And SetLabel("","数据发布完毕!")

cyz谢谢！这么复杂？