我用下面代码先导出一个Excel文件，再将这个Excel文件合并导入，提示“不可识别的数据库格式”，请问老师这是怎么回事？
导出代码：
Dim ex As New Exporter
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
MessageBox.Show("你要保存为:" & dlg.FileName,"提示") '提示用户选择的文件
Tables("客户档案").SaveExcel(dlg.FileName, "客户档案") '保存文件
End If
导入代码：
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 = "客户档案$"
mg.DataTableName = "客户档案"
mg.Merge()
End If
加好友 
发短信
Post By：2014/9/2 15:00:00 [只看该作者]
