- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]合并按钮提示错误 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=109948)
-- 发布时间：2017/11/23 14:53:00
-- [求助]合并按钮提示错误
老师，您好！
下面是合并按钮的代码：
Dim dlg As new OpenFileDialog
dlg.Filter = "Excel文件|*.xls;*.xlsx"
If dlg.ShowDialog = DialogResult.OK Then
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.SourceTableName = "RS485芯片"
mg.DataTableName = "RS485芯片"
mg.Merge()
End If
但执行代码是提示如下错误，是什么原因导致的？
此主题相关图片如下：6$(kk$hr@otnhg16l(r`q.png
-- 发布时间：2017/11/23 16:16:00
--
Dim dlg As new OpenFileDialog
dlg.Filter = "Excel文件|*.xls;*.xlsx"
If dlg.ShowDialog = DialogResult.OK Then
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.Format = "Execl"
mg.SourceTableName = "RS485芯片$"
mg.DataTableName = "RS485芯片"
mg.Merge()
End If