用ado把excel数据写入oracle,ExcelADO 演示如何使用 ADO 读写 Excel 工作簿中的数据

适用于 Excel 工作簿的 Jet OLE DB 提供程序详细信息

Microsoft Jet 数据库引擎可用于通过可安装的索引顺序访问方法(ISAM)驱动程序访问其他数据库文件格式(如 Excel 工作簿)中的数据。 为了打开 Microsoft Jet 4.0 OLE DB 提供程序支持的外部格式，请在连接的扩展属性中指定数据库类型。 Jet OLE DB 提供程序支持 Microsoft Excel 工作簿的以下数据库类型：

Excel 3。0

Excel 4。0

Excel 5。0

Excel 8。0

注意：使用适用于 microsoft excel 5.0 和7.0 (95)工作簿的 excel 5.0 源数据库类型，并将 excel 8.0 源数据库类型用于 microsoft excel 8.0 (97)和9.0 (2000)工作簿。 ExcelADO 示例使用 Excel 97 和 Excel 2000 格式的 Excel 工作簿。以下示例演示了与 Excel 97 (或2000)工作簿的 ADO 连接：

Dim oConn As New ADODB.ConnectionWith oConn .Provider = "Microsoft.Jet.OLEDB.4.0" .Properties("Extended Properties").Value = "Excel 8.0" .Open "C:\Book1.xls" '.... .CloseEnd With

或

Dim oConn As New ADODB.ConnectionoConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=C:\Book1.xls;" & _ "Extended Properties=""Excel 8.0;"""oConn.Close

表命名约定有多种方法可以引用 Excel 工作簿中的表格(或区域)：

使用工作表名称，后跟美元符号(例如，[Sheet1 $] 或 [我的工作表 $])。 以此方式引用的工作簿表由工作表的整个使用区域组成。

oRS.Open "Select * from [Sheet1$]", oConn, adOpenStatic

使用具有已定义名称的区域(例如，[Table1])。

oRS.Open "Select * from Table1", oConn, adOpenStatic

使用具有特定地址的范围(例如，[Sheet1 $ A1： B10])。

oRS.Open "Select * from [Sheet1$A1:B10]", oConn, adOpenStatic

表格标题通过 Excel 工作簿，在默认情况下，区域中的第一行被视为标题行(或字段名称)。 如果第一个区域不包含标题，则可以在连接字符串的扩展属性中指定 HDR = NO 。 如果第一行不包含标题，则 OLE DB 提供程序会自动为您命名字段(其中 F1 表示第一个字段，F2 表示第二个字段等)。数据类型与传统数据库不同，没有指定 Excel 表中列的数据类型的直接方法。 相反，OLE DB 提供程序扫描列中的有限行数以 "猜测" 字段的数据类型。 要扫描的行数的默认值为八(8)行;你可以通过在连接字符串的扩展属性中为 MAXSCANROWS 设置指定一个介于1(1)和十六(16)之间的值来更改要扫描的行数。