Telerik Forums
UI for ASP.NET AJAX Forum
or
Ask question
All Questions
Unanswered
Answered
110,735 questions
3 answers
503 views
change RadWindow background color programmably
Can anyone tell me how to change RadWindow background and frame color programmably without using skin customization?
Window
Princy
Top achievements
Rank 2
 answered on 12 Dec 2012
1 answer
82 views
Radgrid problem
Hi

I have a radgrid using editmode popup. 
when no record in grid(data source is empty) and click Inset new records ,the grid is not visible, only a single line
even I  use OnNeedDatasourse event and write the code to fill grid from SQL inside the event But not work!
Please help me
<telerik:RadGrid ID="RadGrid3"   runat="server"   AutoGenerateEditColumn="True" ShowFooter="true"
            GridLines="None" AllowAutomaticUpdates="True" AllowAutomaticDeletes="True"
        AllowAutomaticInserts="True"    OnItemDeleted="RadGrid2_ItemDeleted"
        OnItemInserted="RadGrid2_ItemInserted" 
        OnItemUpdated="RadGrid2_ItemUpdated" AutoGenerateDeleteColumn="True" 
        Skin="Office2007" 
        AllowSorting="True" AutoGenerateColumns="False"
        ShowStatusBar="True" onitemcommand="RadGrid3_ItemCommand" 
        
        oninsertcommand="RadGrid3_InsertCommand" 
        onitemdatabound="RadGrid3_ItemDataBound" 
        onselectedindexchanged="RadGrid3_SelectedIndexChanged" 
        ondatabound="RadGrid3_DataBound" onupdatecommand="RadGrid3_UpdateCommand" onneeddatasource="RadGrid3_NeedDataSource" 
            DataSourceID="SqlDataSource3" Enabled="False" 
               öndatabinding="RadGrid3_DataBinding">
        <ClientSettings EnablePostBackOnRowClick="True">
                 
            <Selecting AllowRowSelect="True" />
             <ClientEvents  önRowDblClick="RowDblClick"></ClientEvents>
        </ClientSettings>
        <MasterTableView  CommandItemDisplay="Top"  EditMode="PopUp"  
            DataKeyNames="WorkID" DataSourceID="SqlDataSource3" >
            <CommandItemSettings AddNewRecordText="Insert" RefreshText="Refresh"   />
            <Columns>
                <telerik:GridBoundColumn DataField="MachinaryMainCode" 
                    HeaderText="MachinaryMainCode" SortExpression="MachinaryMainCode" 
                    UniqueName="MachinaryMainCode" Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="UserDate" DataType="System.DateTime" 
                    HeaderText="UserDate" SortExpression="UserDate" 
                    UniqueName="UserDate" Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="WorkDuration" DataType="System.Int32" 
                    HeaderText="time" SortExpression="WorkDuration" 
                    UniqueName="WorkDuration">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="WorkID" DataType="System.Int32" 
                    HeaderText="WorkID" SortExpression="WorkID" 
                    UniqueName="WorkID" ReadOnly="True" Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="URID" 
                    HeaderText="URID" SortExpression="URID" 
                    UniqueName="URID" DataType="System.Int32" ReadOnly="True" Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="UnUsaReason" 
                    HeaderText="UnUsaReason" SortExpression="UnUsaReason" 
                    UniqueName="UnUsaReason">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="USID" DataType="System.Int32" 
                    HeaderText="USID" SortExpression="USID" 
                    UniqueName="USID" ReadOnly="True" Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="UsageName" 
                    HeaderText="UsageName" SortExpression="UsageName" 
                    UniqueName="UsageName">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="StatusID" DataType="System.Int32" 
                    HeaderText="StatusID" ReadOnly="True" SortExpression="StatusID" 
                    UniqueName="StatusID" Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="StatusName" HeaderText="StatusName" 
                    SortExpression="StatusName" UniqueName="StatusName">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="EPID" DataType="System.Int32" 
                    HeaderText="EPID" ReadOnly="True" SortExpression="EPID" UniqueName="EPID" 
                    Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="EquipmentName" HeaderText="EquipmentName" 
                    SortExpression="EquipmentName" UniqueName="EquipmentName">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="ARID" DataType="System.Int32" 
                    HeaderText="ARID" ReadOnly="True" SortExpression="ARID" UniqueName="ARID" 
                    Visible="False">
                </telerik:GridBoundColumn>
                <telerik:GridBoundColumn DataField="AreaName" HeaderText="AreaName" 
                    SortExpression="AreaName" UniqueName="AreaName">
                </telerik:GridBoundColumn>
                                                                          </tr>
                        </tr>
                    
                    </table>
                    <table style="width: 100%">
                    <tr>
                                       </tr>
                        <tr>
                            <td align="right">
                                <asp:Button ID="Button1" Text='<%# (Container is GridEditFormInsertItem) ? "Insert" : "Refresh" %>'
                                CommandName='<%# (Container is GridEditFormInsertItem) ? "Insert" : "Update" %>'
                                    runat="server" ValidationGroup="ValidationGroup"  >
                                </asp:Button> 
                                <asp:Button ID="Button2" Text="Cancel" runat="server" CausesValidation="False" CommandName="Cancel">
                                </asp:Button>
                            </td>
                        </tr>
                    </table>
                </FormTemplate>
        <PopUpSettings Modal="True" />
    </EditFormSettings>
      
        </MasterTableView>
        <PagerStyle Mode="NextPrevAndNumeric"></PagerStyle>
    </telerik:RadGrid>
 <asp:SqlDataSource ID="SqlDataSource3" runat="server" 
            ConnectionString="<%$ ConnectionStrings:CMMSConnectionString2 %>" 
              
        SelectCommand="SELECT ML.MachinaryMainCode, WI.UserDate, WI.WorkDuration, WI.WorkID, UR.ID AS URID, UR.UnUsaReason, US.ID AS USID, US.UsageName, MS.StatusID, MS.StatusName, EP.ID AS EPID, EP.EquipmentName, Ar.ID AS ARID, Ar.AreaName, WI.WorkKilometer, CN.ContractorID, CN.CompanyName, CN.Name + ' ' + CN.Family AS Name, WI.UnUsaReasonID, CN.ContractorType, WI.DisciplineID, Discipline.DisciplineName FROM Discipline RIGHT OUTER JOIN WorkInfo AS WI ON Discipline.ID = WI.DisciplineID RIGHT OUTER JOIN MachinList AS ML LEFT OUTER JOIN MachineryName AS MN ON ML.MachinaryNameID = MN.ID LEFT OUTER JOIN MachineryModel AS MM ON ML.MachinaryModelID = MM.ID LEFT OUTER JOIN MachineryType AS MT ON ML.MachinaryTypeID = MT.ID ON WI.MachinID = ML.ID LEFT OUTER JOIN UnUsaReason AS UR ON WI.UnUsaReasonID = UR.ID LEFT OUTER JOIN UsageShop AS US ON WI.UsageShopID = US.ID LEFT OUTER JOIN MachinStatus AS MS ON WI.StatusID = MS.StatusID LEFT OUTER JOIN Equipment AS EP ON WI.EquipmentID = EP.ID LEFT OUTER JOIN Area AS Ar ON WI.AreaID = Ar.ID LEFT OUTER JOIN Contractor AS CN ON WI.ContractorID = CN.ContractorID WHERE (ML.ID = @ID) AND (WI.UserDate = @UserDate or WI.UserDate is null )" 
        onselected="SqlDataSource3_Selected">
            <SelectParameters>
                <asp:ControlParameter ControlID="RadGrid1" Name="ID" 
                    PropertyName="SelectedValues['ID']" />
                <asp:ControlParameter ControlID="DatePicker1" Name="UserDate" 
                    PropertyName="Date" Type="DateTime" />
            </SelectParameters>
        </asp:SqlDataSource>
.

Grid
Shinu
Top achievements
Rank 2
 answered on 12 Dec 2012
1 answer
155 views
radgrid edit form template weird display issues
I have a radgrid that uses edit form templates. I open the grid and have all the fields in edit mode and hide the actual item row, to show only the edit item templates. I use a dropdown and textbox to have them choose a distributor and the # of records. In testing I generally use 10 #'s. When the button is clicked and the grid is populated. This form is used almost in the way that access forms are used, so they can input lots of records at once without having to click submit/add new over and over.

I am having an issue with the actual template itself, sometimes the fields go into weird positions and do not line up like the others. This can occur randomly but generally occurs after I click save and usually only occurs on the second to last record.

Anyone have ideas why this might occur? Would it be better to use a custom user template instead (can I still have this functionality with that)?

I will post my code below:
aspx:
<%@ Page Title="" Language="VB" MasterPageFile="~/MasterNoBanner.master" AutoEventWireup="false" CodeFile="CropProtectionTransactionsAdd.aspx.vb" Inherits="CP_TransactionsAdd" %>
 
<%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %>
 
<asp:Content ID="Content1" ContentPlaceHolderID="cphBodyText" Runat="Server">
    <div style="width: 980px; min-height:800px; clear : both; border-bottom: 0px solid black;" >
 
        
        <telerik:RadCodeBlock ID="RadCodeBlock1" runat="server">
 
            <script type="text/javascript">
                function CatchKeyPress(sender, args) {
                    if (args.get_keyCode() == 13) { //Enter Key
                        var e = args.get_domEvent().rawEvent;
                        e.returnValue = false;
                        e.cancelBubble = true;
                        if (e.stopPropagation) {
                            e.preventDefault();
                            e.stopPropagation();
                        }
                    }
 
                    if (args.get_keyCode() == 27) { //esca Key
                        var e = args.get_domEvent().rawEvent;
                        e.returnValue = false;
                        e.cancelBubble = true;
                        if (e.stopPropagation) {
                            e.preventDefault();
                            e.stopPropagation();
                        }
                    }
                    if (args.get_keyCode() == 8 || args.get_keyCode() == 46) { //backspace Key
                        var e = args.get_domEvent().rawEvent;
                        e.returnValue = false;
                        e.cancelBubble = true;
                        if (e.stopPropagation) {
                            e.preventDefault();
                            e.stopPropagation();
                        }
                    }
 
                }
 
                function gridCommand(sender, args) {
                    var command = args.get_commandName();
                    if (command == "DeleteRow" || command == "CopyPaste" || command == "SaveChanges" || command == "CancelChanges" || command == "Sort" || command == "Page" || command == "Filter" || command == "ChangePageSize") {
                        //cancel the additional check in body.onunload
                        window.editInProgress = false;
                    }
                }
                function gridCommandCustom(evt) {
                    var command = evt
                    if (command == "DeleteRow" || command == "CopyPaste" || command == "SaveChanges" || command == "CancelChanges" || command == "Sort" || command == "Page" || command == "Filter" || command == "ChangePageSize" || command == "AddRecord") {
                        //cancel the additional check in body.onunload
                        window.editInProgress = false;
                    }
                }
                function verifyCancelChanges() {
                    if (window.editInProgress) {
                        //alert(window.editInProgress.tostring);
                        $find("<%=RadAjaxManager1.ClientID %>").ajaxRequest();
                    }
 
                }
                function updateEdit() {
                    window.editInProgress = true;
                }
                window.onbeforeunload = function (evt) {
                    // alert(window.editInProgress);
                    verifyCancelChanges();
 
                }
 
                function Selected(rowIndex, eventArgs) {
                    var grid = $find("<%= RadGrid1.ClientID %>");
                    if (grid) {
                        if (rowIndex == -1) {
 
                            var masterTable = $find("<%= RadGrid1.ClientID %>").get_masterTableView();
                            //                            var editForm = $telerik.$(".rgEditForm")[0];
                            //                            var txtSize2 = $telerik.findElement(editForm, "txtSize");
                            var InsertItems = masterTable.get_insertItem();
                            // var insertItem = InsertItems[0];
                            var txtSize = $(masterTable.get_insertItem()).find("input[id*='txtSize']").get(0);
                            txtSize.value = eventArgs.get_item().get_attributes().getAttribute("Size");
                            var txtManufacturer = $(masterTable.get_insertItem()).find("input[id*='txtManufacturer']").get(0);
                            txtManufacturer.value = eventArgs.get_item().get_attributes().getAttribute("SupplierName");
                        }
                        else {
                            var EditItems = grid.get_editItems();
                            var editItem = EditItems[rowIndex];
 
                            var txtSize = $(editItem.get_editFormItem()).find("input[id*='txtSize']").get(0);
                            txtSize.value = eventArgs.get_item().get_attributes().getAttribute("Size");
                            var txtManufacturer = $(editItem.get_editFormItem()).find("input[id*='txtManufacturer']").get(0);
                            txtManufacturer.value = eventArgs.get_item().get_attributes().getAttribute("SupplierName");
                        }
 
                    }
                }
 
 
 
 
                function LoadShipTo(combo, eventArqs) {
                    var item = eventArqs.get_item();
                    var grid = $find("<%= RadGrid1.ClientID %>");
                    var EditItems = grid.get_editItems();
                    var rowIndex = combo.get_attributes().getAttribute("ddItemIndex")
                    var editItem = EditItems[rowIndex];
                    //var radcomboShipTo = $(editItem.get_editFormItem()).find("input[id*='ddlShipTo']").get(0);
                    // var ComboShipTo = combo.get_attributes().getAttribute("ddClientID");
                    var ComboShipTo = $find(combo.get_attributes().getAttribute("ddClientID"));
                    // ComboShipTo.set_text("Loading...");
                    //radcomboShipTo.show
                    //   radcomboShipTo.set_text("Loading...");
                    ComboShipTo.requestItems(item.get_value(), false);
                    //  ComboShipTo.focus();
                }
 
                function ShipToLoaded(combo, eventArgs) {
                    if (combo.get_items().get_count() > 0) {
                        // pre-select the first item
                        combo.set_text(combo.get_items().getItem(0).get_text());
                        combo.get_items().getItem(0).highlight();
                        //combo.showDropDown();
                    }
                }
 
 
                function UpdateExtension(rowIndex, extensionid, eventArqs) {
                    var grid = $find("<%= RadGrid1.ClientID %>");
                    var EditItems = grid.get_editItems();
                    var editItem = EditItems[rowIndex];
                    var txtPrice = $(editItem.get_editFormItem()).find("input[id*='txtPrice']").get(0);
                    var txtQuantity = $(editItem.get_editFormItem()).find("input[id*='txtQuantity']").get(0);
                    var txtExtension = $find(extensionid);
                    var intPrice = txtPrice.value;
                    var intQuantity = txtQuantity.value;
                    var intTotal = intPrice * intQuantity
                    if (intQuantity < 0) {
                        intTotal = (Math.ceil(intTotal * 100)) / 100;
                    }
                    else {
                        intTotal = (Math.floor(intTotal * 100)) / 100;
                    }
                    txtExtension.set_value(intTotal);
                }
 
               </script>
 
        </telerik:RadCodeBlock>
            <telerik:RadWindowManager runat="server" ID="RadWindowManager1">
    </telerik:RadWindowManager>
         <telerik:RadFormDecorator ID="RadFormDecorator1" runat="server" DecoratedControls="Default,Select,Textbox"
        EnableRoundedCorners="false" />
 
 
    <telerik:RadAjaxManager ID="RadAjaxManager1" runat="server" OnAjaxRequest="RadAjaxManager1_AjaxRequest">
        <AjaxSettings>
                    <telerik:AjaxSetting AjaxControlID="RadAjaxManager1">
                <UpdatedControls>
                    <telerik:AjaxUpdatedControl ControlID="RadGrid1" LoadingPanelID="RadAjaxLoadingPanel1"  />
                    <telerik:AjaxUpdatedControl ControlID="lblError" />
                </UpdatedControls>
            </telerik:AjaxSetting>
            <telerik:AjaxSetting AjaxControlID="RadAjaxManager1" EventName="RadGrid1_PreRender">
                <UpdatedControls>
                    <telerik:AjaxUpdatedControl ControlID="RadGrid1" LoadingPanelID="RadAjaxLoadingPanel1"  />
                    <telerik:AjaxUpdatedControl ControlID="lblError" />
                </UpdatedControls>
            </telerik:AjaxSetting>
                        <telerik:AjaxSetting AjaxControlID="RadGrid1">
                <UpdatedControls>
                    <telerik:AjaxUpdatedControl ControlID="RadGrid1"  LoadingPanelID="RadAjaxLoadingPanel1" />
                    <telerik:AjaxUpdatedControl ControlID="lblError" />
                </UpdatedControls>
            </telerik:AjaxSetting>
            <telerik:AjaxSetting AjaxControlID="btnGrid">
                <UpdatedControls>
                <telerik:AjaxUpdatedControl ControlID="RadGrid1"  LoadingPanelID="RadAjaxLoadingPanel1" />
                                        <telerik:AjaxUpdatedControl ControlID="lblError" />
                    
                </UpdatedControls>
            </telerik:AjaxSetting>
        </AjaxSettings>
    </telerik:RadAjaxManager>
 
    <telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" runat="server" Height="16px"
            Width="16px" />
 
<br />
            <div style='width: 95%;'>
<table width="100%" align="left" border="0" cellpadding="2" cellspacing=0>
    <tr>
        <td width="175px" align="right">Choose Distributor to add:</td>
        <td><telerik:RadComboBox ID="ddlDistributors" DataSourceID="dsDistributors" EmptyMessage="Choose..." AllowCustomText="false" MarkFirstMatch="true"  DataTextField="DistributorName" DataValueField="CPDistributorID" runat="server">
            <Items>
                                                <telerik:RadComboBoxItem Value="0" Text="" Selected="true" />
                                            </Items>
        </telerik:RadComboBox></td></tr>
    <tr>
    <td width="175px"  align="right"># of Rows (estimate) to add: </td>
    <td><telerik:RadNumericTextBox ID="txtRows" runat="server" MinValue="0" MaxValue="100" Width="75px">
<NumberFormat DecimalDigits="0" GroupSeparator="" /></telerik:RadNumericTextBox> <telerik:RadButton runat="server" ID="btnGrid" Text="Add Records" ></telerik:RadButton></td></tr>
</table>
</div>
<br /><br /><br />
<asp:Label id="lblError" runat="server" Text="asdf"  Visible="true"></asp:Label>
       <telerik:RadGrid ID="RadGrid1" 
            AllowFilteringByColumn="false"
            AllowSorting="false"  runat="server" ShowFooter="false" ShowHeader="false" ShowGroupPanel="false" ShowStatusBar="false"
            AutoGenerateColumns="False" CellSpacing="0" AllowMultiRowEdit="True" PageSize="10"
            Width="98%" AllowPaging="false" Height="600px"  OnItemDataBound="OnItemDataBoundHandler" ViewStateMode="Enabled" >
            <ClientSettings>
             
<Selecting AllowRowSelect="True"></Selecting>
 
<ClientEvents OnKeyPress="CatchKeyPress"></ClientEvents>
 
            <Scrolling AllowScroll="true" UseStaticHeaders="true"></Scrolling>
        </ClientSettings>
         
 
            <MasterTableView EditMode="EditForms" DataKeyNames="TransactionID"  CommandItemDisplay="Top"  PagerStyle-AlwaysVisible="false" InsertItemDisplay="Bottom" InsertItemPageIndexAction="ShowItemOnCurrentPage" ViewStateMode="Enabled"
   NoMasterRecordsText="Choose a distributor and # of rows to add to the grid. You can add more rows by clicking the 'Add Records' button again." >
             
                <CommandItemTemplate>
                 
          <table width="100%">
          <tr>
            <td align="right"><asp:LinkButton ID="btnInsertProduct" OnClientClick="gridCommandCustom('AddRecord')" runat="server" CommandName="InsertProduct" Visible="true" style='display: none;'><img style="border:0px" alt="" src="Images/AddRecord.gif" />- Add New Product</asp:LinkButton>        
            <asp:LinkButton ID="btnCancelChanges" runat="server" OnClientClick="gridCommandCustom('CancelChanges');" CommandArgument="CancelChanges" CommandName="CancelChanges" Visible="true"><img style="border:0px" alt="" src="Images/Cancel.gif" />- Clear all Changes </asp:LinkButton>      
 <asp:LinkButton ID="btnSaveChanges" runat="server" CommandArgument="SaveChanges" CommandName="SaveChanges"  OnClientClick="gridCommandCustom('SaveChanges');" Visible="true"><img style="border:0px" alt="" src="Images/Update.gif" />- Save All changes</asp:LinkButton>
 
 </td>
          </tr>
          </table>              
  
             
            </CommandItemTemplate>
             
<CommandItemSettings ExportToPdfText="Export to PDF"></CommandItemSettings>
 
<RowIndicatorColumn Visible="false" FilterControlAltText="Filter RowIndicator column"></RowIndicatorColumn>
 
<ExpandCollapseColumn Visible="false" FilterControlAltText="Filter ExpandColumn column"></ExpandCollapseColumn>
     
    <Columns>
     
                    <telerik:GridBoundColumn DataField="TransactionID"
            FilterControlAltText="Filter TransactionID column" HeaderText="TransactionID"
            SortExpression="TransactionID" UniqueName="TransactionID" DataType="System.Int32" ReadOnly="True" Visible="false">
        </telerik:GridBoundColumn>
        <telerik:GridBoundColumn UniqueName="MemberID" HeaderText="Member" DataField="MemberID" AllowFiltering="false" showfiltericon="false"  CurrentFilterFunction="NoFilter">
 
         
</telerik:GridBoundColumn>
<telerik:GridBoundColumn UniqueName="CPDistributorID" HeaderText="Distributor" DataField="CPDistributorID" AllowFiltering="false" showfiltericon="false"  CurrentFilterFunction="NoFilter">
        
</telerik:GridBoundColumn>
    </Columns>
    <EditFormSettings EditFormType="Template" >
                    <FormTemplate>
                     <div><br />
                      
                    
                      
                        <table width="920px" cellspacing="0" cellpadding="0">
                          <tr valign="top">
                            <td width="200px"><asp:Label ID="lblCompanyName" runat="server" Text="Member" Font-Bold="true"></asp:Label></td>
                            <td width="220px"><asp:Label ID="lblShipTop" runat="server" Text="Ship To" Font-Bold="true"></asp:Label></td>
                            <td width="498px"><asp:Label ID="lblPurchaseDate" runat="server" Text="Purchase Date" Font-Bold="true"></asp:Label></td>
                          </tr>
                          <tr valign="top">
                            <td width="200px">                            <telerik:RadComboBox ID="ddlMember" runat="server" AppendDataBoundItems="true" AutoPostBack="false"
                                                        EmptyMessage="Select..." DataSourceID="dsMembers" DataTextField="CompanyName"  DataValueField="MemberID" SelectedValue='<%# Bind("MemberID") %>' MarkFirstMatch="true" DropDownWidth="400px" HighlightTemplatedItems="true" Width="190px" Height="250px"  ClientEvents-OnKeyPress="KeyPressed" EnableLoadOnDemand="true" OnClientSelectedIndexChanging="LoadShipTo"  >
                            <HeaderTemplate>
                                                            <ul>
                                                                <li class="colCompanyName">Member</li>
                                                                <li class="colCPMember">CP Member</li>                                                               
                                                             </ul>
                                                             
                                                        </HeaderTemplate>
                                                        <ItemTemplate>
                                                            <ul>
                                                                <li class="colCompanyName"><%# Eval("CompanyName")%></li>
                                                                <li class="colCPMember" ><%# Eval("CPMember")%></li>
                                                            </ul>
                                                        </ItemTemplate>
                             
                            </telerik:RadComboBox></td>
                            <td width="220px">
                                <telerik:RadComboBox ID="ddlShipTo" runat="server"
                                datatextfield="ShipTo" DataValueField="ShipToID"
                                MarkFirstMatch="true" DropDownWidth="200px" HighlightTemplatedItems="true" Width="200px" EnableLoadOnDemand="true"  OnClientItemsRequested="ShipToLoaded"
        OnItemsRequested="ddlShipTo_ItemsRequested"  ClientEvents-OnKeyPress="KeyPressed" ></telerik:RadComboBox>
 
 
                            </td>
                <td width="400px"><telerik:RadDatePicker ID="txtPurchaseDate" runat="server"  ClientEvents-OnKeyPress="KeyPressed" Width="140px"   AutoPostBack="false"
                        DateInput-EmptyMessage="" MinDate="01/01/1000" MaxDate="01/01/3000"  dbSelectedDate='<%# Bind("PurchaseDate") %> '>
                        <Calendar ID="Calendar1" runat="server"  ClientEvents-OnKeyPress="KeyPressed">
                            <SpecialDays>
                                <telerik:RadCalendarDay Repeatable="Today" ItemStyle-CssClass="rcToday" />
                            </SpecialDays>
                        </Calendar>
                    </telerik:RadDatePicker></td>
                          </tr>
                          </table>
                                                          <table width="920px" border="0" cellpadding="1" cellspacing="0">
                                    <tr>
                                        <td width="180px" align="left"><asp:Label ID="Label8" runat="server" Text="Distributor" Font-Bold="true"></asp:Label></td>
                                        <td width="100px" align="left"><asp:Label ID="Label9" runat="server" Text="Invoice #" Font-Bold="true"></asp:Label></td>
                                        <td width="175px" align="left"><asp:Label ID="Label16" runat="server" Text="Product" Font-Bold="true"></asp:Label></td>
                                        <td width="75px" align="left"><asp:Label ID="Label17" runat="server" Text="Size" Font-Bold="true"></asp:Label></td>
                                        <td width="150px" align="left"><asp:Label ID="Label18" runat="server" Text="Manufacturer" Font-Bold="true"></asp:Label></td>
                                        <td  width="75px" align="left"><asp:Label ID="Label19" runat="server" Text="Quantity" Font-Bold="true"></asp:Label></td>
                                        <td  width="75px" align="left"><asp:Label ID="Label20" runat="server" Text="Price" Font-Bold="true"></asp:Label></td>
                                        <td  width="74px" align="left"><asp:Label ID="Label21" runat="server" Text="Extension" Font-Bold="true"></asp:Label></td>
                                    </tr>
                                                           
                                             <tr>
                                        <td width="180px" align="left"><telerik:RadComboBox ID="ddlDistributors" runat="server" AppendDataBoundItems="false" AutoPostBack="false"
                                                        EmptyMessage="Select..." DataSourceID="dsDistributors" DataTextField="DistributorName"  DataValueField="CPDistributorID" SelectedValue='<%# Bind("CPDistributorID") %>' MarkFirstMatch="true" DropDownWidth="200px" HighlightTemplatedItems="true" Width="170px" Height="250px"   ClientEvents-OnKeyPress="KeyPressed" ></telerik:RadComboBox>
                                        </td>
                                        <td width="100px" align="left">
                                            <telerik:RadTextBox ID="txtInvoiceNumber" Text='<%# Bind("InvoiceNumber") %>' runat="server" width="90px"></telerik:RadTextBox>
                                        </td>
                                        <td width="175px" align="left"><telerik:RadComboBox ID="ddlProduct" runat="server" EnableLoadOnDemand="true" DataTextField="Product"
                                         OnItemsRequested="ddlProduct_ItemsRequested" DataValueField="CPProductID" AutoPostBack="false" HighlightTemplatedItems="true" Width="170px" Height="250px"  DropDownWidth="500px"   ClientEvents-OnKeyPress="KeyPressed"  markfirstmatch="true" Filter="contains">
                                                        <HeaderTemplate>
                                                            <ul>
                                                                <li class="colProductName">Product Name</li>
                                                                <li class="colSize">Pkg Size</li>                                                               
                                                                <li class="colSuppleer">Manufacturer</li>                                                               
                                                             </ul>
                                                             
                                                        </HeaderTemplate>
                                                        <ItemTemplate>
                                                            <ul>
                                                                <li class="colProductName"> <%# DataBinder.Eval(Container, "Text")%></li>
                                                                <li class="colSize" > <%# DataBinder.Eval(Container, "Attributes['Size']")%></li>
                                                                <li class="colSuppleer"> <%# DataBinder.Eval(Container, "Attributes['SupplierName']")%></li>  
                                                            </ul>
                                                        </ItemTemplate>
                                                        </telerik:RadComboBox></td>
                                        <td width="75px" align="left"><telerik:RadTextBox ID="txtSize" Text='<%# Eval("Size") %>' runat="server" ReadOnly="true" Width="70px" ></telerik:RadTextBox></td>
                                        <td width="150px" align="left"><telerik:RadTextBox ID="txtManufacturer" Text='<%# Eval("SupplierName") %>' runat="server" ReadOnly="true" Width="145px"></telerik:RadTextBox></td>
                                        <td width="75px" align="left"><telerik:RadNumericTextBox incrementsettings-interceptarrowskeys="false" incrementsettings-interceptmousewheel="false"  ID="txtQuantity" NumberFormat-DecimalDigits="3"  runat="server" Type="number" width="55px" NumberFormat-DecimalSeparator="." NumberFormat-GroupSeparator="" invalidstyleduration="100" Dbvalue='<%# Bind("Quantity") %>'  EmptyMessage="0.000" ><EmptyMessageStyle Width="55px" /><ReadOnlyStyle Width="55px" /> </telerik:RadNumericTextBox></td>
                                        <td width="75px" align="left"><telerik:RadNumericTextBox incrementsettings-interceptarrowskeys="false" incrementsettings-interceptmousewheel="false"  ID="txtPrice" runat="server" Type="currency" width="65px" EmptyMessageStyle-Width="65px" MinValue="0.000" NumberFormat-DecimalSeparator="."  Dbvalue='<%# Bind("Price") %>' NumberFormat-DecimalDigits="3" EmptyMessage="0.000" ><EmptyMessageStyle Width="55px" /><ReadOnlyStyle Width="55px" /></telerik:RadNumericTextBox></td>
                                        <td width="74px" align="left"><telerik:RadNumericTextBox incrementsettings-interceptarrowskeys="false" incrementsettings-interceptmousewheel="false"  ID="txtExtension" runat="server" Type="currency" width="65px" EmptyMessageStyle-Width="65px" NumberFormat-DecimalSeparator="."  Dbvalue='<%# Bind("Extension") %>' NumberFormat-DecimalDigits="2"  NumberFormat-NegativePattern="$- n" ><EmptyMessageStyle Width="55px" /><ReadOnlyStyle Width="55px" /></telerik:RadNumericTextBox></td>
                                    </tr>
                                </table>
 
                        
                                                 <asp:Label id="lblMissing" runat="server" Text="All fields required except Extension." ForeColor="Red" Font-Bold="true" Visible="false"></asp:Label><br /></div>
                    </FormTemplate>
</EditFormSettings>
 
</MasterTableView>
        <ClientSettings AllowKeyboardNavigation="false">
         
         <ClientEvents OnKeyPress="CatchKeyPress" OnCommand="gridCommand" ></ClientEvents>
          
                         <Selecting AllowRowSelect="true" />
                                              <Scrolling AllowScroll="true"  UseStaticHeaders="true" />
        </ClientSettings>
        </telerik:RadGrid>
 
 
 
            <asp:SqlDataSource ID="SqlDataSource1" runat="server"
            ConnectionString="<%$ ConnectionStrings:csPrairielandAg %>"
            ProviderName="<%$ ConnectionStrings:csPrairielandAg.ProviderName %>"
 
            UpdateCommand="UPDATE dbo.tblCropProtectionTransactionsTEMP SET MemberID = @MemberID, ShipToID = @ShipToID, PurchaseDate = @PurchaseDate, CPDistributorID = @CPDistributorID, InvoiceNumber = @InvoiceNumber, CPProductID = @CPProductID, Quantity = @Quantity, Price = @Price, Extension = @Extension where TransactionID = @TransactionID"
             
            InsertCommand="INSERT INTO dbo.tblCropProtectionTransactions(MemberID, ShipToID, CPDistributorID, PurchaseDate, InvoiceNumber, CPProductID, Quantity, Price, Extension, NetPricing, DPS) VALUES (@MemberID, @ShipToID, @CPDistributorID, @PurchaseDate, @InvoiceNumber, @CPProductID, @Quantity, @Price, @Extension, @NetPricing, @DPS)">
                <InsertParameters>
                    <asp:Parameter Name="MemberID" />
                    <asp:Parameter Name="ShipToID" />
                    <asp:Parameter Name="CPDistributorID" />
                    <asp:Parameter Name="PurchaseDate" />
                    <asp:Parameter Name="InvoiceNumber" />
                    <asp:Parameter Name="CPProductID" />
                    <asp:Parameter Name="Quantity" />
                    <asp:Parameter Name="Price" />
                    <asp:Parameter Name="Extension" />
                    <asp:Parameter Name="NetPricing" DefaultValue="0" />
                    <asp:Parameter Name="DPS"  DefaultValue="0" />
                </InsertParameters>
            <UpdateParameters>
                <asp:Parameter Name="TransactionID" />
                <asp:Parameter Name="MemberID" />
                <asp:Parameter Name="ShipToID" />
                <asp:Parameter Name="PurchaseDate" />
                <asp:Parameter Name="CPDistributorID" />
                <asp:Parameter Name="InvoiceNumber" />
                <asp:Parameter Name="CPProductID" />
                <asp:Parameter Name="Quantity" />
                <asp:Parameter Name="Price" />
                <asp:Parameter Name="Extension" />
            </UpdateParameters>
        </asp:SqlDataSource>
 
            <asp:SqlDataSource ID="dsSupplier" runat="server"
            ConnectionString="<%$ ConnectionStrings:csPrairielandAg %>"
            ProviderName="<%$ ConnectionStrings:csPrairielandAg.ProviderName %>"
            SelectCommand="SELECT CPSupplierID, SupplierName FROM dbo.tblCropProtectionSuppliers" >
        </asp:SqlDataSource>
 <asp:SqlDataSource ID="dsProducts" runat="server"
            ConnectionString="<%$ ConnectionStrings:csPrairielandAg %>"
            ProviderName="<%$ ConnectionStrings:csPrairielandAg.ProviderName %>"
            SelectCommand="SELECT CPProductID,Product,Size,SupplierName from tblCropProtectionProducts a join tblCropProtectionSuppliers b on a.CPSupplierID = b.CPSupplierID
order by PRoduct,Size,SupplierName" >
        </asp:SqlDataSource>
 <asp:SqlDataSource ID="dsDistributors" runat="server"
            ConnectionString="<%$ ConnectionStrings:csPrairielandAg %>"
            ProviderName="<%$ ConnectionStrings:csPrairielandAg.ProviderName %>"
            SelectCommand="select CPDistributorID, DistributorName from tblCropProtectionDistributors order by DistributorName" >
 
        </asp:SqlDataSource>
            <asp:SqlDataSource ID="dsMembers" runat="server"
            ConnectionString="<%$ ConnectionStrings:csPrairielandAg %>"
            ProviderName="<%$ ConnectionStrings:csPrairielandAg.ProviderName %>"
            SelectCommand="SELECT distinct tblMembers.MemberId, tblMembers.CompanyName, tblMembers.Email, case [CropProtection] when 1 then 'Yes' when 0 then 'No' end AS [CPMember] FROM tblMembers ORDER BY tblMembers.CompanyName" >
 
        </asp:SqlDataSource>
                    <asp:SqlDataSource ID="dsShipTo" runat="server"
            ConnectionString="<%$ ConnectionStrings:csPrairielandAg %>"
            ProviderName="<%$ ConnectionStrings:csPrairielandAg.ProviderName %>"
            SelectCommand="SELECT ShipToId, ShipTo from tblMemberShipTo where MemberID = @MemberID order by IsDefault desc, ShipTo asc">
            <SelectParameters>
               <asp:Parameter Name="MemberID" />
            </SelectParameters>                  
             
 
        </asp:SqlDataSource>
 
        <br />
            </div>
 
 
</asp:Content>


aspx.vb:
Imports System
Imports System.Data
Imports System.Configuration
Imports System.Collections
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Web.UI.HtmlControls
Imports Telerik.Web.UI
Imports System.Data.OleDb
Imports System.Data.SqlClient
Imports System.Collections.Generic
Imports System.Data.Common
Imports System.Diagnostics
Imports System.ComponentModel
Imports System.Web.SessionState
Imports System.Web.Mail
Imports System.Net.Mail
Imports System.Xml
Partial Public Class CP_TransactionsAdd
 
    Inherits System.Web.UI.Page
 
    Dim strMode As String = ""
    Dim strSelectCommand As String = ""
    Dim strInsertCommand As String = ""
    Dim strSQL As String = ""
    Dim total As Integer
    Dim msg As String = ""
    Dim member As MembershipUser = Membership.GetUser(User.Identity.Name)
    Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
        ' RadGrid1.Enabled = True
        ' RadGrid1.Visible = True
        Session("Refresh") = "Yes"
        strSelectCommand = "select TransactionID, MemberID, ShipToID, PurchaseDate, CPDistributorID, InvoiceNumber, a.CPProductID,Product,Size,SupplierName, Quantity, Price, Extension, Comments from tblCropProtectionTransactionsTEMP a left join tblCropProtectionProducts b on a.CPProductID = b.CPProductID left join tblCropProtectionSuppliers c on b.CPSupplierID = c.CPSupplierID where UserName = '" & member.UserName & "' order by TransactionID asc"
        SqlDataSource1.SelectCommand = strSelectCommand
        If (Not Page.IsPostBack) Then
            Try
                Using conn As New SqlConnection(ConnectionString)
                    Dim cmdInsert As New SqlCommand()
                    conn.Open()
                    cmdInsert.Connection = conn
                    cmdInsert.CommandType = CommandType.Text
                    cmdInsert.CommandText = "Delete from tblCropProtectionTransactionsTEMP where UserName = '" & member.UserName & "'"
                    cmdInsert.ExecuteNonQuery()
                End Using
                lblError.Visible = False
                msg = ""
            Catch exSQL As SqlException
                Select Case exSQL.Number
                    Case Else
                        lblError.Text = exSQL.Message.ToString() & " If this error persists, contact EERC Research Information Systems for help."
                        lblError.Visible = True
                End Select
 
            Catch ex As Exception
                lblError.Text = ex.Message.ToString() & " If this error persists, contact EERC Research Information Systems for help."
                '                lblError.visible = true
            End Try
        End If
    End Sub
 
    Protected Sub RadAjaxManager1_AjaxRequest(sender As Object, e As AjaxRequestEventArgs)
        '        RadGrid1.Items.Item(1).FireCommandEvent("Update", String.Empty)
    End Sub
 
 
    Protected Sub RadGrid1_ItemCommand(sender As Object, e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.ItemCommand
        If e.CommandName = "RefreshGrid" Then
            strMode = "Refresh"
            e.Item.OwnerTableView.Rebind()
        ElseIf e.CommandName = "SaveChanges" Then
            RadGrid1_UpdateCommand(sender, e)
            'e.Item.OwnerTableView.Rebind()
            strMode = "Save"
        ElseIf e.CommandName = "CancelChanges" Then
            strMode = "Cancel"
 
            For Each column As GridColumn In RadGrid1.MasterTableView.Columns
                column.CurrentFilterFunction = GridKnownFunction.NoFilter
                column.CurrentFilterValue = String.Empty
            Next
            RadGrid1.MasterTableView.FilterExpression = String.Empty
            e.Item.OwnerTableView.Rebind()
        ElseIf e.CommandName = "Sort" Then
            strMode = "Sort"
        ElseIf e.CommandName = "Page" Then
            strMode = "Page"
        ElseIf e.CommandName = "ChangePageSize" Then
            RadGrid1.EditIndexes.Clear()
        End If
        If e.CommandName = "DeleteRow" Then
            Dim intTransactionID = e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("CPProductID").ToString
            Try
                Dim deleteQuery As String = "Delete from tblCropProtectionProducts where TransactionID='" & intTransactionID & "'"
                Dim strConn As String = ConfigurationManager.ConnectionStrings("csPrairielandAg").ConnectionString
                Using connection As New SqlConnection(strConn)
                    connection.Open()
                    Using Command As New SqlCommand(deleteQuery, connection)
                        Command.CommandType = Data.CommandType.Text
                        Command.CommandText = deleteQuery
                        Command.ExecuteNonQuery()
                        SetMessage("Transaction deleted")
                    End Using
                    connection.Close()
                End Using
                RadGrid1.Rebind()
            Catch ex As Exception
                If InStr(ex.Message, "The DELETE statement conflicted with the REFERENCE constraint", CompareMethod.Text) > 0 Then
                    SetMessage("Cannot delete this Transaction.")
                Else
                    SetMessage(ex.Message)
                End If
 
 
            End Try
        End If
 
 
    End Sub
 
    Protected Sub RadGrid1_PageIndexChanged(sender As Object, e As Telerik.Web.UI.GridPageChangedEventArgs) Handles RadGrid1.PageIndexChanged
        If RadGrid1.Items.Item(1).IsInEditMode = True Then
            e.Item.FireCommandEvent("Update", String.Empty)
        End If
 
    End Sub
 
    Protected Sub RadGrid1_PreRender(sender As Object, e As System.EventArgs) Handles RadGrid1.PreRender
        For i As Integer = 0 To RadGrid1.Items.Count
            RadGrid1.EditIndexes.Add(i)
        Next
        RadGrid1.Rebind()
        For Each item As GridDataItem In RadGrid1.MasterTableView.Items
            item.Display = False
        Next
    End Sub
 
    Protected Sub RadGrid1_UpdateCommand(sender As Object, e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.UpdateCommand
 
        If RadGrid1.EditItems.Count > 0 Then
            For Each item As GridDataItem In RadGrid1.EditItems
                Dim dataItem As GridEditFormItem = DirectCast(item.EditFormItem, GridEditFormItem)
 
                '      Dim newValues As New Hashtable()
                'Dim eeditedItem As GridEditableItem = TryCast(e.Item, GridEditableItem)
                Dim intTransactionID As Integer = dataItem.OwnerTableView.DataKeyValues(dataItem.ItemIndex)("TransactionID")
                Dim test As RadComboBox = TryCast(dataItem.OwnerTableView.FindControl("ddlProduct"), RadComboBox)
                '     RadGrid1.MasterTableView.ExtractValuesFromItem(newValues, dataItem)
                Dim productCombo As RadComboBox = TryCast(dataItem.FindControl("ddlProduct"), RadComboBox)
                Dim memberCombo As RadComboBox = TryCast(dataItem.FindControl("ddlMember"), RadComboBox)
                Dim shiptoCombo As RadComboBox = TryCast(dataItem.FindControl("ddlShipTo"), RadComboBox)
                Dim txtPurchaseDate As RadDatePicker = TryCast(dataItem.FindControl("txtPurchaseDate"), RadDatePicker)
                Dim ddlDistributors As RadComboBox = TryCast(dataItem.FindControl("ddlDistributors"), RadComboBox)
                Dim txtInvoiceNumber As RadTextBox = TryCast(dataItem.FindControl("txtInvoiceNumber"), RadTextBox)
                Dim txtQuantity As RadNumericTextBox = TryCast(dataItem.FindControl("txtQuantity"), RadNumericTextBox)
                Dim txtPrice As RadNumericTextBox = TryCast(dataItem.FindControl("txtPrice"), RadNumericTextBox)
                Dim txtExtension As RadNumericTextBox = TryCast(dataItem.FindControl("txtExtension"), RadNumericTextBox)
                SqlDataSource1.UpdateParameters("TransactionID").DefaultValue = intTransactionID
                SqlDataSource1.UpdateParameters("MemberID").DefaultValue = memberCombo.SelectedValue
                SqlDataSource1.UpdateParameters("ShipToID").DefaultValue = shiptoCombo.SelectedValue
                SqlDataSource1.UpdateParameters("CPDistributorID").DefaultValue = ddlDistributors.SelectedValue
                SqlDataSource1.UpdateParameters("PurchaseDate").DefaultValue = txtPurchaseDate.DbSelectedDate
                SqlDataSource1.UpdateParameters("InvoiceNumber").DefaultValue = txtInvoiceNumber.Text
                SqlDataSource1.UpdateParameters("CPProductID").DefaultValue = productCombo.SelectedValue
                SqlDataSource1.UpdateParameters("Quantity").DefaultValue = txtQuantity.Text
                SqlDataSource1.UpdateParameters("Price").DefaultValue = txtPrice.Text
                SqlDataSource1.UpdateParameters("Extension").DefaultValue = txtExtension.Text
 
 
                Try
                    SqlDataSource1.Update()
                    lblError.Visible = False
                    '    e.Canceled = True
                    '  RadGrid1.EditIndexes.Clear()
                Catch ex As Exception
                    SetMessage(Server.HtmlEncode("Unable to update Transaction. Reason: " + ex.Message).Replace("'", "'").Replace(vbCrLf, "<br />"))
                End Try
            Next
 
        Else
            Exit Sub
        End If
 
    End Sub
    Private Sub SetMessage(ByVal message As String)
        lblError.Text = String.Format("<span style='color:red'>{0}</span>", message)
        lblError.Visible = True
    End Sub
    Protected Sub ddlProduct_ItemDataBound(o As Object, e As RadComboBoxItemEventArgs)
        Dim row As DataRowView = TryCast(e.Item.DataItem, DataRowView)
        Dim selectedItem As New RadComboBoxItem()
        ' selectedItem.Text = DirectCast(e.Item.DataItem, DataRowView)("Product").ToString()
        selectedItem.Value = DirectCast(e.Item.DataItem, DataRowView)("CPProductID").ToString()
        selectedItem.Attributes.Add("Size", DirectCast(e.Item.DataItem, DataRowView)("Size").ToString())
        selectedItem.Attributes.Add("SupplierName", DirectCast(e.Item.DataItem, DataRowView)("SupplierName").ToString())
        o.Items.Add(selectedItem)
 
        selectedItem.DataBind()
 
    End Sub
    Protected Sub ddlProduct_ItemsRequested(ByVal o As Object, ByVal e As RadComboBoxItemsRequestedEventArgs)
        Dim sql As String = dsProducts.SelectCommand.ToString
        Dim connection As New SqlConnection(ConfigurationManager.ConnectionStrings("csPrairielandAg").ConnectionString)
        Dim adapter As New SqlDataAdapter(sql, connection)
        Dim dt As New DataTable()
        adapter.Fill(dt)
        Dim comboBox As RadComboBox = DirectCast(o, RadComboBox)
        comboBox.Items.Clear()
        For Each row As DataRow In dt.Rows
            Dim item As New RadComboBoxItem()
            item.Text = row("Product").ToString()
            item.Value = row("CPProductID").ToString()
            'item.Attributes.Add("Product", row("Product").ToString())
            item.Attributes.Add("Size", row("Size").ToString())
            item.Attributes.Add("SupplierName", row("SupplierName").ToString())
 
            comboBox.Items.Add(item)
 
            item.DataBind()
        Next
 
    End Sub
    Protected Sub OnItemDataBoundHandler(ByVal sender As Object, ByVal e As GridItemEventArgs)
        If e.Item.IsInEditMode Then
            Dim item As GridEditableItem = DirectCast(e.Item, GridEditableItem)
 
            If Not (TypeOf e.Item Is IGridInsertItem) Then
                Dim combo As RadComboBox = DirectCast(item.FindControl("ddlProduct"), RadComboBox)
 
                Dim selectedItem As New RadComboBoxItem()
                If DirectCast(e.Item.DataItem, DataRowView)("Product").ToString() <> "" Then
                    selectedItem.Text = DirectCast(e.Item.DataItem, DataRowView)("Product").ToString()
                    selectedItem.Value = DirectCast(e.Item.DataItem, DataRowView)("CPProductID").ToString()
                    selectedItem.Attributes.Add("Size", DirectCast(e.Item.DataItem, DataRowView)("Size").ToString())
                    selectedItem.Attributes.Add("SupplierName", DirectCast(e.Item.DataItem, DataRowView)("SupplierName").ToString())
 
                    combo.Items.Add(selectedItem)
 
                    selectedItem.DataBind()
 
                End If
                ' Session("CPProductID") = selectedItem.Value
            End If
        End If
    End Sub
 
    Protected Function LoadShipTo(MemberID As String) As DataTable
        Dim connection As New SqlConnection(ConfigurationManager.ConnectionStrings("csPrairielandAg").ConnectionString)
 
        'select a country based on the continentID
        Dim adapter As New SqlDataAdapter("SELECT ShipToId, ShipTo from tblMemberShipTo where MemberId=@MemberID order by IsDefault desc, ShipTo asc", connection)
        adapter.SelectCommand.Parameters.AddWithValue("@MemberID", MemberID)
 
        Dim dt As New DataTable()
        adapter.Fill(dt)
 
        Return dt
    End Function
 
    Protected Sub RadGrid1_ItemDataBound(sender As Object, e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid1.ItemDataBound
        If TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode Then
            Dim editedItem As GridEditableItem = TryCast(e.Item, GridEditableItem)
 
 
            Dim dataSourceRow As DataRowView = DirectCast(e.Item.DataItem, DataRowView)
            Dim memberCombo As RadComboBox = TryCast(editedItem.FindControl("ddlMember"), RadComboBox)
            Dim shiptoCombo As RadComboBox = TryCast(editedItem.FindControl("ddlShipto"), RadComboBox)
            shiptoCombo.DataSource = LoadShipTo(memberCombo.SelectedValue)
            shiptoCombo.DataBind()
            shiptoCombo.SelectedValue = dataSourceRow("ShipToID").ToString()
 
            Dim productCombo As RadComboBox = TryCast(editedItem.FindControl("ddlProduct"), RadComboBox)
 
            Dim txtSize As RadTextBox = TryCast(editedItem.FindControl("txtSize"), RadTextBox)
            Dim txtManufacturer As RadTextBox = TryCast(editedItem.FindControl("txtManufacturer"), RadTextBox)
            If productCombo.SelectedValue <> "" Then
                txtSize.Text = productCombo.SelectedItem.Attributes("Size").ToString
                txtManufacturer.Text = productCombo.SelectedItem.Attributes("SupplierName").ToString
            End If
 
        End If
        If TypeOf e.Item Is GridPagerItem Then
            Dim pager As GridPagerItem = DirectCast(e.Item, GridPagerItem)
            Dim PageSizeComboBox As RadComboBox = DirectCast(pager.FindControl("PageSizeComboBox"), RadComboBox)
            PageSizeComboBox.Visible = False
            Dim changePageSizelbl As Label = DirectCast(pager.FindControl("ChangePageSizeLabel"), Label)
            changePageSizelbl.Visible = False
        End If
 
    End Sub
 
 
 
    Protected Sub RadGrid1_ItemCreated(sender As Object, e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid1.ItemCreated
 
        If TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode Then
            Dim editedItem As GridEditableItem = TryCast(e.Item, GridEditableItem)
 
            Dim productCombo As RadComboBox = TryCast(editedItem.FindControl("ddlProduct"), RadComboBox)
            productCombo.OnClientSelectedIndexChanged() = "function (button,args){Selected('" & editedItem.ItemIndex & "',args);}"
 
            Dim memberCombo As RadComboBox = TryCast(editedItem.FindControl("ddlMember"), RadComboBox)
            Dim shiptoCombo As RadComboBox = TryCast(editedItem.FindControl("ddlShipTo"), RadComboBox)
            Dim txtPurchaseDate As RadDatePicker = TryCast(editedItem.FindControl("txtPurchaseDate"), RadDatePicker)
            Dim ddlDistributors As RadComboBox = TryCast(editedItem.FindControl("ddlDistributors"), RadComboBox)
            Dim txtInvoiceNumber As RadTextBox = TryCast(editedItem.FindControl("txtInvoiceNumber"), RadTextBox)
            Dim txtQuantity As RadNumericTextBox = TryCast(editedItem.FindControl("txtQuantity"), RadNumericTextBox)
            Dim txtPrice As RadNumericTextBox = TryCast(editedItem.FindControl("txtPrice"), RadNumericTextBox)
            Dim txtExtension As RadNumericTextBox = TryCast(editedItem.FindControl("txtExtension"), RadNumericTextBox)
            memberCombo.Attributes.Add("ddItemIndex", editedItem.ItemIndex)
            memberCombo.Attributes.Add("ddClientID", shiptoCombo.ClientID)
            productCombo.Attributes.Add("onchange", "return updateEdit();")
            memberCombo.Attributes.Add("onchange", "return updateEdit();")
            shiptoCombo.Attributes.Add("onchange", "return updateEdit();")
            txtPurchaseDate.Attributes.Add("onchange", "return updateEdit();")
            ddlDistributors.Attributes.Add("onchange", "return updateEdit();")
            txtInvoiceNumber.Attributes.Add("onchange", "return updateEdit();")
            txtQuantity.Attributes.Add("onchange", "return updateEdit();")
            txtQuantity.ClientEvents.OnValueChanged() = "function (button,args){UpdateExtension('" & editedItem.ItemIndex & "','" & txtExtension.ClientID & "',args);}"
            txtPrice.Attributes.Add("onchange", "return updateEdit();")
            txtPrice.ClientEvents.OnValueChanged() = "function (button,args){UpdateExtension('" & editedItem.ItemIndex & "','" & txtExtension.ClientID & "',args);}"
 
        End If
    End Sub
    Protected Sub ddlShipTo_ItemsRequested(ByVal o As Object, ByVal e As RadComboBoxItemsRequestedEventArgs)
        o.DataTextField = "ShipTo"
        o.DataValueField = "ShipToId"
        o.DataSource = LoadShipTo(e.Text)
        o.DataBind()
    End Sub
 
 
    Protected Sub RadGrid1_NeedDataSource(sender As Object, e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles RadGrid1.NeedDataSource
 
        RadGrid1.DataSource = SqlDataSource1
        ' Session("Refresh") = "Yes"
    End Sub
    Public ReadOnly Property ConnectionString() As String
        Get
            Return ConfigurationManager.ConnectionStrings("csPrairielandAg").ConnectionString
        End Get
    End Property
    Protected Sub btnGrid_Click(sender As Object, e As System.EventArgs) Handles btnGrid.Click
        If ddlDistributors.SelectedValue = "" Or txtRows.Text = "" Then
            SetMessage("Please choose a distributor and # of Rows")
            Session("Refresh") = "No"
            Exit Sub
 
        End If
 
        Dim strSQL As String
        Dim msg As String = ""
        lblError.Text = ""
        Dim member As MembershipUser = Membership.GetUser(User.Identity.Name)
        Try
            Using conn As New SqlConnection(ConnectionString)
                Dim cmdInsert As New SqlCommand()
                conn.Open()
                cmdInsert.Connection = conn
                For i As Integer = 1 To txtRows.Text
                    strSQL = "INSERT INTO tblCropProtectionTransactionsTEMP (CPDistributorID,UserName) values(" & ddlDistributors.SelectedValue & ",'" & member.UserName & "')"
                    cmdInsert.CommandText = strSQL
                    cmdInsert.ExecuteNonQuery()
                Next
            End Using
            msg = ""
            lblError.Visible = False
            Session("Refresh") = "Yes"
            RadGrid1.Rebind()
        Catch exSQL As SqlException
            Select Case exSQL.Number
                Case Else
                    lblError.Text = exSQL.Message.ToString() & " If this error persists, contact EERC Research Information Systems for help."
                    lblError.Visible = True
            End Select
 
        Catch ex As Exception
            lblError.Text = ex.Message.ToString() & " If this error persists, contact EERC Research Information Systems for help."
            lblError.Visible = True
        End Try
 
    End Sub
End Class
Grid
Pavlina
Telerik team
 answered on 11 Dec 2012
6 answers
220 views
Multiple Gridviews scrolling horizontally

431 Points

148 Posts

Multiple Gridviews scrolling horizontally

6 minutes ago|LINK

Hi friends,

I searched but could not find. I want to make such an arrangement that my all 8 gridview scroll horizontally like the 'coverflow' style. But just want them to scroll horizontally  and do not want to turn those other then the current one.

Just in the case you are having troubles understanding the 'coverflow' here is the ref link : http://en.wikipedia.org/wiki/File:Coverflowitunes7mac.png

But I do not want the inactive ones to turn outside as shown at the link above, I just want simple horizontal scrolling of multiple asp:GrdiViews along the width there are almost 15 - 18 gridviews on my Telerik enebled (asp.net 3.5) web page.

The solution can be anything like jQuery / JS / Ajax / Telerik ...

Thanks for your help in advance,
-Aarsh

Tags:

COVERFLOW, HORIZONTAL, SCROLL, HORIZONTAL SCROLL, GRIDVIEW

Documentation and Tutorials
Aarsh
Top achievements
Rank 1
 answered on 11 Dec 2012
4 answers
121 views
asp GridView(s) in rotator
I am using custom controls (containing grid 1 view) as the rotator items, and want to reuse the same control with different tables (fyi - the control itself has no problems, there are no other controls in the custom control but SQL data-source)

Now -
  1. I do not want to let the frames cut off
  2. I want to display one frame at a time (and so I want the 1st item)
  3. Is there any way out to replicate the exact behavior as this (https://www.dreamspark.com/Student/Software-Catalog.aspx) page's "Developer & Designer Tools" and "Servers & Applications" section ? (I would love to have the horizontal scroll-bar !)
  4. As I am having gridviews in the frame, I want to persist rotator's index after sorting

I tried to set the item width equal to the rotator's "Window" size, and said false to wrapping but still they sit one UNDER another (I have two "frames" of my custom user control )

Rotator
Aarsh
Top achievements
Rank 1
 answered on 11 Dec 2012
5 answers
186 views
Change size of Points
How would one change the size of the Points in a Chart Series?

Thanks.
Chart (Obsolete)
nFocus
Top achievements
Rank 1
 answered on 11 Dec 2012
1 answer
133 views
ComboBox not working after upgraded to Framework 4
Hi,

Please help me on this situation.

We have a Web Application on Framework 3.5 using RadComboBox in Telerik 2009.3.1103.35 with Office 2007 Skins
At first, we run on Application Pool 2.0, it works fine.
By now, we want to let it run on Application Pool 4.0. But something happened:
  1. There are errors on WebResource.axd of Telerik. We figured out that it happened because the version Telerik, so we upgraded to 2012. It's fine by now (No error).
  2. The Style of Combobox is completed destroyed. At first, it generated the class "ComboBox_Office2007", So it works fine with our theme. But After upgraded to Application Pool 4.0, it automatically generate the class "ComboBoxItemHover_Office2007" ??? Why, and how to make it behave normally ???
  3. And now we can't select anything that drop down by the RadComboBox ???
  4. There are places we using RadAjaxManager like this:
    <radA:RadAjaxManager ID="RadAjaxManager" runat="server" OnAjaxRequest="On_AjaxRequest">
        <ajaxsettings>
             <radA:AjaxSetting AjaxControlID="uxDeviationTypeList"> <-- This is a ASP.NET ComboBox 
                <UpdatedControls>
                    <radA:AjaxUpdatedControl ControlID="uxCategory" LoadingPanelID="Loadingpanel" />
                    <radA:AjaxUpdatedControl ControlID="uxHiddenCategory" />
                    <radA:AjaxUpdatedControl ControlID="liType" LoadingPanelID="Loadingpanel" />
                </UpdatedControls>
            </radA:AjaxSetting> 
        </ajaxsettings>
    </radA:RadAjaxManager>

At first, it works fine. But now, it has error like this:
	SyntaxError: missing ) after argument list

...tControler$uxDeviationTypeList\',\'\', 'CP_uxDeviationEditControler_RadAjaxManag...
I found out that if I did that AjaxSetting, there is no error. Why this?

(Editted: After looked at all over the project, almost our Comboxs are Telerik.WebControls.RadCombobox.Net2, I think it is pretty old - v2.7.1.0)

Please take a look at this.
Thanks in advance.
ComboBox
Kalina
Telerik team
 answered on 11 Dec 2012
1 answer
76 views
Javascript unable to find the selected rowID when used in a Master/Content page.
Here we are attempting to get the DataKeyValue (the ID of the data record) when using the javascript below. This code works fine in a a straigh APSX page but doesn't work in the content page of the Master/Content design.

var rowID;

function RowClick(sender, eventArgs) {
    var radmenu = document.getElementByID('<%= Page.Master.FindControl("MainContent").FindControl("RadGrid1").Client.ID %>');
    if (radmenu.get_masterTableView().get_selectedItem()[0] != null) {
        rowID = radmenu.get_masterTableView().get_selectedItem()[0].getDataKeyValue("ID");
    }
}

<telerik:RadGrid ...
    <ClientSettings>
        <ClientEvent OnRowClick="RowClick"></ClientEvent>

Here I get the for the radGrid.get_masterTableView().get_selectedItem()[0].getDataKeyValue("ID"): The error is: Object doesn't support this property or method.  

Thanks,


Steve Holdorf 
Grid
Steve Holdorf
Top achievements
Rank 1
 answered on 11 Dec 2012
1 answer
36 views
Insert item to RadComboBox via Javascript error
I'm trying to add a new item to a RadComboBox via javascript and I'm getting a weird error.

it says "The object does not support such property or method" when doing "new Telerik.Web.UI.RadComboBoxItem()" 
It is really weird so I decided to open a "quiick watch" window and started to evaluate the Telerik.Web.UI object. As I expected, the "RadComboBoxItem" is not present.

How do I add an item to a RadComboBox via Javascript?

thanks

ComboBox
Gabriel
Top achievements
Rank 2
 answered on 11 Dec 2012
8 answers
159 views
RadGrid blanking out upon clicking on Edit
I have a RadGrid which is populated with data and when I click on edit, the whole grid blanks out

The current situation is this: I have a list box which has about 20 items, Upon selection on 1 item from the list box, the RadGrid will be populated with data and this whole process happens on the server side as I have programmed in a way where the code will look into the correct table and extract the information and populate them in the radgrid. But now i am facing challenges with the Edit functionality where the whole grid is blanking out. If i select another item from the list box, the radgrid populated back but this time, there are editable fields where i can edit. Any ideas on how i can fix this?

Thanks,
Swamy
Grid
Mahadevan
Top achievements
Rank 1
 answered on 11 Dec 2012
Narrow your results
Done
Selected tags
Tags
Grid
General Discussions
Editor
Scheduler
ComboBox
Ajax
Window
TreeView
Menu
Calendar
Chart (Obsolete)
TabStrip
Input
Dock
ToolTip
Upload (Obsolete)
AsyncUpload
WebParts for SharePoint
PanelBar
FileExplorer
Splitter
ListBox
Chart (HTML5)
Rotator
ListView
Button
ToolBar
TreeList
Sharepoint Integration
FormDecorator
Filter
Slider
ScriptManager and StyleSheetManager
UI for ASP.NET AJAX in ASP.NET MVC
AutoCompleteBox
PivotGrid
Installer and VS Extensions
Spell
Documentation and Tutorials
ImageEditor
Captcha
RibbonBar
DropDownList
OrgChart
Visual Style Builder
DropDownTree
Gantt
ColorPicker
Notification
BinaryImage
SkinManager
TileList
Wizard
SearchBox
Spreadsheet
Map
ImageGallery
Rating
DatePicker
MediaPlayer
XmlHttpPanel
Diagram
Compression
DataPager
SiteMap
CloudUpload
LightBox
Gauge
PageLayout
AjaxLoadingPanel
Navigation
SocialShare
DataForm
Persistence Framework
ClientExportManager
ProgressArea
TagCloud
CheckBox
AjaxPanel
Barcode
ClientDataSource
NumericTextBox
PdfViewer
DateTimePicker
MultiColumnComboBox
MultiSelect
MaskedTextBox
RadioButtonList
Theme Builder
Styling
ProgressBar
DateInput
Chat
ODataDataSource
Licensing
MonthYearPicker
TimePicker
LinkButton
ToggleButton
Accessibility
Label
Localization
TreeMap
Security
DateRangePicker
ImageButton
InputManager
Timeline
Card
Drawer
PushButton
Ticker
Signature
Avatar
Switch
Breadcrumb
SplitButton
DragDropManager
Stepper
FloatingActionButton
Chip
ChipList
AIPrompt
Badge
+? more
Top users last month
Rob
Top achievements
Rank 3
Iron
Iron
Iron
Atul
Top achievements
Rank 1
Iron
Iron
Iron
Alexander
Top achievements
Rank 1
Veteran
Iron
Serkan
Top achievements
Rank 1
Iron
Shawn
Top achievements
Rank 1
Iron
Iron
Want to show your ninja superpower to fellow developers?
Learn how
3316 3317
3318
3319 3320
Top users last month
Rob
Top achievements
Rank 3
Iron
Iron
Iron
Atul
Top achievements
Rank 1
Iron
Iron
Iron
Alexander
Top achievements
Rank 1
Veteran
Iron
Serkan
Top achievements
Rank 1
Iron
Shawn
Top achievements
Rank 1
Iron
Iron
Want to show your ninja superpower to fellow developers?
Learn how
Want to show your ninja superpower to fellow developers?
Learn how