- 締切済み
Microsoft Visual Web Developerからのデーター検索方法
お世話になります 今、社内の管理簿を作成しているのですが 発注番号があってテキストボックスに入力し検索ボタンを押すと以下に検索結果を出す手順をが どうしてもわかりません。 参考書等も購入したのですがまったくヒントになにません。 あと良かったらこんな参考書あるよ とかあればすごく助かります だれかわかるかたよろしくお願い申し上げます professional 2005 Express Edition アクセスDB 超初心者です
- BSR123
- お礼率29% (71/241)
- Microsoft ASP
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- naganaga_001
- ベストアンサー率71% (172/242)
お世話になります。 参考書等はよくわかりませんが、 まず、下のソースで何をやろうとしているのか 理解してみてください。 解らないことがあったら、F1 キーを押してみて 調べたり、参考書を読んで調べたりして 理解に努めてみてください。 概ね理解できたら、お望みのアプリケーションを 作成するにはどの辺りを変えればよいのか 解ると思います。 ■aspx <%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default3.aspx.vb" Inherits="Default3" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server"> <title>無題のページ</title> </head> <body> <form id="form1" runat="server"> <div> <asp:GridView ID="GridView1" runat="server"> </asp:GridView> <asp:TextBox ID="TextBox1" runat="server"></asp:TextBox> <asp:Button ID="Button1" runat="server" Text="Button" /></div> </form> </body> </html> ■aspx.vb Partial Class Default3 Inherits System.Web.UI.Page Private m_myDataset As System.Data.DataSet Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not IsPostBack Then Me.m_myDataset = New System.Data.DataSet("test_dataset") With Me.m_myDataset .Tables.Add(New System.Data.DataTable("test_table")) .Tables("test_table").Columns.Add(New Data.DataColumn("ID", GetType(Integer))) .Tables("test_table").Columns.Add(New Data.DataColumn("NAME", GetType(String))) .Tables("test_table").Rows.Add(New Object() {1, "りんご"}) .Tables("test_table").Rows.Add(New Object() {2, "みかん"}) .Tables("test_table").Rows.Add(New Object() {3, "ばなな"}) End With Session("test") = Me.m_myDataset Me.GridView1.DataSource = Me.m_myDataset.Tables("test_table").DefaultView Me.GridView1.DataBind() Else Me.m_myDataset = DirectCast(Session("test"), Data.DataSet) End If End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Me.GridView1.DataSource = New Data.DataView(Me.m_myDataset.Tables("test_table"), _ "[NAME]='" & Me.TextBox1.Text & "'", _ "ID", _ Data.DataViewRowState.CurrentRows) Me.GridView1.DataBind() End Sub End Class
