パソコン(ソフト)

【Access】VBA内のSQLで抽出後更新すると「抽出条件でデータ型が一致しません」

VBA内でSQLを使って抽出後更新するというシンプルな処理に、

ココに注意

「抽出条件でデータ型が一致しません」

っとなって中々先に進めませんでした。

いつものように、カンマやダブルコーテーションの問題になるのですが、過去の備忘録にもない方法だったので追加備忘録です。

文字列か数値かで記述が違う

過去の備忘録から文字列か、数値かで書き方が違う事は知っていましたので、表示上は数値ですが、文字列フィールドになっていることは分かっていました。

スプーラーサービスが停止
参考「ローカルの印刷スプーラーサービスが実行されていません」で印刷できない不具合対応

Windowsパソコンが突然印刷ができなくなり、「ローカルの印刷スプーラーサービスが実行されていません」というエラーがでました。どうやら、印刷スプーラーサービスが停止しているのが原因でしたが、パソコンを再起動しても停止してしまうような状態でした。

続きを見る

 

文字列でのSQLでの抽出なので下記のようにしました。

SQL = "SELECT * FROM dbo_order WHERE arrange_date = " & Me!arrange_id & ""

 

「抽出条件でデータ型が一致しません」

となりました。

debug.print SQL で確認すると、

SELECT * FROM dbo_order WHERE arrange_date = 20200806113923

 

となっています。

ちゃんと数値も入って検索できるはずだと思いますが、何で???

 

試しに、数値型で実行しても同じエラーで先に進めません。

SQL = "SELECT * FROM dbo_order WHERE arrange_date = " & arrange_id

結局、今回はシングルコーテーデョン

結局今回は、シングルコーテーションを入れることで回避できました。

 

SQL = "SELECT * FROM dbo_order WHERE arrange_date = '" & arrange_id & "'"

'" & arrange_id & "'"

という感じですね。

同じく

debug.print SQL で確認すると、

SELECT * FROM dbo_order WHERE arrange_date = 20200806113923

エラーが出た時と同じじゃねぇ!

 

ココがポイント

デバッグでの表示内容は、同じなのに、エラーがでる場合と出ない場合との違いがある

のです。

次から無駄な時間をかけないように、この方法も備忘録に残しておきます。

 

 

追記)カンマやらダブルコーテーションやら???

ちょっとしたことで抽出されなかったり検索されない事があるので、都度、この下に遭遇した時に追記していきます。

※抽出や検索コードでうまく行ったものだけを記載しています。

 

rs.Filter = "NO = " & NO_edit

SQL = "SELECT * FROM dbo_message WHERE dbo_message.NO = " & Forms![message]![no]

 

 

-パソコン(ソフト)
-, , , , , ,

Translate »

© 2024 PCTips