レコードセットの"

解決

juice 2003-01-24 22:26:12 No: 105918

よく出るエラーで、解決しないままでいたものです。
データベースを開いて、以下のレコードセットを実行すると
Set Pattern = lc_dbNTJ.OpenRecordset(strSQL, dbOpenDynaset)
"型が一致しません"
というエラーがでます。
これって、SQL文エラーではないですよね？
Public lc_dbNTJ As Database
Set lc_dbNTJ = DBEngine.Workspaces(0).OpenDatabase(gb_strDBName)
Dim Pattern As Recordset
と宣言しているのですが。

Say 2003-01-24 23:16:51 No: 105919

>Dim Pattern As Recordset

Dim Pattern As DAO.Recordset

とか？

t@Ki 2003-01-30 04:47:36 No: 105920

SQL文はどのなものですか？

juice 2003-02-11 01:31:19 No: 105921

SQL文＝ "select PatternName from 表示パターン"
このようなものです。
参照設定をいじると直るときがありますが、はっきりしていないので
断言できません。
今はDAO3.6object libraryを設定して動いています。

juice 2003-03-11 20:55:25 No: 105922

Sayさんのおっしゃるように
Dim Pattern As DAO.Recordset
にしたら、型が一致しませんというエラーは出なくなりました。
Sayさん、t@Kiさんありがとうございます。
でも、何故？

nanashi 2003-03-11 21:04:55 No: 105923

参照設定の中でDAO以外のRecordsetというオブジェクト持つライブラリを指定してませんか？
例えばADOとか。
その場合、どのライブラリのRecordsetオブジェクトなのかを
明示的に指定しないとエラーが起こることがあります。

上記の場合に限らず、ライブラリを明示的に指定する癖をつけたほうがいいと思いますが。

juice 2003-03-11 22:31:35 No: 105924

nanashiさん、なるほどです。
確かにADO2.1も設定していました。
ありがとうございます。