QTP：データベースのチェックポイントをパラメータ

Question

私はQTP（HP QuickTestのプロ）で、データベースのチェックポイントを持っています。私はそれを静的なクエリを渡す場合は、このチェックポイントは動作しますが、私は、パラメータを渡すか、プログラム的にクエリを構築できるようにする必要があります。私はまた、QTPからプログラム的にデータベースを照会する方法を知っているが、その結果に基づいてチェックポイントを作成する方法が表示されません。

具体的には、I = 0返されたRecordCount場合はFAILを引き起こし、および> = 1の場合、私は開発者、テスターないよ通過したいです。応答していないと QTPフォーラム - SO私を助けて。

！

これは私が試したコードです - 動作しますが、チェックポイントを欠います：

Dim con, rs,strSQL, Param1, Param2
Param1 = DataTable("B", dtGlobalSheet)
Param2 = DataTable("A", dtGlobalSheet)
Set con=Createobject("ADODB.Connection")
Set rs=Createobject("ADODB.recordset")
rs.CursorLocation = 3
rs.CursorType =3
connSTR= "Driver={SQL Server};Server=vsql0001;Database=DB0001;Dsn=myRegistryName"
con.open connSTR
strSQL= "select Field1, Field2 from dbo.Table1 where Field1 in (select Field1 from     dbo.Table2 where Param2 like '%"+Param2+"%' and active = 1) and (Field2     = '"+Param1+"' or Field2 like '"+Param1+" %' or Field2 like '%*"+Param1+"' or Field2     like '%*"+Param1+"*%')"
rs.open strSQL, con
msgbox rs.recordcount   ' want the CP to go here
rs.close
con.close

Answer 1

はそれを手に入れました。私はそれを静的クエリを与え、それが評価される前に、それを変更します。

strSQL= "select [...]"
DbTable("DbTable").SetTOProperty "Source", strSQL
DbTable("DbTable").Check CheckPoint("DbTable")