主题：请教 追加数据表达式

 

在易表中，设一变量为：

"Import(Grid + 1,docdir + ""定额库\"" + [定额] + "".egd"",""" + [章] + ""","""",""定额编号"", ""="" ,[定额编号])) "

即可以达到从不同外部数据中追加数据（近30个文件，每个文件有10-20个表。输入1个定额编号，即可得到相应的数据）

狐表使用内部表，也可以达到相同的效果

Dim c As DataRow  = e.DataRow

For Each dr2 As DataRow In DataTables("定额").Select("定额编号 = '" & c("定额编号") &  "'")

                Dim r3 As Row = Tables("实体材料分析").AddNew

                r3("序号1") = c("序号1")

                r3("定额编号") = dr2("定额编号")

                r3("材料编号") = dr2("材料编号")

                r3("定额用量") = dr2("定额用量")

    Next

定额库内容较多，想使用Access 做外部数据库，不想加载某一个表。想向易表一样可以，随时调用任意一本定额的任意内容。

应怎样做？谢谢！