以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]导入数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=76101)
--  作者：huhu
--  发布时间：2015/10/21 19:03:00
--  [求助]导入数据
请问一下。
如果我导入一个excel文件时，已经存在这个表了，那么我是否可以把这个表的数据先清空，然后再导入新的数据。
这样能做到吗？
--  作者：大红袍
--  发布时间：2015/10/21 19:16:00
--  

合并数据

 

http://www.foxtable.com/help/topics/0685.htm

 
--  作者：huhu
--  发布时间：2015/10/21 19:53:00
--  
这个合并数据是把第二个表的数据追加到第一个表的后面？还是怎么回事？
--  作者：大红袍
--  发布时间：2015/10/21 20:18:00
--  
你先用代码删除记录，然后合并嘛
--  作者：huhu
--  发布时间：2015/10/21 20:18:00
--  
是否可以先把表的行删除。然后合并。
For Each r As Row In Tables("订单")
    r.Delete
Next
DataTables("订单").save
Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter= "excel文件|*.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim ip As New Merger
    ip.SourcePath = dlg.FileName \'指定数据文件
    ip.SourceTableName = "订单执行统计表$" \'指定要导入的表
    ip.DataTableName ="订单" \'导入后的表名
    ip.Format = "Excel" \'指定导入格式
    ip.merge()
End If
--  作者：大红袍
--  发布时间：2015/10/21 20:22:00
--  

删除这样写

 

DataTables("订单").DeleteFor("")