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
逻辑型,如果导入的是文本文件,用此属性指定第一行是否是列名称。
方法
示例一
导入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()