- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [原创]请教一下，能批量导入xls文件到foxtab吗？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=17635)
-- 发布时间：2012/3/19 19:41:00
-- [原创]请教一下，能批量导入xls文件到foxtab吗？
请教一下，能批量导入xls文件到foxtab吗？
请教大虾专家
-- 发布时间：2012/3/19 21:17:00
--
可以批量导入，看看：
http://www.foxtable.com/help/topics/0684.htm
-- 发布时间：2012/3/20 8:43:00
-- 请大侠详解一下可以吗？
请教大侠，我有一批xls表（近400个），数据结构完全一样，文件名为：“**省**市01县.xls，*省**市02县.xls，*省**市03县.xls，*省**市n县.xls”，路径d:\\数据，请问要如何才能批量导入数据呀？
-- 发布时间：2012/3/20 8:47:00
--
下面是一个批量合并的例子，假定目录c:\\data下有多个Excel文件，需要将这些文件中的订单表合并到Foxtable的订单表中：
For Each fl As String In FileSys.GetFiles("c:\\Data")
Dim mg As New Merger
mg.SourcePath = fl
mg.Format = "excel" \'指定格式
mg.SourceTableName = "订单" \'指定要合并的表
mg.DataTableName = "订单" \'指定接收数据的表
mg.Merge() \'开始合并
Next
-- 发布时间：2012/3/20 11:40:00
-- 导入出错
按照大侠的代码，一直导入失败
-- 发布时间：2012/3/20 11:43:00
--
此主题相关图片如下：未命名.jpg
错误提示如上图
-- 发布时间：2012/3/20 11:46:00
--
名称用： sheet_1$
加个符号$看看
-- 发布时间：2012/3/20 11:51:00
--
其实四楼就告诉你答案了：
For Each fl As String In FileSys.GetFiles("c:\\1")
Dim mg As New Merger
mg.SourcePath = fl
mg.Format = "excel" \'指定格式
mg.SourceTableName = "sheet_1$" \'指定要合并的表
mg.DataTableName = "表ac" \'指定接收数据的表
mg.Merge() \'开始合并
Next