DataGridが表示されない

解決

熊吉 2003-01-12 10:06:06 No: 105854 IP: [192.*.*.*]

データグリッドにレコードが表示されなくて困っています。
ＭＤＢファイル
Access2000
参照設定
Microsoft ActiveX Data Objects 2.5 Library
コンポーネント
Microsoft DataGrid Control 6.0 (SP5)(OLEDB)
ソース
Private Sub Form_Load()

    ' ADOのオブジェクト変数を宣言する
    Dim cnn As New ADODB.Connection
    Dim rec As New ADODB.Recordset

    ' 接続を確立する
    cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;DataSource=c:\db1.mdb;"

    ' テーブル名を指定してレコードセットを作成する
    rec.Open "Table1", cnn, adOpenKeyset, adLockOptimistic

    Set DataGrid1.DataSource = rec
End Sub

よろしくお願いします。

編集削除

K 2003-01-12 11:37:07 No: 105855 IP: [192.*.*.*]

rec.CursorLocation = adUseClient
rec.Open "Table1", cnn, adOpenKeyset, adLockOptimistic

で如何でしょ？

編集削除

熊吉 2003-01-12 20:03:43 No: 105856 IP: [192.*.*.*]

クライアントカーソルを指定する必要があったんですね
ありがとうございました。

編集削除