请问QTP访问数据库（Oracle）， 可不可以用来比较两条记录的结果？

keynes_2005

我在数据库中， 有一个模板记录， 新建立的记录， 想和数据库中的模板进行比较， 如果比较完全相同， 返回True， 如果有不相同的字段， 返回False， 并显示不相同的字段值。 不知道可能做到？
QTP对数据库操作， 我不清楚， 查看了帮助， 也是一知半解， 网上这方面的资料很少， 不知道哪位大哥， 能给小弟一点，这方面的资料。多谢了！ sdlkfj2

风过无息

楼主是想比较纪录的值还是想比较表的字段啊?

keynes_2005

我是想比较记录的值， 不知到怎么做， 能给点意见吗？

keynes_2005

哪位大哥， 帮忙看一下？ 给我点这方面的资料，也可以。 期待中。。。

hsjzfling

抽了点时间写了个例子，希望能对你有帮助～

'创建连接数据库对象
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

多谢了， 问题解决了。 用的是5楼的方法。

wyrf584

太NB了~~~

syuuqin

赞一个！