oo4o - TIPS - 読み込み行数の調整

テーブルから一度に読み込んでくる行数を設定するにはOraDynasetオブジェクトのFetchLimitプロパティの値を設定します。

FechLimitの初期値は100です。

サンプルコード

Dim OraDynaset As Object
Dim sql As String

sql = "select * from emp"
Set OraDynaset = OraDatabase.CreateDynaset(sql, &H0&)
OraDynaset.FetchLimit = 10

最初にレコードを取得する時に、FetchLimitで設定した行数分のレコードを一度に取得します。MoveNextメソッドなどを繰り返し、メモリに保持している行数を超えた行を持って来ようとしたときに、さらにFetchLimitで設定した行数分データを取得します。