以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]导入的时候加判断如何实现  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=31084)

--  作者:nukyy
--  发布时间:2013/4/9 22:57:00
--  [求助]导入的时候加判断如何实现

用这样的语句去先打开一个对话框导入文件。

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 = "订单"
    mg.DataTableName = "订单"
    mg.Merge()
End If

 

但我需要在导入的时候筛选订单内容是否重复,重复就不导入,请问可以直接在这里加个IF语句去判断吗?加在哪个位置?

[此贴子已经被作者于2013-4-9 23:06:10编辑过]

--  作者:唐尸三摆手
--  发布时间:2013/4/10 8:10:00
--  
参考帮助文档"手工编码填充数据"
--  作者:Bin
--  发布时间:2013/4/10 8:47:00
--  
http://www.foxtable.com/help/topics/1533.htm