ASP.NET Listコントロールのホームへ戻る

DataSetをバインドするには

 

  DropDownListDataSetをバインドするサンプル

 

DropDownListDataSetをバインドするサンプル

 

このサンプルは、DropDownListDataSet(DataTable)をバインドしてアイテムを表示しています。DropDownListからアイテムを選択すると、選択したアイテムが表示されます。

 

このサンプルでは、以下のノウハウを習得することができます。

 

  DataSetDataTableを格納する方法

  DropDownListDataSet(DataTable)をバインドする方法

  DropDownListItemsコレクションのInsert()メソッドの使い方

 

このサンプルは、OleDbConnection, OleDbDataAdapterクラスを使用してAccess/SQL ServertblVsDotNetテーブルを読み込んでDataSetに格納します。行22では、tblVsDotNetテーブルからレコードを抽出するSQLを作成しています。行23では、Web.configに登録されているデータベースの接続情報を取得しています。Web.configとデータベースの接続情報については、第3章で詳しく解説します。行24では、OleDbConnectionのインスタンスを生成しています。OleDbConnectionの引数には、データベースの接続情報を指定しています。行25では、OleDbDataAdapterのインスタンスを生成しています。OleDbDataAdapterの引数には、SQLコマンドとOleDbConnectionを指定します。行26では、DataSetのインスタンスを生成しています。ここで生成したDataSetは、OleDbDataAdapterFill()メソッドで使用します。

 

28では、OleDbDataAdapterFill()メソッドでSQLSelectステートメントを実行してtblVsDotNetテーブルのレコードを抽出してDataSetに格納します。Fill()メソッドの引数には、DataSetDataTableの名前を指定します。

 

29-35With…End Withでは、DropDownListの各種プロパティを設定してDataSetをバインドしています。行30では、DropDownListDataSourceプロパティにDataSetを設定しています。DataSetに複数のDataTableが格納されているときは、DataMemberプロパティにDataTableの名前を設定する必要があります。行31-32では、DropDownListDataValueFieldDataTextFieldプロパティにDataTable(VsDotNet)の対応するカラム名を設定しています。DataTableShortNameのカラムには、言語の省略名(VB.NET)が格納されています。LongNameのカラムには、言語のフル名称(Visual Basic .NET)が格納されています。行33では、DropDownListDataBind()メソッドでDataSet(DataTable)をバインドしています。行34では、DropDownListItemsコレクションのInsert()メソッドでヘルプ情報のアイテムを挿入しています。Insert()メソッドの引数には、アイテムの挿入場所とListItemを指定します。挿入場所に0を指定すると先頭アイテムとして挿入されます。

 

21: Sub BindData()
 22:   Dim strSQL as String = "Select * From tblVsDotNet"
 23:   Dim strCon as String = ConfigurationSettings.AppSettings("conStringNw")
 24:   Dim con As OleDbConnection = New OleDbConnection(strCon)
 25:   Dim da As OleDbDataAdapter = New OleDbDataAdapter(strSQL, con)
 26:   Dim ds As DataSet = New DataSet()
 28:   da.Fill(ds, "VsDotNet")
 29:   With dropVsNet
 30:     .DataSource = ds
 31:     .DataValueField = "ShortName"
 32:     .DataTextField = "LongName"
 33:     .DataBind()
 34:     .Items.Insert(0, New ListItem("---
言語選択 ---","") )
 35:   End With
 36: End Sub

 

 

ASP.NET Listコントロールのホームへ戻る