数据合并时出现“不可识别的数据库格式 'D:\Users\ST\Desktop\新建文件夹\测试.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 = "111"
mg.DataTableName = "111"
mg.Merge()
End If
注:111时access数据库中的一张表
请问大神哪里错了