OS:XP、VB6、ACCESS2000の環境でADOの勉強をしています。
ある参考書を見て、次のサンプルを実行しました。
【サンプル】
フォームにデータグリッドコントロールを貼り付ける。
フォームのLoadイベントプロシージャ内でデータベース(MDB)に接続し、レコードセットを取得して、データグリッドコントロールに取得したレコードセットを表示させる。
データベースはACCESS97で作成されたものです。
(ソース)
---------------------------------------------------------------
Option Explicit
Private cn As ADODB.Connection
Private rs As ADODB.Recordset
Private Sub Form_Load()
'データーベースに接続
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=G:\VB_TEST\Book.mdb"
cn.Open
'レコードセットを取得
Set rs = New ADODB.Recordset
rs.Open "本", cn, adOpenStatic
'データグリッドコントロールに取得したレコードセットを表示
Set DataGrid1.DataSource = rs
End Sub
---------------------------------------------------------------
上記のプログラムを実行するともちろんうまく表示されました。
が、接続プロバイダ名を
"Provider=Microsoft.Jet.OLEDB.3.51;"
↓↓↓↓↓
"Provider=Microsoft.Jet.OLEDB.4.0;"
にすると表示されません。
そこで、データベースをACCESS2000で作成し直し、実行してもダメです。
この処理はJet4.0では出来ないのでしょうか?
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
ちょっとだけ思い出したことを書きます。
Access2000が出た当初は、DataGridには直結できなかったと思います。
本当を言うと、現在はどうかわかりません。
Dataコントロール経由なら、SP5導入マシンならたしか可能だったと思います。
遠い記憶で話しております。
この回答への補足
いろいろとコメントありがとうございます。
なんとか Jet4.0で上手く表示されました! !(^^)!
rs.Open の前に
rs.CursorLocation = adUseClient
を記入すると表示されました。
しかし、この違いは何なんでしょうねえ? (ーー;)
No.3
- 回答日時:
参照設定で
>Microsoft ActivX Data Objects 2.X Library
2.X ← このバージョンが古いとか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) ExcelからAccessのテーブルに書き込む時に時間がかかる 1 2022/10/14 20:38
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Access(アクセス) DoCmd.SearchForRecord が動かない時の解決方法 3 2022/07/22 15:31
- Access(アクセス) 実行時エラー3131 FROM 句の構文エラーです について 7 2022/06/13 15:45
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- Excel(エクセル) PHPプログラムをエクセルに張り付けると検索ボックスがでてくる! 3 2022/05/08 07:10
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル・VBA CheckBoxのオブ...
-
C#,vb.netで業務用アプリ開発と...
-
EXCELでactivexコントロールを...
-
カメラスクロールするのを動画...
-
【VB】テキストボックスのキー...
-
間違えて配置してしまったコン...
-
エクセル コントロールツール...
-
(VBA)スピンボタンの大量...
-
vb.netで画面のコントロールId...
-
サーバー上のブックを開けない...
-
エクセルVBAユーザーフォーム・...
-
ExcelVBAのコントロールの種類...
-
アクセス特有の書き方?
-
ACCESS2010のVBAでフォーム内ク...
-
VBAのフォームでTextBoxがいっ...
-
.Net ユーザーコントロールのイ...
-
Excel2003 カレンダーコントロ...
-
VB 継承した時に表示されるマー...
-
フォーカスの枠線を太くしたい
-
WinAPIで電卓をクリック
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
カメラスクロールするのを動画...
-
エクセル・VBA CheckBoxのオブ...
-
vb.netで画面のコントロールId...
-
EXCELでactivexコントロールを...
-
ExcelVBAでListViewが使用できない
-
(VBA)スピンボタンの大量...
-
エクセルVBAでオプションボタン...
-
C#で角が丸いテキストボックス
-
ユーザーフォームで動的(Me.Con...
-
アクセス特有の書き方?
-
間違えて配置してしまったコン...
-
コンボボックスの文字によるif...
-
VBAのエラーについて、”実行時...
-
変数をコントロール型で使用す...
-
chr関数の呼び出しで「プロ...
-
With~EndWithの省略部分と引数...
-
C#で自分のウインド・ハンド...
-
excelのリストボックスで選択し...
-
'ckbl' コントロールは作成され...
-
フォーム上の現在アクティブな...
おすすめ情報