无法在与qtp中请求的名称或序号对应的集合中找到项目

Question

在某种情况下,我试图在QTP中使用select查询(更具体地说,QTP使用VB脚本)但是代码不起作用.

Option Explicit
Dim con,rs
Set con=createobject("adodb.connection")
Set rs=createobject("adodb.recordset")

con.open "Driver={Microsoft ODBC for Oracle};Server=myServer; Uid=USERNAME;Pwd=PASSWORD;"
rs.open "SELECT B.STATUS FROM STUDENT B WHERE B.BATCHCODE='FIRST' ",con

Do while not rs.eof
DataTable.GlobalSheet.AddParameter.RawValue = rs.fields("v1")
rs.movenext
Loop

Release objects
Set rs= nothing
Set con= nothing

请帮助我知道代码的哪一部分导致脚本结果失败.

Answer 1

"无法在与所请求的名称对应的集合中找到项目" - 当您尝试引用的记录集中不存在该字段时,会出现此错误!

rs不会有"v1",只有"STATUS".

  rs.fields("v1")

所以,它应该是

rs.fields("STATUS")