質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.44%
DAO(Data Access Object)

DAO(Data Access Object)とは、データベースなどに保存するための操作を実装したオブジェクトのことです。データの永続化機構に抽象化されたインタフェースを提供し、データベースの詳細を隠蔽。ビジネスロジックとデータ操作も分離できます。

Access

Accessはマイクロソフトによるリレーショナルデータベース管理システムです。オブジェクト指向のアプリケーション作成に対応しており、テーブルや編集をはじめ、クエリ生成、入力フォーム作成、レポート作成など一通りの機能を備えています。

Q&A

解決済

1回答

1475閲覧

SQL構文のエラーについて

AKI_TADA

総合スコア7

DAO(Data Access Object)

DAO(Data Access Object)とは、データベースなどに保存するための操作を実装したオブジェクトのことです。データの永続化機構に抽象化されたインタフェースを提供し、データベースの詳細を隠蔽。ビジネスロジックとデータ操作も分離できます。

Access

Accessはマイクロソフトによるリレーショナルデータベース管理システムです。オブジェクト指向のアプリケーション作成に対応しており、テーブルや編集をはじめ、クエリ生成、入力フォーム作成、レポート作成など一通りの機能を備えています。

0グッド

0クリップ

投稿2023/03/14 09:35

はじめまして。AKI_TADAと申します。
社内でACCESSVBAを使用した自動発注システムを作成している最中です。
今現在、フォームにある削除ボタンでレコード削除を行うプログラムを作成しております。
しかし、 Set Rst = db.OpenRecordset(strSQL, dbOpenDynaset)の部分で「データ型が一致しません。」というエラーが発生します。テーブルの発注ID及びフォームの発注IDのテキストボックスはいずれもテキスト形式に設定しているので一致しているはずなのですが・・・
どこに問題があるのでしょうか。

Private Sub コマンド58_Click()

Dim db As DAO.Database Dim Rst As DAO.Recordset Dim strData As String Dim strSQL As String Set db = CurrentDb strData = CStr(Me.発注ID) '発注IDのテキストボックスを参照 strSQL = "select * from T_〇〇商事 where 発注ID=" & strData 'T_〇〇商事テーブルから同じ発注IDのデータを取り出す。 Set Rst = db.OpenRecordset(strSQL, dbOpenDynaset) If Rst.RecordCount = 1 Then With Rst .Edit Rst.Delete End With End If Rst.Close

End Sub

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

ベストアンサー

テーブルの発注ID及びフォームの発注IDのテキストボックスはいずれもテキスト形式に設定しているので一致しているはずなのですが

テキストなら、文字引用符(')が必要です。

vba

1 2strSQL = "select * from T_〇〇商事 where 発注ID='" & strData & "'" 'T_〇〇商事テーブルから同じ発注IDのデータを取り出す。

投稿2023/03/14 09:58

sazi

総合スコア25243

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

AKI_TADA

2023/03/15 00:22

テキスト形式の場合、文字引用符をつけないとSQLにテキスト型と認識されないんですね。 回答の通りに修正したところ、正常に作動するようになりました。ありがとうございます。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.44%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問