Foxtable(狐表)用户栏目专家坐堂 → 对批量导入excel,电子表格的文件名不一样,而且里面工作表的名称也不一样,请问这怎么导入


  共有9436人关注过本帖树形打印复制链接

主题:对批量导入excel,电子表格的文件名不一样,而且里面工作表的名称也不一样,请问这怎么导入

帅哥哟,离线,有人找我吗?
hty4000
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:227 积分:2826 威望:0 精华:0 注册:2008/9/1 15:41:00
对批量导入excel,电子表格的文件名不一样,而且里面工作表的名称也不一样,请问这怎么导入  发帖心情 Post By:2013/8/17 11:02:00 [只看该作者]

对批量导入excel,电子表格的文件名不一样,而且里面工作表的名称也不一样,请问这怎么导入?


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/17 11:04:00 [只看该作者]

文件名和表名称是否一样?

一样那么可以使用 FileSys.GetFiles 获取某个文件夹下的所有文件名 http://www.foxtable.com/help/topics/0341.htm



 回到顶部
帅哥哟,离线,有人找我吗?
hty4000
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:227 积分:2826 威望:0 精华:0 注册:2008/9/1 15:41:00
  发帖心情 Post By:2013/8/17 11:08:00 [只看该作者]

文件名和表名称一样

 回到顶部
帅哥哟,离线,有人找我吗?
hty4000
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:227 积分:2826 威望:0 精华:0 注册:2008/9/1 15:41:00
  发帖心情 Post By:2013/8/17 11:11:00 [只看该作者]

然后应该怎么操作

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/17 11:11:00 [只看该作者]

获得所有文件名的集合 然后及循环集合 正常导入啊

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/17 11:20:00 [只看该作者]

For Each File As String In FileSys.GetFiles("C:\")
Dim fileName as String =File.SubString(File.LastIndexOf("\")+1,File.length-File.LastIndexOf("\")-1)
Dim ip as New Importer
ip.SourcePath = File '指定数据文件
ip
.SourceTableName = fileName.SubString(0,fileName.IndexOf(".")) '指定要的表
ip
.NewTableName =fileName.SubString(0,fileName.IndexOf(".")) '后的表名
ip.Format = "Excel
'指定格式
ip
.Import()
Next

 回到顶部
帅哥哟,离线,有人找我吗?
hty4000
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:227 积分:2826 威望:0 精华:0 注册:2008/9/1 15:41:00
  发帖心情 Post By:2013/8/17 11:26:00 [只看该作者]

需合并导入同一张表中

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/17 11:27:00 [只看该作者]

那你就使用  Merger 啊 一样的 http://www.foxtable.com/help/topics/0685.htm

没有什么区别

 回到顶部
帅哥哟,离线,有人找我吗?
hty4000
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:227 积分:2826 威望:0 精华:0 注册:2008/9/1 15:41:00
  发帖心情 Post By:2013/8/17 11:43:00 [只看该作者]

多谢

 回到顶部
帅哥哟,离线,有人找我吗?
hty4000
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:227 积分:2826 威望:0 精华:0 注册:2008/9/1 15:41:00
  发帖心情 Post By:2013/8/17 15:53:00 [只看该作者]

出现如下错误提示:
.
NET Framework 版本:2.0.50727.42
Foxtable 版本:2012.11.28.1
错误所在事件:
详细错误信息:
System.Data.OleDb.OleDbException: Microsoft Jet 数据库引擎找不到对象'2009-01收入明细'。请确定对象是否存在,并正确地写出它的名称和路径。
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   在 System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.OleDb.OleDbCommand.System.Data.IDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.FillInternal(DataSet dataset, DataTable[] datatables, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable[] dataTables, Int32 startRecord, Int32 maxRecords, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable dataTable)
   在 Foxtable.Merger.Merge()

 回到顶部
总数 32 1 2 3 4 下一页