- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 导入excel文件，fields出错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90859)
-- 发布时间：2016/9/22 23:19:00
-- 导入excel文件，fields出错
导入excel文件时，使用fields指定导入的字列时，报错
.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2016.7.29.1
错误所在事件：
详细错误信息：
至少一个参数没有被指定值。
Dim IP As New Importer
ip.SourcePath ="E:\\办公\\合并报表\\w合并报表测试2016-1-17\\蜀兴投科目余额表.xls"
ip.SourceTableName = "科目余额表"
ip.NewTableName ="科目余额表"
ip.Fields ="科目编号，期初余额，期末余额" “添加此行时报错”
ip.Format = "excel"
ip.Import()
-- 发布时间：2016/9/23 8:25:00
--
蜀兴投科目余额表.xls里的Sheet名称是不是“科目余额表”，Excel文件是否包含"科目编号，期初余额，期末余额"这三个列标题
上传文件测试
-- 发布时间：2016/12/4 21:35:00
--
导入数据、追加数据出错
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:复件 科目余额表.xls |
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:菜单设计.table |
-- 发布时间：2016/12/4 23:57:00
--
你指定的列名不存在，正确的应该是：
ip.Fields ="科目编码,科目名称,科目或项目"
-- 发布时间：2016/12/6 21:55:00
-- 追加数据报错
我编写的“追加数据”菜单：运行时报错。
老师：请帮我写一段代码，谢谢
-- 发布时间：2016/12/6 22:02:00
--
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.Format = "excel" \'指定格式
mg.Merge()
End If
好好看看帮助：http://www.foxtable.com/webhelp/scr/0685.htm
[此贴子已经被作者于2016/12/6 22:04:53编辑过]
-- 发布时间：2016/12/7 21:56:00
-- 按你提供的代 码还是报错
Microsoft Jet 数据库引擎找不到对象\'科目余额表\'。请确定对象是否存在，并正确地写出它的名称和路径。
-- 发布时间：2016/12/7 22:07:00
--
说明Excel文档sheet的名称不是“ 科目余额表”，可能是sheet1之类的
-- 发布时间：2016/12/10 22:14:00
-- 回复：（有点蓝）说明Excel文档sheet的名称不是“&nbs...
老师:这是我第一次写代码，你说的好像都是有的，就是没法导入数据。能不能帮我测试一下，看我问题出在哪里,谢谢
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:菜单设计.table |
-- 发布时间：2016/12/10 22:30:00
--
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.Fields ="科目编码,期初余额,期末余额"
mg.Format = "excel" \'指定格式
mg.Merge()
End If