Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1129 / 2272 ツリー ←次へ | 前へ→

【8655】データの不一致について ねもと 06/10/6(金) 18:32 質問[未読]
【8657】Re:データの不一致について keiのおトン 06/10/6(金) 21:09 発言[未読]
【8664】Re:データの不一致について ねもと 06/10/10(火) 11:34 お礼[未読]
【8658】Re:データの不一致について YU-TANG 06/10/6(金) 23:48 発言[未読]
【8665】Re:データの不一致について ねもと 06/10/10(火) 11:36 お礼[未読]

【8655】データの不一致について
質問  ねもと  - 06/10/6(金) 18:32 -

引用なし
パスワード
   下記のモジュールを実行しようとするとデータの不一致になってしまいます。
どのように記述すればいいのでしょうか?
よろしくお願いします。


Dim Db As Database
Dim INRs As Recordset
Dim 読込 As String

Set Db = CurrentDb

読込 = "顧客明細テーブル"
Set INRs = Db.OpenRecordset(読込、dbOpenDynaset)

Set INRs = Db.OpenRecordset(読込、dbOpenDynasetのところでエラーになってしまいます。
よろしくお願いします

【8657】Re:データの不一致について
発言  keiのおトン  - 06/10/6(金) 21:09 -

引用なし
パスワード
   ▼ねもと さん:
>下記のモジュールを実行しようとするとデータの不一致になってしまいます。
>どのように記述すればいいのでしょうか?
>よろしくお願いします。
>
>
>Dim Db As Database
>Dim INRs As Recordset
>Dim 読込 As String
>
>Set Db = CurrentDb
>
>読込 = "顧客明細テーブル"
>Set INRs = Db.OpenRecordset(読込、dbOpenDynaset)
>
>Set INRs = Db.OpenRecordset(読込、dbOpenDynasetのところでエラーになってしまいます。
>よろしくお願いします

正確なエラーメッセージとAccessのバージョンを知りたいですネ。
Access2000以降はDAOとADODBが使えますが、参照設定の優先順位によって
省略値が違います。

とりあえず、

Dim Db As DAO.Database
Dim INRs As DAO.Recordset

とDAOを銘記してはどうでしょうか?

【8658】Re:データの不一致について
発言  YU-TANG WEB  - 06/10/6(金) 23:48 -

引用なし
パスワード
   こんばんは、YU-TANG です。

▼ねもと さん:
>Set INRs = Db.OpenRecordset(読込、dbOpenDynaset)

額面どおり受け取ると、「読込,」ではなく「読込、」に
なっているので、コンパイルエラー(「Option Explicit」
していなければ、実行時エラー)になりそうですが。

【8664】Re:データの不一致について
お礼  ねもと  - 06/10/10(火) 11:34 -

引用なし
パスワード
   keiのおトン さん:
うまく処理できました。
ありがとうございました

【8665】Re:データの不一致について
お礼  ねもと  - 06/10/10(火) 11:36 -

引用なし
パスワード
   YU-TANG さん:
ご指摘ありがとうございました。
うまく処理できました。
また何かありましたらよろしくお願いします

1129 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078214
(SS)C-BOARD v3.8 is Free