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

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

新規登録して質問してみよう
ただいま回答率
85.48%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

SQL Server

SQL Serverはマイクロソフトのリレーショナルデータベース管理システムです。データマイニングや多次元解析など、ビジネスインテリジェンスのための機能が備わっています。

SQL

SQL(Structured Query Language)は、リレーショナルデータベース管理システム (RDBMS)のデータベース言語です。大きく分けて、データ定義言語(DDL)、データ操作言語(DML)、データ制御言語(DCL)の3つで構成されており、プログラム上でSQL文を生成して、RDBMSに命令を出し、RDBに必要なデータを格納できます。また、格納したデータを引き出すことも可能です。

Q&A

解決済

1回答

1367閲覧

In句をパラメータにするとうまくいかない

Ruri5280

総合スコア309

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

SQL Server

SQL Serverはマイクロソフトのリレーショナルデータベース管理システムです。データマイニングや多次元解析など、ビジネスインテリジェンスのための機能が備わっています。

SQL

SQL(Structured Query Language)は、リレーショナルデータベース管理システム (RDBMS)のデータベース言語です。大きく分けて、データ定義言語(DDL)、データ操作言語(DML)、データ制御言語(DCL)の3つで構成されており、プログラム上でSQL文を生成して、RDBMSに命令を出し、RDBに必要なデータを格納できます。また、格納したデータを引き出すことも可能です。

0グッド

0クリップ

投稿2022/09/24 08:51

前提

delete from Item where itemID in (111,222,333)

というSQLをSSMSで実行すると問題なく実行されるのですが
これを下記のようにコマンドパラメータにするとなぜか実行されません。
strItemは文字列型で111,222,333を入れています

括弧のせいかなのかと思って
strSQL = strSQL & " itemID in ?"
にしても実行されません

itemIDフィールドはintegerですが、strItemはstringなので

Conn.Parameters.Append Conn.CreateParameter("@itemID", 3, 1, , strItem)
とか
Conn.Parameters.Append Conn.CreateParameter("@itemID", 129, 1, , strItem)
にしても反映されません

何が悪いでしょうか。

該当のソースコード

SQL

1 strSQL = "" 2 strSQL = strSQL & "delete from Item " 3 strSQL = strSQL & " where" 4 strSQL = strSQL & " itemID in (?)" 5 6 Set Conn = CreateObject("ADODB.Command") 7 Conn.CommandTimeout = 1200 8 Conn.ActiveConnection =xxx 9 Conn.CommandType = 1 10 Conn.CommandText = strSQL 11 Conn.Parameters.Append Conn.CreateParameter("@itemID", 3, 1, , strItem) 12 Set oRS = Conn.Execute()

試したこと

実際のSQLが問題ないことを確認しました
括弧をつけたり外したり、型を変えたりしてみましたが
うまくいきません

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

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

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

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

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

Ruri5280

2022/09/24 09:15

うーん パラメタもstringだし、単純にカンマでつなげてるだけに見えるし違いがわからない、、、、泣 ぴえ
sazi

2022/09/24 09:51

KOZ06.0さんの示すリンク先にある通りですよ。 > これを知らなかったので、いくらIN句の値をいろいろ変えてやってみたんですが、全く値が取れずにかなりハマりました。 > 結果「SqlParameterでわたす値は1つの値と見なされる」ということなので、IN句の中で渡すパラメータを1つずつ設定してあげないといけないようです。
Ruri5280

2022/09/24 09:54

わー!!見落としてました!! ありがとうございます! やってみます!!
guest

回答1

0

ベストアンサー

まずは、質問の回答ではないですが、In句とIn演算子は異なるものですので、ご注意を。
今回は、In演算子についての質問ですね。

In operator (Microsoft Access SQL) | Microsoft Learn

IN 句 (Microsoft Access SQL) | Microsoft Learn

strItemは文字列型で111,222,333を入れています

In演算子の引数は、カンマ区切りで複数値を設定します。カンマ区切りの文字列ではないです。
一つのParameterでは複数値をわたすことはできません。

ここは単純にSQL文字列に、strItem を埋め込めばいいでしょう。

vba

1 strSQL = "" 2 strSQL = strSQL & "delete from Item " 3 strSQL = strSQL & " where" 4 strSQL = strSQL & " itemID in (" & strItem & ")" 5 6 Set Conn = CreateObject("ADODB.Command") 7 Conn.CommandTimeout = 1200 8 Conn.ActiveConnection =xxx 9 Conn.CommandType = 1 10 Conn.CommandText = strSQL 11 Set oRS = Conn.Execute()

投稿2022/09/24 09:10

hatena19

総合スコア33715

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

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

Ruri5280

2022/09/24 09:47

そうなんです、、これだとうまくいくのですが、、 コーディングルール的にパラメタ化しないといけなくて泣いてますw アドバイス嬉しいです!ありがとうございます!
Ruri5280

2022/09/24 09:56

出来ました!! saziさん、KOZ06.0さん、hatena19さんありがとうございます!!
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

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

ただいまの回答率
85.48%

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

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

質問する

関連した質問