Hi
I am trying to display the orders related to a certain customer, at the moment i am displaying all orders for every customer?
regards
D
| <%@ Page Language="VB" AutoEventWireup="false" CodeFile="nestedviewtemplate.aspx.vb" |
| Inherits="_Default" %> |
| <%@ Register TagPrefix="telerik" Namespace="Telerik.QuickStart" %> |
| <%@ Register TagPrefix="telerik" Namespace="Telerik.Web.UI" Assembly="Telerik.Web.UI" %> |
| <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd"> |
| </head> |
| <body class="BODY"> |
| <form runat="server" id="mainForm" method="post"> |
| <telerik:RadScriptManager runat="server" ID="ScriptManager1"> |
| </telerik:RadScriptManager> |
| <!-- content start --> |
| <telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" runat="server" /> |
| <telerik:RadGrid ID="RadGrid1" runat="server" AutoGenerateColumns="true" |
| AllowSorting="True" AllowMultiRowSelection="False" AllowPaging="True" PageSize="5" |
| GridLines="None" ShowGroupPanel="true"> |
| <PagerStyle Mode="NumericPages"></PagerStyle> |
| <MasterTableView DataKeyNames="customerid" AllowMultiColumnSorting="True"> |
| <NestedViewTemplate> |
| <telerik:RadGrid runat="server" ID="nestedgrid" OnNeedDataSource="onneeddatasource_nestedgrid" |
| ShowFooter="true" AllowSorting="true" EnableLinqExpressions="false" OnItemCreated="nested_Created" |
| OnItemCommand="Onitemcommand_nestedgrid_jahoor"> |
| <MasterTableView ShowHeader="true" AutoGenerateColumns="true" AllowPaging="true" |
| PageSize="7"> |
| <Columns> |
| <telerik:GridEditCommandColumn> |
| </telerik:GridEditCommandColumn> |
| </Columns> |
| <EditFormSettings EditFormType="Template"> |
| <FormTemplate> |
| <asp:ImageButton ID="imgb" runat="server" CommandName="go" /> |
| <asp:Button ID="btn1" runat="server" CommandName="buttonclicked" /> |
| <asp:DropDownList ID="ddl1" runat="server"> |
| </asp:DropDownList> |
| </FormTemplate> |
| </EditFormSettings> |
| </MasterTableView> |
| </telerik:RadGrid> |
| </NestedViewTemplate> |
| <NestedViewSettings > |
| <ParentTableRelation> |
| <telerik:GridRelationFields DetailKeyField="CustomerID" MasterKeyField="CustomerID" /> |
| </ParentTableRelation> |
| </NestedViewSettings> |
| <Columns> |
| </Columns> |
| </MasterTableView> |
| <ClientSettings AllowDragToGroup="true" /> |
| </telerik:RadGrid> |
| <!-- content end --> |
| </form> |
| </body> |
| Imports Telerik.Web.UI |
| Imports System |
| Imports System.Data |
| Imports System.Data.SqlClient |
| Imports System.Web.UI.WebControls |
| Imports System.Configuration |
| Partial Class _Default |
| Inherits System.Web.UI.Page |
| Dim ConnString As String = ConfigurationManager.ConnectionStrings("NorthwindConnectionString").ConnectionString |
| Protected Sub nestedgrid_ItemCreated(ByVal sender As Object, ByVal e As GridItemEventArgs) |
| Dim btn As Button |
| Dim ddl As DropDownList |
| If e.Item.ItemType = GridItemType.EditFormItem And e.Item.IsInEditMode Then |
| Dim edititem As GridEditFormItem = CType(e.Item, GridEditFormItem) |
| ddl = CType(edititem.FindControl("ddl1"), DropDownList) |
| btn = CType(edititem.FindControl("btngo"), Button) |
| ddl.DataSource = dsddl() |
| ddl.DataTextField = "ShipName" |
| ddl.DataValueField = "OrderID" |
| ddl.DataBind() |
| End If |
| End Sub |
| Public Function myds() As DataSet |
| Dim conn As SqlConnection = New SqlConnection(ConnString) |
| Dim adapter As SqlDataAdapter = New SqlDataAdapter |
| adapter.SelectCommand = New SqlCommand("SELECT TOP 10 OrderID, ShipName, ShipAddress FROM Orders", conn) |
| Dim myDataSet As DataSet = New DataSet |
| conn.Open() |
| Try |
| adapter.Fill(myDataSet, "Orders") |
| adapter.SelectCommand = New SqlCommand("SELECT OrderID, Quantity FROM [Order Details]", conn) |
| adapter.Fill(myDataSet, "OrderDetails") |
| Finally |
| conn.Close() |
| End Try |
| Return myDataSet |
| End Function |
| Public Function dsddl() As DataSet |
| Dim conn As SqlConnection = New SqlConnection(ConnString) |
| Dim adapter As SqlDataAdapter = New SqlDataAdapter |
| Dim myDataSet As DataSet = New DataSet |
| conn.Open() |
| Try |
| adapter.SelectCommand = New SqlCommand("SELECT TOP 10 OrderID, ShipName FROM Orders", conn) |
| adapter.Fill(myDataSet, "OrderDetails") |
| Finally |
| conn.Close() |
| End Try |
| Return myDataSet |
| End Function |
| Protected Sub nestedgrid_ItemCommand(ByVal source As Object, ByVal e As GridCommandEventArgs) |
| If e.CommandName = "Go" Then |
| Dim item As GridDataItem = DirectCast(e.Item, GridDataItem) |
| Dim editItem As GridEditFormItem = DirectCast(item.EditFormItem, GridEditFormItem) |
| Dim doptdown As DropDownList = DirectCast(editItem.FindControl("ddl1"), DropDownList) |
| Dim value As String = doptdown.SelectedItem.Text |
| Response.Write(value) |
| End If |
| End Sub |
| Public Function GetDataTable(ByVal query As String) As DataTable |
| Dim ConnString As String = ConfigurationManager.ConnectionStrings("NorthwindConnectionString").ConnectionString |
| Dim conn As SqlConnection = New SqlConnection(ConnString) |
| Dim adapter As SqlDataAdapter = New SqlDataAdapter |
| adapter.SelectCommand = New SqlCommand(query, conn) |
| Dim table1 As New DataTable |
| conn.Open() |
| Try |
| adapter.Fill(table1) |
| Finally |
| conn.Close() |
| End Try |
| Return table1 |
| End Function |
| Public Sub onneeddatasource_nestedgrid(ByVal source As Object, ByVal e As GridNeedDataSourceEventArgs) |
| Dim grid As RadGrid = DirectCast(source, RadGrid) |
| ' Populate the grid |
| grid.DataSource = GetDataTable("SELECT * FROM orders") |
| End Sub |
| Protected Sub Onitemcommand_nestedgrid_jahoor(ByVal source As Object, ByVal e As GridCommandEventArgs) |
| ' Throw New NotImplementedException() |
| Dim item As GridDataItem |
| If e.CommandName = "go" Then |
| If e.Item.ItemType = GridItemType.Item Then |
| item = CType(e.Item, GridDataItem) |
| Dim ddl As DropDownList = CType(item.EditFormItem.FindControl("ddl1"), DropDownList) |
| 'ddlEventStatus = CType(itemEdit.FindControl("ddlEventStatus"), DropDownList) |
| Response.Write(ddl.SelectedItem.Text) |
| End If |
| End If |
| End Sub |
| Protected Sub nested_Created(ByVal sender As Object, ByVal e As GridItemEventArgs) |
| Dim ddl As DropDownList |
| If e.Item.ItemType = GridItemType.EditFormItem And e.Item.IsInEditMode Then |
| Dim edititem As GridEditFormItem = CType(e.Item, GridEditFormItem) |
| ddl = CType(edititem.FindControl("ddl1"), DropDownList) |
| ddl.DataSource = dsddl() |
| ddl.DataTextField = "ShipName" |
| ddl.DataValueField = "OrderID" |
| ddl.DataBind() |
| End If |
| End Sub |
| Protected Sub RadGrid1_NeedDataSource(ByVal source As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles RadGrid1.NeedDataSource |
| RadGrid1.DataSource = GetDataTable("Select * from customers") |
| End Sub |
| End Class |