複数の項目の参照テキストボックス

Question

テーブル内の列に基づいて結果をフィルタリングし、クエリに基づいて結果を表示するアクセス2010検索ボックスを作成しました。

私が達成しようとしているのは、一度に1つのアイテムだけを検索ボックスに入れるのではなく、複数のアイテムを置くことです。 これは私が管理しているルータの全面的なものです。毎日、ステータスチェックが必要なルータのリストを取得しています。今は何をしているのですか。検索ボックスに各ルータ名をコピーして貼り付けています。 、場所と回路のrefしかし私は何をコピーし、1つのルータ名のすべてを貼り付けて、各ルータのための独立した結果を得るためにしたいと思います。

これは私がテキストボックスにフィルタに適用されているコードです：

Where Condition = [Circuit Reference] Like "*" & [Forms]![Query1]! [Text12] & "*" 

私はより多くのテキストボックスを追加し、それらにこのフィルタを適用するが、私はまだすべてのルータをコピー＆ペーストする必要があります可能性があり独立した名前。

私はアクセスの専門家ではありませんので、この質問に答えるのは簡単すぎますが、私の問題で私を助けるウェブ上のものを見つけることはできません。

Answer 1

同じフィールドで複数のワイルドカード検索が必要なようです。これは、SQLクエリでORを使用して行うことができます。

Dim strSearchConditions As String 
Dim strTerms() As String 
Dim strSQL As String 
Dim i as Integer 

strSearchConditions = "" 

strTerms = Split(Me.txtSearch,",") 'Assuming you separate your search terms with a comma 

For i = 0 To UBound(strTerms) 
    If Not strTerms(i) = "" Then 
     strSearchConditions = " OR [Circuit Reference] Like '*" & strTerms(i) & "*'" 
    End If 
Next i 

If Not strSearchConditions = "" Then 
    strSQL = "Select * FROM tblMyTable WHERE 1=1 AND (" & strSearchConditions & ")" 
Else 
    MsgBox "No search terms!" 
End If