下記の単純なクエリー(SQL)が実行できないです。
Dim db As Database
Dim tb As Recordset
Set db = OpenDatabase("フルパス")
Set tb = db.OpenRecordset("a", dbOpenTable)
strsql = " SELECT * FROM a "
db.Execute strsql
単純なこれだけです。
環境はエクセル2000です。データーベースはつかんで、オープンは出来てます。
DAOの3.6を参照設定もしてあります。
考えられる事はあとはなんでしょうか?
実行すると実行時エラー3065が出てしまいます。
3065の意味は「選択クエリーは実行できません」では?
Execute メソッドは、アクション クエリーに対してのみ有効ですので、select(選択クエリー)は使えません
(アクションクエリーには、追加クエリー、削除クエリー、テーブル作成クエリー、および更新クエリーがあります。)
> Set tb = db.OpenRecordset("a", dbOpenTable)
ができているのであれば、
tb.MoveFirst
Do Until tb.EOF
Debug.Print tb!カラム名
tb.MoveNext
Loop
tb.Close
みたいな感じで、結果セットが取れると思います。
私の勘違いでした。
解決しました