#freeze
閲覧総計:&counter();  (本日:&counter(today);  昨日:&counter(yesterday);)

 検索でヒットした件数を表示する機能を追加してみました。  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)が空なら全件表示、検索キーワードが入力されていれば
検索。検索でヒットした件数を表示する。

【稼働画面】
#ref(SearchSelectCount.JPG);

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
- 1 -- [[1]] &new{2012-02-18 (土) 17:30:23};
- 1 -- [[1]] &new{2012-02-18 (土) 17:30:26};
- 1 -- [[-1']] &new{2012-02-18 (土) 17:30:27};
-- 1' -- [[1]] &new{2012-02-18 (土) 17:30:28};
- 1 -- [[1]] &new{2012-02-18 (土) 17:30:29};
- 1 -- [[1]] &new{2012-05-18 (金) 20:22:39};
- 1 -- [[1]] &new{2012-05-18 (金) 20:22:41};
- 1 -- [[-1']] &new{2012-05-18 (金) 20:22:42};
-- 1' -- [[1]] &new{2012-05-18 (金) 20:22:44};
- 1 -- [[1]] &new{2012-05-18 (金) 20:22:45};
- 1 -- [[1]] &new{2012-05-20 (日) 10:43:04};
- 1 -- [[1]] &new{2012-05-20 (日) 10:43:08};
- 1 -- [[-1']] &new{2012-05-20 (日) 10:43:10};
-- 1' -- [[1]] &new{2012-05-20 (日) 10:43:11};
- 1 -- [[1]] &new{2012-05-20 (日) 10:43:13};
- 参考になりました -- [[匿名]] &new{2012-05-20 (日) 11:59:59};
- 1 -- [[1]] &new{2013-10-11 (金) 06:59:01};
- 1 -- [[1]] &new{2013-10-11 (金) 06:59:08};
- 1 -- [[-1']] &new{2013-10-11 (金) 06:59:10};
-- 1' -- [[1]] &new{2013-10-11 (金) 06:59:12};
- 1 -- [[1]] &new{2013-10-11 (金) 06:59:13};
- 1 -- [[1]] &new{2013-12-07 (土) 15:26:51};
- 1 -- [[1]] &new{2013-12-07 (土) 15:26:58};
- 1 -- [[-1']] &new{2013-12-07 (土) 15:27:00};
-- 1' -- [[1]] &new{2013-12-07 (土) 15:27:02};
- 1 -- [[1]] &new{2013-12-07 (土) 15:27:04};
- 1 -- [[1]] &new{2015-06-28 (日) 05:50:49};
- 1 -- [[1]] &new{2015-06-28 (日) 05:50:51};
- 1 -- [[-1']] &new{2015-06-28 (日) 05:50:52};
-- 1' -- [[1]] &new{2015-06-28 (日) 05:50:52};
- 1 -- [[1]] &new{2015-06-28 (日) 05:50:53};
- 2015-10-6  xiaozhengm http://www.louisvuitton-lvoutlet.me  http://www.louisvuitton.net.co  http://www.michaelkors-outletonlines.in.net  http://www.ralph-lauren.me.uk  http://www.michael-korsoutlets.eu.com  http://www.true-religion-outlet.in.net  http://www.coach-factoryoutlet.in.net  http://www.christianlouboutinoff.us   http://www.coach-factoryoutlet.com.co  http://www.coachoutlet-storeonline.in.net  http://www.hermes-birkin.us  http://www.michael-korshandbags.net.co  http://www.louis-vuittonhandbags.us  http://www.Quality-Outlet.com  http://www.cheaplouisvuittonhandbags.org  http://www.officialcoachfactoryoutlet.eu.com  http://www.jordan8.net  http://www.hollisteruksale.me.uk  http://www.coachoutlet-storeonline.us.com  http://www.cheap-tomsoutlet.us  http://www.uggbootoutlet.in.net  http://www.coach-factory-outlet-online.us.com  http://www.louis-vuittonoutlet.us.com  http://www.ralphlauren-uk.me.uk  http://www.uggsoutlet.in.net  http://www.jordan4.net  http://www.michaelkors-outlet.name  http://www.authenticlouisvuittonhandbags.net  http://uggsaustralia.officialus.net  http://www.canadagoose-outlet.us.com  http://www.christianlouboutinsell.net  http://www.coach-factoryoutlet.cc  http://www.outlet-toms.cc  http://www.ugg-boots.eu  http://www.cheap--nfljerseys.us.com  http://www.rayban-sunglasses.com.co  http://www.coach-outlet.us.com  http://ugg.fairskinmen.com  http://www.louisvuittonhandbags.name  http://www.coachoutlet-coachfactory.us.com  http://www.mont-blancpens.name  http://www.michaelkorsoutletclearance.in.net  http://www.michaelkorsoutletonline.cc  http://www.michael-korshandbags.us  http://www.canadagoosejackets.org.uk  http://timberlandboots.hugeoff.net  http://www.guccioutlet.com.so  http://www.sunglass-outlet.us  http://www.coachfactoryoutletonline.eu.com  http://www.outlet-celine.com  http://www.coach-factoryoutlet.eu.com  http://www.louisvuittonoutlet.net.co  http://burberryoutlet.outoff.com.co  http://www.oakleysunglasses-sale.in.net  http://www.cheapuggssale.in.net  http://www.ugg-boots.eu.com  http://www.uggboots-sale.in.net  http://www.louisvuitton-handbags.com.co  http://www.ugg-boots.net.co  http://www.toryburch-outletsale.in.net  http://www.jordan3.net  http://www.louisvuittonoutlet.name  http://www.louisvuittonhandbags.net.co  http://www.cheap-jordans.us.com  http://www.truereligionjeans-outlet.in.net  http://www.kobeshoes.org  http://www.abercrombiefitchstore.com  http://www.fitflops.org  http://www.abercrombie-andfitch.cc  http://www.michaelkorsoutletshopping.us.com  http://www.lebronjames-shoes.name  http://www.michaelkors-outlet.com.co  http://www.michaelkorshandbag.org.uk  http://www.coachfactoryoutletus.in.net  http://www.canadagoose.com.co  http://www.michaelkorshandbags.name  http://www.michaelkorsoutletonline.name  http://www.abercrombiefitchus.com  http://www.louisvuitton-outletstores.org  http://www.louisvuitton-macys.com  http://www.louisvuittonuk.me.uk  http://www.toms--shoes.com  http://www.hollisters.cc  http://www.louis-vuitton-handbags.us.com  http://www.louis--vuitton.us  http://www.michaelkors-uk.me.uk  http://www.michaelkors-outlet.cc  http://www.abercrombies.cc  http://www.nike-airmax.org.uk  http://michaelkors.aphidsymposium.org  http://www.coach-factoryoutlet.us.com  http://www.michaelkorsoutletvip.in.net  http://www.michael-korshandbag.us.com  http://www.ralplaurenuk.me.uk  http://www.louisvuitton.us.com   http://www.michaelkorsbag.org.uk  http://www.michael-kors-bags.co.uk  http://www.louis-vuitton.us.org  http://www.abercrombieandfitch.net.co  http://www.michaelkorsoutlet-online.eu.com  http://www.michael--korsoutlet.us.com  http://www.michaelkorshandbag-uk.co.uk  http://www.jordan13.org  http://www.rayban-sunglassesuk.co.uk  http://www.hollisteruk.in.net  http://www.michaelkors-outletonline.eu.com  http://www.louisvuitton-inc.com  http://www.louisvuitton-outlet.name  http://www.jordan6.net  http://uggboots.uggaustralia.de.com  http://www.niketrainers.com.co  http://www.jordans.in.net  -- [[xiaozhengm]] &new{2015-10-06 (火) 19:37:33};

#comment_nospam
- 1 -- [[1]] &new{2015-06-28 (日) 05:50:51};
- 1 -- [[1]] &new{2013-12-07 (土) 15:26:54};
- 1 -- [[1]] &new{2013-10-11 (金) 06:59:07};
- 1 -- [[1]] &new{2012-05-20 (日) 10:43:07};
- 1 -- [[1]] &new{2012-05-18 (金) 20:22:40};
- 1 -- [[1]] &new{2012-02-18 (土) 17:30:25};
#vote(参考になった[4],ふつう[0],参考にならなかった[0])


トップ   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS