or

| <telerik:RadGrid |
| ID="RadGrid1" runat="server" |
| Width="95%" |
| OnNeedDataSource="RadGrid1_NeedDataSource" |
| > |
| <MasterTableView AutoGenerateColumns="false"> |
| <Columns> |
| <telerik:GridBoundColumn DataField="id" Visible="false" ReadOnly="true"></telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="symbol" HeaderText="Symbol" ReadOnly="true" ></telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="buyprice" HeaderText="Buy Price" DataType="System.Decimal" DataFormatString="{0:C}" ></telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="totalcost" HeaderText="Total Cost" DataType="System.Decimal" DataFormatString="{0:C}" ></telerik:GridBoundColumn> |
| <telerik:GridButtonColumn ConfirmText="Are you sure?" ConfirmDialogType="Classic" ButtonType="ImageButton" ImageUrl="/images/delete.gif"CommandName="Delete"> |
| </telerik:GridButtonColumn> |
| </Columns> |
| </MasterTableView> |
| </telerik:RadGrid> |
| protected void RadGrid1_NeedDataSource(object source, GridNeedDataSourceEventArgs e) |
| { |
| string XMLFilePath = getXMLPath(); |
| DataSet ds = new DataSet(); |
| ds.ReadXml(XMLFilePath); |
| DataView dv = new DataView(ds.Tables[0]); |
| dv.Sort = "datecalculated DESC"; |
| RadGrid1.DataSource = dv; |
| } |
| <?xml version="1.0" encoding="utf-8"?> |
| <calculations> |
| <calculation id="1" symbol="SYM1" buyprice="3.4" totalcost="831.483" datecalculated="06/30/2010" /> |
| <calculation id="2" symbol="SYM2" buyprice="10.74" totalcost="1088" datecalculated="06/17/2010" /> |
| </calculations> |
Do While RS.Read If RS(0) = 1 Then Dim Node As New RadTreeNode Node.Text = (RS(2) & " " & RS(3) & " (" & RS(1) & ")") Node.Value = RS(1) Node.Checkable = True RadTreeView1.Nodes.Add(Node) Else Dim foundNode As RadTreeNode = RadTreeView1.FindNodeByValue(RS(5)) If foundNode IsNot Nothing Then Dim Node As New RadTreeNode Node.Text = (RS(2) & " " & RS(3) & " (" & RS(1) & ")") Node.Value = RS(1) Node.Checkable = False foundNode.Nodes.Add(Node) End If End IfImports Telerik.Web.UIPartial Class Hierarchy_Compression Inherits System.Web.UI.Page Protected Sub Button1_Click(sender As Object, e As System.EventArgs) Handles Button1.Click Dim Compression As IList(Of RadTreeNode) = RadTreeView1.CheckedNodes For Each node As RadTreeNode In Compression If node.Checked = True Then Response.Write(node.Value) End If Next End SubEnd Class