- 追加された行はこの色です。
- 削除された行はこの色です。
閲覧総計:&counter(); (本日:&counter(today); 昨日:&counter(yesterday);)
GoogleやYahooの検索サービスでは、スペースで区切った単語のAND検索(絞込み検索)を
行い、目的の情報を絞り込んで行く方法が一般的である。
今回、スペース区切り単語のAND検索を行う方法を確認した。
GoogleやYahooの検索サービスでは、スペースで区切った単語のAND検索(絞込み検索)
を行い、目的の情報を絞り込んで行く方法が一般的である。
今回、ASP.NETでのスペース区切り単語のAND検索を行う方法を確認した。
(検索対象を多列に対応する方法) 09/10/11
開発環境:VWD2005 + Access2003
サーバ:ASP.NET2.0 + Access2003
【機能】スペースで区切った単語のAND検索を行い、結果をGridViewに表示する。
検索キーワード(TextBox)が空なら全件を表示する。検索対象を複数列(namae, syussin)
とした。
【稼働画面】
#ref(SearchGridView.JPG);
#ref(SpaceAnd02.JPG);
Accessデータベース名:udon.mdb
テーブル名:udons_sampleData
Accessデータベース名:MeiboDB.mdb
テーブル名:MeiboTable2
|~フィールド名|~データ型|~フィールドサイズ|
|ID (主キー)|オートナンバー型|長整数型|
|品名|テキスト型|100|
|セット内容|テキスト型|255|
|価格|数値型|整数型|
|namae|テキスト型|50|
|syussin|テキスト型|50|
※VWD2005、ASP.NET2.0環境ではAccess2007のDBファイル形式(*.accdb)は利用できな
い模様。DBファイルは「Acces2002-2003形式(*.mdb)」で保存して利用する。
「キーワード検索」機能稼働ページの全コード
【SearchGridView.aspx】
【SpaceAnd02.aspx】
<%@ Page Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
If (TextBox1.Text <> "") Then
'TextBoxが空でないならば、条件検索を行う。
'Selectパラメータをクリア
AccessDataSource1.SelectParameters.Clear()
'Selectパラメータをセット(変数KeyWordの頭に@は必要ないです。)
AccessDataSource1.SelectParameters.Add("KeyWord", "%" & TextBox1.Text & "%")
'SelectCommandをセットし、実行
AccessDataSource1.SelectCommand = "SELECT `ID`, `品名`, `セット内容`, `価格` FROM `udons_sampleData` WHERE (セット内容 LIKE @KeyWord)"
Else
'TextBoxが空ならば、全件表示
'Selectパラメータをクリア
AccessDataSource1.SelectParameters.Clear()
'SelectCommandをセットし、実行
AccessDataSource1.SelectCommand = "SELECT `ID`, `品名`, `セット内容`, `価格` FROM `udons_sampleData`"
End If
'スペースで区切られた単語のand検索を行う
'TextBoxが空の場合は全件を表示
AccessDataSource1.SelectParameters.Clear() 'パラメータをクリア
AccessDataSource1.SelectCommand = "SELECT [ID], [namae], [syussin] FROM [MeiboTable2]"
Dim wa As String = " WHERE "
Dim SplitKeyWords As String() = Me.TextBox1.Text.Split(" ".ToCharArray(), StringSplitOptions.RemoveEmptyEntries) ' 全角と半角のスペース
For i As Integer = 0 To SplitKeyWords.Length - 1
AccessDataSource1.SelectCommand &= wa & "(namae LIKE @KeyWord" & i & " OR syussin LIKE @KeyWord" & i & ")"
AccessDataSource1.SelectParameters.Add("KeyWord" & i, "%" & SplitKeyWords(i) & "%")
wa = " AND "
Next
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>無題のページ</title>
<title>スペース区切り単語のAND検索(検索対象:多列)</title>
</head>
<body>
<form id="form1" runat="server">
<div>
キーワード検索の稼働確認(Access) 09/09/20<br />
「検索キーワード」が「セット内容」に含まれるメニュを表示<br />
スペース区切り単語のAND検索(検索対象:多列) 09/10/11<br />
<br />
検索キーワード:<asp:TextBox ID="TextBox1" runat="server" Width="180px"></asp:TextBox>
検索キーワード:<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
<asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="検索" /><br />
<br />
<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataKeyNames="ID"
DataSourceID="AccessDataSource1" EmptyDataText="表示するデータ レコードがありません。">
<Columns>
<asp:BoundField DataField="ID" HeaderText="ID" ReadOnly="True" SortExpression="ID" />
<asp:BoundField DataField="品名" HeaderText="品名" SortExpression="品名" />
<asp:BoundField DataField="セット内容" HeaderText="セット内容" SortExpression="セット内容" />
<asp:BoundField DataField="価格" HeaderText="価格" SortExpression="価格" />
<asp:BoundField DataField="namae" HeaderText="namae" SortExpression="namae" />
<asp:BoundField DataField="syussin" HeaderText="syussin" SortExpression="syussin" />
</Columns>
</asp:GridView>
<asp:AccessDataSource ID="AccessDataSource1" runat="server" DataFile="App_Data\udon.mdb"
DeleteCommand="DELETE FROM `udons_sampleData` WHERE `ID` = ?"
InsertCommand="INSERT INTO `udons_sampleData` (`ID`, `品名`, `セット内容`, `価格`) VALUES (?, ?, ?, ?)"
SelectCommand="SELECT `ID`, `品名`, `セット内容`, `価格` FROM `udons_sampleData`"
UpdateCommand="UPDATE `udons_sampleData` SET `品名` = ?, `セット内容` = ?, `価格` = ? WHERE `ID` = ?">
<asp:AccessDataSource ID="AccessDataSource1" runat="server" DataFile="App_Data\MeiboDB.mdb"
DeleteCommand="DELETE FROM `MeiboTable2` WHERE `ID` = ?"
InsertCommand="INSERT INTO `MeiboTable2` (`ID`, `namae`, `syussin`) VALUES (?, ?, ?)"
SelectCommand="SELECT `ID`, `namae`, `syussin` FROM `MeiboTable2`"
UpdateCommand="UPDATE `MeiboTable2` SET `namae` = ?, `syussin` = ? WHERE `ID` = ?">
<DeleteParameters>
<asp:Parameter Name="ID" Type="Int32" />
</DeleteParameters>
<InsertParameters>
<asp:Parameter Name="ID" Type="Int32" />
<asp:Parameter Name="品名" Type="String" />
<asp:Parameter Name="セット内容" Type="String" />
<asp:Parameter Name="価格" Type="Int16" />
<asp:Parameter Name="namae" Type="String" />
<asp:Parameter Name="syussin" Type="String" />
</InsertParameters>
<UpdateParameters>
<asp:Parameter Name="品名" Type="String" />
<asp:Parameter Name="セット内容" Type="String" />
<asp:Parameter Name="価格" Type="Int16" />
<asp:Parameter Name="namae" Type="String" />
<asp:Parameter Name="syussin" Type="String" />
<asp:Parameter Name="ID" Type="Int32" />
</UpdateParameters>
</asp:AccessDataSource>
<br />
</div>
</form>
</body>
</html>
【参考にしたページ】
1.SqlDataSourceに条件検索を追加
http://www.cocoaliz.com/asp.net/index/22/
なし
#comment_nospam
#vote(参考になった[0],ふつう[0],参考にならなかった[0])