51Testing软件测试论坛

标题: 请问QTP访问数据库（Oracle），可不可以用来比较两条记录的结果？ [打印本页]

作者: keynes_2005 时间: 2007-9-25 17:38
标题: 请问QTP访问数据库（Oracle），可不可以用来比较两条记录的结果？
我在数据库中，有一个模板记录，新建立的记录，想和数据库中的模板进行比较，如果比较完全相同，返回True，如果有不相同的字段，返回False，并显示不相同的字段值。不知道可能做到？
QTP对数据库操作，我不清楚，查看了帮助，也是一知半解，网上这方面的资料很少，不知道哪位大哥，能给小弟一点，这方面的资料。多谢了！ sdlkfj2

作者: 风过无息 时间: 2007-9-26 09:12
楼主是想比较纪录的值还是想比较表的字段啊?

作者: keynes_2005 时间: 2007-9-26 09:23
我是想比较记录的值，不知到怎么做，能给点意见吗？

作者: keynes_2005 时间: 2007-9-27 13:57
哪位大哥，帮忙看一下？给我点这方面的资料，也可以。期待中。。。

作者: hsjzfling 时间: 2007-10-7 15:27
抽了点时间写了个例子，希望能对你有帮助～

'创建连接数据库对象
Set conn = createobject("ADODB.Connection")

'连接Oracle数据库,注意选择好对应的Provider,其值还可为MSDAORA.1等等;填入连接数据库的用户名和密码以及数据源地址
conn.Open"Provider=OraOLEDB.Oracle.1;Password=mercury;Persist Security Info=True;User ID=admin;Data Source=newtours.mercuryinteractive.com"
'其中"Provider=OraOLEDB.Oracle.1;Password=mercury;Persist Security Info=True;User ID=admin;Data Source=newtours.mercuryinteractive.com"语句
'可以通过创建一个.udl文件，双击后设置正确的连接信息，测试连接成功后就可用记事本再打开该文件得到

'创建数据库记录集对象(也就是查询结果)
Set res = createobject("ADODB.Recordset")

'打开以指定查询语句查询所得的记录集
res.Open"select * from user where username=kevin"，conn,2,2

'从查询结果的指定字段取出值
iDate = res("Date")
iValue = res("Value")
iAddress = res("Address")
iTelNo = res("TelNo")

res.close       '关闭记录集
Set res=nothing       '释放对象
conn.close       '关闭连接
Set conn=nothing       '释放对象

[ 本帖最后由 hsjzfling 于 2007-10-15 16:15 编辑 ]

作者: keynes_2005 时间: 2007-10-15 12:44
多谢了，问题解决了。用的是5楼的方法。

作者: wyrf584 时间: 2010-7-26 13:11
太NB了~~~

作者: syuuqin 时间: 2012-7-24 15:25
赞一个！

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