Importer

Importer类用于导入数据。

属性

• SourcePath
  指定要导入的数据文件，含路径。
  如果要导入的是dBASE或者Text文件，则只需指定路径。
   
• SourceTableName
  指定要导入的表的名称。
  如果要导入的是dBase或者Text文件，用文件名表示，无须扩展名。
   
• Format
  指定导入格式，包括Access、Access2007、Excel、Excel2007、dBASE、Delimited、Fixed等格式
  其中Delimited为夫符号分割的文本文件，Fixed为固定列宽的文本文件。
  默认为Access。
  导入文本文件的时候，最好配合有schema.ini文件，以便于指定列的类型和宽度。
   
• PassWord
  指定要导入的Access文件的密码。
   
• Filter
  指定导入条件。
   
• Fields
  指定要导入的字段(列)，不同的字段，用逗号给开，如果不指定，则导入所有字段。
   
• NewTableName
  指定导入后的表名。
   
• NewTableCaption
  指定导入后的表标题。
   
• Header
  逻辑型，如果导入的是文本文件，用此属性指定第一行是否是列名称。

方法

• Import
  开始导入数据。

示例一

导入Access文件：

Dim ip as New Importer
ip.SourcePath = "c:\\Data\\销售管理.mdb" \'指定数据文件
ip.SourceTableName = "订单" \'指定要导入的表
ip.NewTableName ="订单" \'导入后的表名
ip.Import()

示列二

导入Excel文件：

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

示例三

导入DBF文件：

Dim ip as New Importer
ip.SourcePath = "c:\\Data\\" \'指定目录
ip.SourceTableName = "订单" \'指定要导入的文件“订单.DBF”
ip.NewTableName ="订单" \'导入后的表名
ip.Format = "dbase" \'指定导入格式
ip.Import()

示例四

导入文本文件：

Dim ip as New Importer
ip.SourcePath = "c:\\Data-:special:1:- \'指定目录
ip.SourceTableName = "订单" \'指定要导入的文件“订单.txt”
ip.NewTableName ="订单" \'导入后的表名
ip.Format = "Delimited" \'指定导入格式
ip.Import()