用ADO方式连接Excel

.版本 2
.支持库 spec
.支持库 eDB

文本1 = “Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties='Excel 8.0” + “;HDR=NO;IMEX=1;';data source=” + 取运行目录 () + “\100727双色球.xls;”
' 指定扩展属性为 Microsoft Excel 8.0 (97) 9.0 (2000) 10.0 (2002)
' HDR=NO   即无字段名
' HDR=yes  即有字段名,一般默认excel表中第1行的列标题为字段名,如姓名、年龄等
' IMEX  表示是否强制转换为文本
' IMEX有三个值0,1,2,意义如下:
' 0 ---导出模式;
' 1---导入模式;
' 2----链接模式(完全更新能力)


调试输出 (数据库连接1.连接 (文本1))

记录集1.置连接 (数据库连接1)

调试输出 (记录集1.打开 (“select * from [原始数据$]”, #SQL语句))

原文地址:https://www.cnblogs.com/lizunicon/p/1787469.html