web-dev-qa-db-ja.com

qtpで要求された名前または序数に対応するコレクションにアイテムが見つかりません

特定のシナリオで、QTP（より具体的にはVBスクリプト）を使用したQTP）内で選択クエリを使用しようとしましたが、コードが機能していません。

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

コードのどのセクションでスクリプトの結果が失敗するかを教えてください。

testingautomated-testsqtphp-uft
6
Girish

「要求された名前に対応するコレクションにアイテムが見つかりません」-このエラーは、参照しようとしているレコードセットにフィールドが存在しない場合に発生します。

rsには「v1」はなく、「STATUS」のみがあります。

  rs.fields("v1")

だから、それは

rs.fields("STATUS")
15
vins