导入不用数据源,用这个:
导入Excel文件:
Dim ip as New Importerip.SourcePath = "c:\Data\销售管理.xls" '指定数据文件ip.SourceTableName = "订单" '指定要导入的表ip.NewTableName ="订单" '导入后的表名ip.Format = "Excel" '指定导入格式ip.Import()