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

dolice218

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

目前该问题进行到将数据库的查询结果放入数组中了，为了连接数据库我写了如下代码：
Dim Cnn, Str, Rst, i
Str = "DRIVER=SQL Server;SERVER=135.251.52.68;UID=RES_DEVWD=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

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

dolice218

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

testlab

如果对数据库进行了添加删除操作,那么在对比的时候你肯定要重新查询新的结果集,这个结果集是根据数据库的当前状态得到的
取数据库集合值的方法是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

数据库集合列名是什么意思？我在哪里输入连接数据库用的connection string呢？用select语句从数据库中选择出数据是个只有一列，N行的一维数组，怎么用具体的字符串和这个一维数组里的值做比较呢？在线等...急，今天脚本一定要做出来。