DataGridへの表示

解決

茜 2003-10-28 19:55:52 No: 109452

Buturyu.rs仕入先マスタ.Filter = "仕入先ID = " & Text16
Buturyu.rs仕入先マスタ.Filter = "会社名 LIKE '*" & Text17 & "*'"
Buturyu.rs仕入先マスタ.Find "担当者名 LIKE '*" & Text18 & "*'"

Search = "SELECT 仕入先ID, 会社名, 担当者名" & " FROM 仕入先マスタ "

Set rs = New ADODB.Recordset
    With rs
        .ActiveConnection = cn
        .CursorLocation = adUseServer
        .CursorType = adOpenKeyset
        .LockType = adLockOptimistic
        .Properties("IRowsetIdentity") = True
        .Open Search
    End With

Set DataGrid1.DataSource = rs

DataGridに抽出した結果を表示したいのですがこのままだと全件表示
されてしまいます。抽出した件数だけ表示するにはどうすればよいの
ですか？

Say 2003-10-28 20:31:41 No: 109453

SelectクエリのWhere句に抽出条件を記述するとか。

茜 2003-10-28 22:20:50 No: 109454

解決しました。