閲覧総計:7069 (本日:1 昨日:33)
検索でヒットした件数を表示する機能を追加してみました。 09/10/04
【方法】AccessDataSource1 の Selectedイベントで
AffectedRows でデータの行数を得る。
↓参考にしたページ:「GridView 件数」
http://d.hatena.ne.jp/pink-woof/20080221
↓参考にしたページ:「SqlDataSourceに条件検索を追加」
http://www.cocoaliz.com/asp.net/index/22/
→「検索(LINQtoXML)(3.5)」(09/9/6)と同一機能を実装し、比較可能とした。
開発環境:VWD2005 + Access2003
サーバ:ASP.NET2.0 + Access2003
【機能】検索キーワードを含む情報のみ抽出し、結果をGridViewに表示する。
検索キーワード(TextBox)が空なら全件表示、検索キーワードが入力されていれば
検索。検索でヒットした件数を表示する。
【稼働画面】
Accessデータベース名:udon.mdb
テーブル名:udons_sampleData
フィールド名 | データ型 | フィールドサイズ |
---|---|---|
ID (主キー) | オートナンバー型 | 長整数型 |
品名 | テキスト型 | 100 |
セット内容 | テキスト型 | 255 |
価格 | 数値型 | 整数型 |
※VWD2005、ASP.NET2.0環境ではAccess2007のDBファイル形式(*.accdb)は利用できな
い模様。DBファイルは「Acces2002-2003形式(*.mdb)」で保存して利用する。
「キーワード検索」機能稼働ページの全コード
【SearchSelectCount02.aspx】
<%@ Page Language="VB" Trace="false" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <script runat="server"> Dim intCount As Integer 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 End Sub Protected Sub AccessDataSource1_Selected(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.SqlDataSourceStatusEventArgs) Handles AccessDataSource1.Selected intCount = e.AffectedRows 'データの行数を取得 End Sub Protected Sub GridView1_DataBound(ByVal sender As Object, ByVal e As System.EventArgs) Label1.Text = String.Format("{0} 件がヒットしました", intCount) End Sub </script> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server"> <title>無題のページ</title> </head> <body> <form id="form1" runat="server"> <div> 検索結果件数の表示確認(Access) 09/10/04<br /> 「検索キーワード」が「セット内容」に含まれるメニュを表示<br /> <br /> 検索キーワード:<asp:TextBox ID="TextBox1" runat="server" Width="180px"></asp:TextBox> <asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="検索" /><br /> <br /> <asp:Label ID="Label1" runat="server" Text="Label"></asp:Label><br /> <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataKeyNames="ID" DataSourceID="AccessDataSource1" EmptyDataText="表示するデータ レコードがありません。" BackColor="White" BorderColor="#DEDFDE" BorderStyle="None" BorderWidth="1px" CellPadding="4" ForeColor="Black" GridLines="Vertical" OnDataBound="GridView1_DataBound"> <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="価格" /> </Columns> <RowStyle BackColor="#F7F7DE" /> <FooterStyle BackColor="#CCCC99" /> <PagerStyle BackColor="#F7F7DE" ForeColor="Black" HorizontalAlign="Right" /> <SelectedRowStyle BackColor="#CE5D5A" Font-Bold="True" ForeColor="White" /> <HeaderStyle BackColor="#6B696B" Font-Bold="True" ForeColor="White" /> <AlternatingRowStyle BackColor="White" /> </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` = ?" OnSelected="AccessDataSource1_Selected"> <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" /> </InsertParameters> <UpdateParameters> <asp:Parameter Name="品名" Type="String" /> <asp:Parameter Name="セット内容" Type="String" /> <asp:Parameter Name="価格" Type="Int16" /> <asp:Parameter Name="ID" Type="Int32" /> </UpdateParameters> </asp:AccessDataSource> </div> </form> </body> </html>
【参考にしたページ】
「GridView 件数」 08/02/21
http://d.hatena.ne.jp/pink-woof/20080221