以文本方式查看主题

-  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的问题,统一加上就没错!