以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 导入数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=82640) |
-- 作者:wwb525 -- 发布时间:2016/3/22 8:44:00 -- 导入数据 看了教程,导入功能都是把输入导入一个新表中,而很多情况下,希望导入数据能导入当前表中,提高录入效率。不知道foxtable有没有直接导入当前表的功能? |
-- 作者:大红袍 -- 发布时间:2016/3/22 9:33:00 -- 不是有高速合并?
http://www.foxtable.com/help/topics/0187.htm
http://www.foxtable.com/help/topics/0685.htm
|
-- 作者:wwb525 -- 发布时间:2016/3/22 11:00:00 -- 我去,我以为合并仅仅是把两个文件合并成一个呢,也能当作导入本表使用,被名字误导了! 多谢拉!
|
-- 作者:wwb525 -- 发布时间:2016/3/22 13:12:00 -- Dim dlg As New OpenFileDialog dlg.Filter = "exce|*.xls" dlg.MultiSelect = True \'允许选择多个文件 If dlg.ShowDialog =DialogResult.OK Then For Each fl As String In dlg.FileNames Dim mg As New Merger mg.SourcePath = fl mg.Format = "Excel" \'指定格式 mg.SourceTableName = "零件清单明细" mg.DataTableName = "零件清单明细" mg.Merge() Next End If 这样,报错,找不到文件,咋回事? 这是根据帮助文件里面改的 但是下面的写法就对,咋回事? Dim mg As New Merger
mg.SourcePath = "c:\\data\\"零件清单明细".xls" mg.Format = "excel" \'指定格式 mg.SourceTableName = "零件清单明细" \'指定要合并的表 mg.DataTableName = "零件清单明细" \'指定接收数据的表 mg.Merge() \'开始合并这样写就 |
-- 作者:大红袍 -- 发布时间:2016/3/22 13:14:00 -- 红色的,是你excel里面的表的名字,比如sheet1
Dim dlg As New OpenFileDialog
dlg.Filter = "exce|*.xls"
dlg.MultiSelect = True \'允许选择多个文件
If dlg.ShowDialog =DialogResult.OK Then
For Each fl As String In dlg.FileNames
Dim mg As New Merger
mg.SourcePath = fl
mg.Format = "Excel" \'指定格式
mg.SourceTableName = "零件清单明细$"
mg.DataTableName = "零件清单明细"
mg.Merge()
Next
End If
|
-- 作者:wwb525 -- 发布时间:2016/3/22 13:41:00 -- 一些Excel文件,可能需要在表名后加上符号$才能正常导入,原来问题出在这,为啥要加“$”呢?帮助文件里面并没有说明! 非常感谢!
|
-- 作者:大红袍 -- 发布时间:2016/3/22 14:37:00 -- 不论有或没有,统一都加上$ |
-- 作者:wwb525 -- 发布时间:2016/3/22 15:06:00 -- 好的,可能是各种版本的excel的问题,统一加上就没错! |