关于QTP利用ADO打造Excel数据库的问题

mygoalistesting · 发表于 2015-5-28 16:25:24

系统: win7 64
l浏览器：IE8
QTP版本：10
今天刚刚到《精通QTP--自动化测试技术领航》的第三章
其中3.4.3小节讲解的是用ADO打造Excel数据库的问题。
按照书上的例子我原封不动的写了代码运行确报错。（数据库连接地址是通过前面章节所讲知识自己生成的，所以和书上的Demo不一致）
代码如下：

'定义SQL连接字符串
sqlConnecton="DBQ=D:\testing.xlsx;DefaultDir=D:\;Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DriverId=1046;FIL=excel 12.0;FILEDSN=C:\Users\Administrator\Documents\ExcelFiles.dsn;MaxBufferSize=2048;MaxScanRows=8

ageTimeout=5;ReadOnly=1;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;"
'定义Sql语句
sqlCommand="selcet * from [sheet1$]"
'创建ADO对象
Set oExcel =CreateObject("adodb.connection")
'打开数据库连接
oExcel.Open sqlConnecton
'执行SQL语句并返回结果集
Set oRst=oExcel.Execute(sqlCommand)
MsgBox oRst.Fields("userName")
'关闭数据库连接
oExcel.Close
'释放资源
Set oExcel =Nothing
Set oRst=nothing

点击运行后报错如下图所示：

我百度了一下，按照他的方法还是不行。百度到的方法如下图：

所以这里问问大家，这里应该怎么处理？谢谢！