Dim view As New Infragistics.Web.UI.DataSourceControls.DataView()
' 親のビューを追加します。
view.DataSourceID = Me.SqlDataSource1.ID
view.ID = "Parent_DataSource_View1"
Me.WebHierarchicalDataSource1.DataViews.Add(view)
' 子のビュー 1 を追加します。
view = New Infragistics.Web.UI.DataSourceControls.DataView()
view.DataSourceID = Me.SqlDataSource2.ID
view.ID = "Child_DataSource_View1"
Me.WebHierarchicalDataSource1.DataViews.Add(view)
' 子のビュー 2 を追加します。
view = New Infragistics.Web.UI.DataSourceControls.DataView()
view.DataSourceID = Me.SqlDataSource3.ID
view.ID = "Child_DataSource_View2"
Me.WebHierarchicalDataSource1.DataViews.Add(view)
' 最初の子の関係を親に追加します。
Dim dr As New Infragistics.Web.UI.DataSourceControls.DataRelation()
dr.ParentDataViewID = "Parent_DataSource_View1"
dr.ParentColumns = New String() {"RegionID"}
dr.ChildDataViewID = "Child_DataSource_View1"
dr.ChildColumns = New String() {"RegionID"}
Me.WebHierarchicalDataSource1.DataRelations.Add(dr)
' 二番目の子の関係を親に追加します。
dr = New Infragistics.Web.UI.DataSourceControls.DataRelation()
dr.ParentDataViewID = "Parent_DataSource_View1"
dr.ParentColumns = New String() {"RegionID"}
dr.ChildDataViewID = "Child_DataSource_View2"
dr.ChildColumns = New String() {"RegionID"}
Me.WebHierarchicalDataSource1.DataRelations.Add(dr)