ACCESSのSQL文

質問

ACCESSのSQL文

いつもお世話になります。
SQL文でテーブルのデータを抽出したいのですが上手くいきません。

Dim rs4 As ADODB.Recordset
Dim cmdrs4 As New ADODB.Command

Set cmdrs4.ActiveConnection = CurrentProject.Connection

a = "SELECT 管理NO" & " FROM マスタ"
If strFlter = "" Then
a = a & ";"
Else
a = a & " WHERE " & strFlter & ";"
End If

cmdrs4.CommandText = a
Set rs4 = cmdrs4.Execute()
MsgBox rs4.GetString

aの内容は
a = "SELECT 管理NO FROM マスタ WHERE 管理NO Like ""*2*"";"

実行すると、ｒｓ4.GetString文で下記エラーが出ます。

「BOFとEOFのいづれかがTrueになっているか、または現在のレコードが削除されています。
要求された操作には、現在のレコードが必要です。」

aを "SELECT 管理NO FROM マスタ WHERE 管理NO = ""2-6"";"
なら問題ありません。

Likeの使い方が悪いのでしょうか？

よろしくお願いします。

回答No.1

yorozu_ya · ベストアンサー

""*2*"";"
↓
""%2%"";"

では、どうでしょう。

お礼

ありがとうございました。
感謝です！！！
出来ました。
何故％？って疑問も残りましたが・・・