主题：[求助]将其它文件中指定表的数据复制到当前文件中的指定表

Import
将其它文件中指定表的数据复制到当前文件中的指定表。

语法：
Import(Grid,SourceFile,SourceGrid,Password,CompareCol,CompareMode,Comparevalue,......,Option)

Grid           当前文件中的某个表
SourceFile     来源文件,包括路径和文件名
SourceGrid     来源文件中的表，将从该表中复制数据到Grid参数指定的表中。
Password       指定来源文件的管理员密码。
CompareCol     进行比较的列，可以用列名称表示，也可以用位置表示。
CompareMode    比较方式，包括=、>、<、>=、<=、<>、Like、Instr共8种比较方式。
Comparevalue   比较值 Option         可选参数，
             0  匹配同名列
             1  不匹配同名列，要求表结构必须完全一致。
             默认为0

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

例如：
Import("销售总表","c:\sales.egd","销售","123")
将文件c:\sales.egd中的销售表数据复制到当前文件的销售总表，这里假定c:\sales.egd的管理员密码为123。

Import("华东分析","c:\sales.egd","销售","","地区","=","华东")
将文件c:\sales.egd的销售表中华东地区的销售数据复制到当前文件的华东分析表，这里假定c:\sales.egd没有设置管理员密码。

+++++++++++++++++++++++++++++++++++++++++++
基于这个公式，设置了一个按钮代码

Import("客户信息","F:\东方验光局域办公\验光共享\客户信息管理.egd","客户信息","888","1")

这个公式一直到密码为止都是正常的，就是我在按下按钮的时候，它把所有的数据从头到尾全部复制过来了，而且，如果再按一下，就又重复复制了一份，也就是说你按几次他就复制几次，
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
我的意思是说我有一列档案号，这个复制得随号码走，不要复制多余的，没有的可以被复制进来，包括同名都是可以的，就是不能出现同个档案号-----档案号  是唯一的编码，是真实记录的当前编号

Import() And DelReptRows()

 使用  Import() And DelReptRows()
 这个代码，整个序列号和档案号全部乱了，档案号出现重复，序列号出现空号，姓名.性别列出现重复

-=-=-=- 以下内容由 east858 在 2010年12月16日 02:54pm 时添加 -=-=-=-
Import("客户信息","F:\东方验光局域办公\验光共享\客户信息管理.egd","客户信息","888","1") And DelReptRows("客户信息","档案号","单号","姓名","性别")

-=-=-=- 以下内容由 east858 在 2010年12月16日 04:34pm 时添加 -=-=-=-
0  匹配同名列
            1  不匹配同名列，要求表结构必须完全一致。
            默认为0

我的代码 就是在这里不知道怎么设置..........

-=-=-=- 以下内容由 east858 在 2010年12月16日 04:35pm 时添加 -=-=-=-
怎么打到这里了呢？ O(∩_∩)O哈哈~

最好的办法传文件！

Import("客户信息","F:\东方验光局域办公\验光共享\客户信息管理.egd","客户信息","888","1")

代码已经在这里啦，  这是2个文件啊，就是上传
也是不能设置啊，，  从A文件中复制   B文件的数据 ，我的要求是完全复制 B 文件，也就是说克隆一个B 文件中的一个表数据，  就好比我们平常的复制 -张贴

-=-=-=- 以下内容由 east858 在 2010年12月16日 04:36pm 时添加 -=-=-=-
0  匹配同名列
           1  不匹配同名列，要求表结构必须完全一致。
           默认为0

我的代码 就是在这里不知道怎么设置..........

不发文件只能给你思路、公式试试？
1、在当前文件中新增一个表，表名为“B”。有2列，字符列“档案号”、逻辑列“K”。

2、在文件的当前表“客户信息”设置按钮公式：

ClearGrid("B") And
Import("B","F:\东方验光局域办公\验光共享\客户信息管理.egd","客户信息","888") And
DelRow("B",1) And
EvalFor("B","k","FindRow(""客户信息"",""档案号"",""="",[档案号])") And
DelFor("B","k","=",-1) And
Eval("Import(""客户信息"",""F:\东方验光局域办公\验光共享\客户信息管理.egd"",""客户信息"",""888"",""档案号"",""="","""+Substitute(ListFor("B","档案号"),"|",""",0) And Import(""客户信息"",""F:\东方验光局域办公\验光共享\客户信息管理.egd"",""客户信息"",""888"",""档案号"",""="",""")+""",0)")

Import("客户信息","F:\东方验光局域办公\验光共享\客户信息管理.egd","客户信息","888","1") And DelReptRows("客户信息","档案号")

排除的始终是后面导入的且是重复的数据，从您的公司看，您的数据很不规范，相同的档案号而出现了不同单号、不同姓名、不同性别的数据，所以您排除重复后就保留了重复的档案号！

[这个贴子最后由wjq1072在 2010/12/16 05:37pm 第 1 次编辑]

把你的2个表的列名称排出来看看？

-=-=-=- 以下内容由 wjq1072 在 2010年12月16日 05:35pm 时添加 -=-=-=-
2个表“档案号”列的位置是不是相同？如果相同就可以：
Import("客户信息","F:\东方验光局域办公\验光共享\客户信息管理.egd","客户信息","888",1) And DelReptRows("客户信息","档案号")

把按钮公式中的路径E更改F试试？
egd文件下载

CreateGrid("客户信息","档案号",0,"k",3) And ClearGrid("客户信息") And Import("客户信息","F:\东方验光局域办公\验光共享\客

户信息管理.egd","客户信息","888",1) And DelRow("客户信息",1) And EvalFor("客户信息","k","FindRow(""客户信息"",""档案

号"",""="",[档案号])") And DelFor("客户信息","k","=",-1) And Eval("Import(""客户信息"",""F:\东方验光局域办公\验光共享\客

户信息管理.egd"",""客户信息"",""888"",""档案号"",""="","""+Substitute(ListFor("客户信息","档案号"),"|",""",1) And

Import(""客户信息"",""F:\东方验光局域办公\验光共享\客户信息管理.egd"",""客户信息"",""888"",""档案号"",""="",""")

+""",1)") And RemoveGrid("客户信息")

一图  
2图

导入是正常的，但是每次导入  都会产生 一个表 如一图， 然后出现 第二图