| 投稿日 | ： 2006/06/30(Fri) 13:48 |
| 投稿者 | ： uc0079 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: 条件が合わなければクリアーにするには |
> strSQL = "SELECT 客TBL.客ID, 客TBL.客かな, 取引TBL.種類, 取引TBL.番号 FROM 客TBL
_
> & INNER JOIN取引TBL ON 客TBL.客ID = 取引TBL.客ID "
>
> If txtx.Text <> "" Then
> strSQL = strSQL & " where 客TBL.客ID = " & txtx.Text
>
> End If
>
> If txtn.Text <> "" Then
> strSQL = strSQL & " where 客TBL.客かな like '*" & txtn.Tex
t & "*'"
>
> End If
>
> If txtm.Text <> "" Then
> strSQL = strSQL & " where 取引TBL.番号 like '*" & txtm.Tex
t & "*'"
>
> End If
このままだと、条件を記入した分だけWhere句ができてしまいますよね？
二つ以上条件を記入させなくするか、二つ目以降の条件の場合は
"where" ではなく"and" で始まるようにする工夫が必要です。