#freeze 閲覧総計:&counter(); (本日:&counter(today); 昨日:&counter(yesterday);) GoogleやYahooの検索サービスでは、スペースで区切った単語のAND検索(絞込み検索) を行い、目的の情報を絞り込んで行く方法が一般的である。 今回、ASP.NETでのスペース区切り単語のAND検索を行う方法を確認した。 (検索対象を多列に対応する方法) 09/10/11 開発環境:VWD2005 + Access2003 サーバ:ASP.NET2.0 + Access2003 【機能】スペースで区切った単語のAND検索を行い、結果をGridViewに表示する。 検索キーワード(TextBox)が空なら全件を表示する。検索対象を複数列(namae, syussin) とした。 【稼働画面】 #ref(SpaceAnd02.JPG); Accessデータベース名:MeiboDB.mdb テーブル名:MeiboTable2 |~フィールド名|~データ型|~フィールドサイズ| |ID (主キー)|オートナンバー型|長整数型| |namae|テキスト型|50| |syussin|テキスト型|50| ※VWD2005、ASP.NET2.0環境ではAccess2007のDBファイル形式(*.accdb)は利用できな い模様。DBファイルは「Acces2002-2003形式(*.mdb)」で保存して利用する。 「キーワード検索」機能稼働ページの全コード 【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) 'スペースで区切られた単語の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.SelectParameters.Add("KeyWord" & i, "%" & SplitKeyWords(i) & "%") AccessDataSource1.SelectCommand &= wa & "(namae LIKE @KeyWord" & i & " OR syussin LIKE @KeyWord" & i & ")" wa = " AND " Next End Sub </script> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server"> <title>スペース区切り単語のAND検索(検索対象:多列)</title> </head> <body> <form id="form1" runat="server"> <div> スペース区切り単語のAND検索(検索対象:多列) 09/10/11<br /> <br /> 検索キーワード:<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox> <asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="検索" /><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="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\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="namae" Type="String" /> <asp:Parameter Name="syussin" Type="String" /> </InsertParameters> <UpdateParameters> <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> 【参考にしたページ】 なし #comment_nospam #vote(参考になった[4],ふつう[0],参考にならなかった[0])