参考地址: http://www.foxtable.com/webhelp/topics/0684.htm
如果希望出现一个打开文件对话框,导入用户指定的文件,可以参考下面的代码:
Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
Dim ip As New Importer
ip.SourcePath = dlg.FileName '指定数据文件
ip.SourceTableName = "订单" '指定要导入的表
ip.NewTableName ="订单" '导入后的表名
ip.Import()
End If
这是导入access文件,希望出现一个打开文件对话框的参考代码。
如果希望导入一个excel文件里面的一个工作表(excel文件里面有很多工作表),可以设定一个打开文件对话框,然后再选择所要导入的表吗?