51Testing软件测试论坛

标题: dbf文件通过access打开后连接QTP中遇到的问题 [打印本页]

作者: xinliduo 时间: 2007-1-11 15:00
标题: dbf文件通过access打开后连接QTP中遇到的问题
大家好:

dbf文件通过access打开后,
通过udl文件复制了连接的路径,
在QTP脚本中 "set res=cmd.execute()" 回放中提示: 类型不匹配
该如何修改呢?

谢谢

[ 本帖最后由 xinliduo 于 2007-1-11 16:39 编辑 ]

作者: xiaonan 时间: 2007-1-11 15:25
"类型不匹配",说明你上面的代码都问题,把代码放出来.

作者: xinliduo 时间: 2007-1-11 15:41
dim res,cmd.sql
set res=createobject("adodb.recordset")
set res=createobject("adodb.command")
cmd.activeconnection="...."
cmd.commandType=1
sql="...."
cmd.commandText=sql
set res=cmd.execute()
while not res.eof
......

谢谢

作者: xiaonan 时间: 2007-1-11 16:04
Dim conn,input,filename
filename="D:\公基本情况(tb_gsgk)-标准格式.xls" '
Set conn= createobject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source="&filename&";Extended Properties='Excel 8.0;hdr=yes'"
Set input= createobject("ADODB.Recordset")
input.Open "select * from [表名$] " ,conn,2,2
input.close
Set input=nothing

可以试试套用我的这段脚本.

你的代码我没看出什么问题,可能数据源或者sql语句不知道有没有问题

作者: xinliduo 时间: 2007-1-11 16:37
呵呵成功了谢谢xiaonan

的确是'类型不匹配',在sql查询语句中出了错,字符型的数据引用需要加单引号,数字型的数据直接引用就可以了哈哈

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)