主题：[求助] 合并数据Merge

使用Merge合并EXCEL数据

代码是抄帮助里面的,但是提示错误, 错误显示:不可识别的数据库格式 'D:\制造商资料.xls'。

请教各位高手,这是怎么一回事?

谢谢!

代码如下:

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "excel文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim mg As New Merger
    mg.SourcePath = dlg.FileName
    mg.SourceTableName = "制造商资料"   '这个是EXCEL,SHEEL1
    mg.DataTableName = "制造商主文件"
    mg.Merge()
End If

多谢Bin版的指导.

指定了格式,但是出了另外个错误:

.NET Framework 版本：2.0.50727.5466
Foxtable 版本：2013.6.8.1
错误所在事件：
详细错误信息：
Microsoft Jet 数据库引擎找不到对象'制造商资料'。请确定对象是否存在，并正确地写出它的名称和路径。
真是奇了怪了,路径什么是对的.

不知道怎么回事了,路径和文件名都确保是正确的.拷到其他电脑也是同样问题.

请帮忙看看.

多谢Bin超版. 问题解决了.

如下代码就可以了:

Dim mg As New Merger
mg.SourcePath = "D:\SYSMIS\SYSMIS\Attament\制造商资料.xls"  '这里是EXCEL文件名
mg.Format = "Excel" '指定格式
mg.SourceTableName = "Sheet1$" '指定要合并的表,制造商资料.xls里面的页面.

mg.DataTableName = "制造商主文件" '指定接收数据的表
mg.Merge() '开始合并