PageSize、PageNumberを設定し、ページを切り替える

Question

私は数百または数千のアイテムを持つページを持っています。 Webページのサイズは、ユーザーが手動で設定し、表示するアイテムの数（オプションは25,50,100,200）を選択します。それに応じて、アイテムは複数のページに表示されます。

各項目を確認するために、私はSQLを持っています。私は100

のうち、唯一の画面上に現在ある項目、すなわち項目26〜50をチェックしたい、私は次の試みた：

ItemsOnPage = mybrowser.webelement(...).GetROProperty("innertext") 
Set aRecordSet= objconnection.Execute(Query) 
    aRecordSet.PageSize = ItemsOnPage 
    print aRecordSet.PageNumber 

aRecordSet.PageNumber -1として滞在、がPageSizeにdependlessだけでなく、 PageSizeを設定しない場合また

、Web上で現在のページに基づいてページ番号を設定する必要があります。

wCurrentPage = mybrowser.webElement(...).GetROProperty("innertext") 

私は次のオプションを試してみました：

aRecordSet.AbsolutePage = wCurrentPage 
aRecordSet.AbsolutePosition = 2+(ItemsOnPage *(wCurrentPage-1)) 

これらのコマンドはエラーを返しました：オブジェクトが開いているときに操作が許可されていません。そして、

aRecordSet.CursorLocation = 1+(ItemsOnPage *(wCurrentPage-1)) 

"Current Recordsetはブックマークをサポートしていません。"

どのように実現できますか？

UPD：は、データを取得するためのクエリは次のとおりです。変数は、ユーザーのセットとしてWebページから値を取得すると考えられ、「ウェブ」で始まる

SELECT * FROM tblCustomerMetricData 
WHERE RunDate = '"&webGetDate&"' AND 
CustomerID in 
(SELECT CustomerID from [tblCustomers] 
where RegionID in (SELECT RegionID FROM [tblRegion] 
WHERE RegionName = '"&webRegionName&"')) OR CustomerID in (SELECT CustomerID from [tblCustomers] 
where CustomerName = '"&webCustomerName&"')) 

何か。クエリはUFTによって実行されます。

Answer 1

私は私のレコードを設定することができませんでした - それは私ができなかったためか、プロバイダがサポートされていなかったためだったかどうかわかりません。 私は、このソリューションでの移動：

pagesnumber = mybrowser(...).Webedit(...).GetROProperty("innertext") 'get pages on web 
for p = 1 to pagesnumber-1 
for r = 0 to webtable.rowcount 
for c = 0 to webtable.columncount(1) 

(comparing by cell by row here) 

next 'loop columncount 
Recordset.MoveNext 
next 'loop rowcount 
next 'loop pagesnumber 

したがって、私は、レコードセットのページやrecordnumberを設定する必要がいけません。

Answer 2

使用するためにRecordsetを構成する方法はいくつかあります。私たちはADOクライアント側のウェブサイト上でページ分割を行い、完全に動作します。 adUseClientが定義されていない場合

objconnection.CursorLocation = adUseClient 

3に設定し、：あなたは、データベース接続を確立した後、以下を追加してみてください。

Here are the docs for CursorLocation。