Foxtable(狐表)用户栏目专家坐堂 → 关于合并导入的问题


  共有2151人关注过本帖平板打印复制链接

主题:关于合并导入的问题

帅哥哟,离线,有人找我吗?
扶风
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
关于合并导入的问题  发帖心情 Post By:2015/8/6 15:21:00 [只看该作者]

老师  如下合并导入代码  为何执行后会有一列没有数据呢  表中列名与EXCEL列名是一致的啊

 

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim mg As New Merger
    mg.Format = "Excel"
    mg.SourcePath = dlg.FileName
    mg.SourceTableName = "Page1"
    mg.DataTableName = "物料表"
    mg.Merge()
End If

For Each dt As DataTable In DataTables
    dt.Save()
Next

MessageBox.Show("合并导入成功!","提示")


 回到顶部