dolice218 发表于 2010-11-22 16:23:23

怎样将数据库的查询结果放入数组中?

本帖最后由 dolice218 于 2010-11-23 14:23 编辑

页面上有个webtable里面显示按照条件查询出来的结果,这些查询结果需要与数据库中的真实数据相比对,因为人力比对较困难,数据量大,所以想做成自动化比对的,QTP可以做到么?怎样做?如果QTP不能,Loadrunner可以么?请高手指点,谢谢!

目前该问题进行到将数据库的查询结果放入数组中了,为了连接数据库我写了如下代码:
Dim Cnn, Str, Rst, i
Str = "DRIVER=SQL Server;SERVER=135.251.52.68;UID=RES_DEV;PWD=Password@01;APP=Microsoft Office 2003;WSID=CV0017583N0.ad4.ad.alcatel.com;DATABASE=TS_RES"
Set Cnn = createobject("ADODB. Connection")
Cnn.Open Str
Set Rst = Createobject ("ADODB.recordset")
Rst.Open "select bd.BusinessDivisionCode, db.BusinessDivisionName, bd.BusinessGroupCode, bd.RecordStatus from TS_RES_BusinessDivision as bd", Cnn
可是进行到创建数据库连接对象时就出错了,显示不能创建adodb.connection,我用的数据库是SQL Server的,请高手指点

testlab 发表于 2010-11-22 16:31:20

可以,先将数据库查询集合放入数组中,再通过webtable的行和列取值进行比较

dolice218 发表于 2010-11-22 16:40:41

请问你有现成的脚本么?我才接触QTP这个貌似很复杂,将查询结果放入数组中我不会,后面取值我是知道的,还有个问题,因为数据库里的值是变化的,会有记录被删除和添加,按照上面的方法可行么?

testlab 发表于 2010-11-22 16:51:48

如果对数据库进行了添加删除操作,那么在对比的时候你肯定要重新查询新的结果集,这个结果集是根据数据库的当前状态得到的
取数据库集合值的方法是res("数据库集合列名").value,用for循环到数组中
While not res.eof
       For i = 0 to n
             Rs(i,0) = res("").value
             Rs(i,1) = res("").value
             ....
       Next
Wend
你也可以定义几个一维数组进行验证

dolice218 发表于 2010-11-23 11:12:31

数据库集合列名是什么意思?我在哪里输入连接数据库用的connection string呢?用select语句从数据库中选择出数据是个只有一列,N行的一维数组,怎么用具体的字符串和这个一维数组里的值做比较呢?在线等...急,今天脚本一定要做出来。
页: [1]
查看完整版本: 怎样将数据库的查询结果放入数组中?