Telerik Forums
UI for ASP.NET AJAX Forum
1 answer
61 views
Hi,
  I'm not able to start_edit() a new node at the 2nd Level client-side if the parent node does not have any child previously and this is the only child.
Attached is the demo application I've done.

at the node.startEdit() statement it throws an error as: "htmlfile: Can't move focus to the control because it is invisible, not enabled, or of a type that does not accept the focus."

to replicate the issue please try to add a new node at the 2nd level which does not have any children.

-Himanshu
Dimitar Terziev
Telerik team
 answered on 27 Apr 2011
3 answers
125 views
Hello,

It seems that the latest Release (2011 Q1) solved some of the issues with RadComboBox on IE9.

Though, There is still a problem with RTL support.

First time the control is loaded the selected item or the empty message are aligned to the left. only after
Selecting another item from the list, it fixes itself and then the item is aligned to the right as should be.

This behavior is happening in your demos as well. You can see that in the Right-To-Left demo the control
Loaded with the value "New York" selected and it aligned to the left, and after you choose another city
From the list, it fixes itself and get aligned to the right.

Do you have a solution for that wrong behavior ?

Regards,

Itamar
Helen
Telerik team
 answered on 27 Apr 2011
3 answers
212 views
Hello,

I am using Rad scheduler and it works fine for me in my local pc..
but when i publish same to sharepoint webpart it gives me following error when changing date of calender
Error: Sys.InvalidOperationException: Could not find UpdatePanel with ID . If it is being updated dynamically then it must be inside another UpdatePanel

means whe i change date or view from day to week or month ,..nothing updated
pls reply soon,

thanks,
bhora
Helen
Telerik team
 answered on 27 Apr 2011
37 answers
730 views
Hi,
I'm trying to figure out how to create something like the way you can add controls to pages in Sitefinity, by dragging a treeview node to DropZones.
I know how to just drag and drop a node to a DropZone and then create a RadDock in the controller that has the same ID as the "e.HtmlElementID".

But doing it this way doesn't work very well because I'm not dragging a RadDock so I can't choose where in the zone to put it because there is no interaction between the dragged node and the DropZone, like there is between a dragged RadDock and the DropZone.

Has anyone tried this and can point me in the right direction?

Edit: Should be RadDock in the title for this thread, not DropZone...
Pero
Telerik team
 answered on 27 Apr 2011
6 answers
76 views
When I add an event to the schedular and click the save button, it does not show the event i just enter,
can someone help me?
Veronica
Telerik team
 answered on 27 Apr 2011
1 answer
108 views
I am, on occasion (around 40% of the time), getting the following javascript error:

Uncaught TypeError: Cannot call method 'removeChild' of null - Telerik.WebUI.WebResource.axd:2897 My code has successfully completed an ajaxRequest to server side code:
        function OnClientClose(oWnd, args) {
 
            var arg = args.get_argument()
             
        if (arg!=null) {
 
            $find('<%# RadAjaxManager1.ClientID %>').ajaxRequest(arg);
          }
}
All actions appear to have completed correctly, however the loading panel is still showing (I'm using the default panel). It would appear that the LoadingPanel handlers are halting at the error and failing to remove the loadingpanels? Thanks R.
Iana Tsolova
Telerik team
 answered on 27 Apr 2011
14 answers
211 views
Dear All,
I am facing this problem whenever I am using RadAjaxPanel my javascript variables are not getting refreshed i.e they are not being initialized with default value. I am also not getting my RadAlert Boxes which I have added from code behind for Save and Delete purpose. Please help me in solving this problem. For your reference I am attaching the form code behind and aspx along with javascript.

Regards,
Noor Hussain
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="frmCurrencies.aspx.vb" Inherits="BNBERP.frmCurrencies" %>
<%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %>
 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 
<head runat="server">
    <title></title>
     
</head>
<body>
    <form id="form1" runat="server">
     
    <div>
        <telerik:RadScriptManager ID="RadScriptManager1" runat="server">
        </telerik:RadScriptManager>
        <telerik:RadWindowManager ID="RadWindowManager1" runat="server">
        </telerik:RadWindowManager>
        <telerik:RadAjaxManager ID="RadAjaxManager1" runat="server" DefaultLoadingPanelID="RadAjaxLoadingPanel2">
        <AjaxSettings>
        <telerik:AjaxSetting AjaxControlID="RadToolBar1">
        <UpdatedControls>
        <telerik:AjaxUpdatedControl ControlID="RadSplitter1"/>       
        </UpdatedControls>
        </telerik:AjaxSetting>
        </AjaxSettings>
        </telerik:RadAjaxManager>
        <telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel2" runat="server" Skin="Default">
        </telerik:RadAjaxLoadingPanel>      
        <telerik:RadCodeBlock ID="RadCodeBlock1" runat="server">
 
 
        <script type="text/javascript">
            //KeyDown for Alphabets
            function KeyDownAlphabetsOnly(e) {
 
 
                if (e.keyCode != 8 && e.keyCode != 32 && e.keyCode != 190) {
                    if (e.shiftKey) {
                        if (90 >= e.keyCode && e.keyCode >= 65) {
                            e.returnValue = true;
                        }
                        else {
 
                            e.returnValue = false;
                        }
                    }
                    else if (90 >= e.keyCode && e.keyCode >= 65) {
                        e.returnValue = true;
                    }
                    else {
 
                        e.returnValue = false;
                    }
                }
                else
                    e.returnValue = true;
            }
 
            //Keydown function for numbers only
            function KeyDownForNumbersOnly(e) {
 
                if (e.keyCode != 8) {
 
                    if (e.keyCode < 48 || e.keyCode > 57)
                        return false;
                    else if (e.shiftKey == 1)
                        return false;
                    else
 
                        return true;
                }
                return true;
            }
 
        //KeyPress Function for Alphabets only
            function AlphabetOnly(sender, eventArgs) {
                var c = eventArgs.get_keyCode();
                if ((c < 65) ||
       (c > 90 && c < 97) ||
       (c > 122))
                    eventArgs.set_cancel(true);
            }
 
            //KeyDown Function for Aplhanumeric fields
            function KeyDownAlphaNumeric(e) {
                 if (e.keyCode != 8) {
                    if (e.shiftKey) {
                        if (90 >= e.keyCode && e.keyCode >= 65) {
                            e.returnValue = true;
                        }
                        else {
 
                            e.returnValue = false;
                        }
                    }
                    else if (90 >= e.keyCode && e.keyCode >= 65) {
                        e.returnValue = true;
                    }
                    else if (57 >= e.keyCode && e.keyCode >= 48) {
                        e.returnValue = true;
                    }
                    else {
 
                        e.returnValue = false;
                    }
                }
                else
                    e.returnValue = true;
            }
            //Validation Function
            function OnClientClicking(sender, args) {
                var button = sender.get_text();
                //Closing the form
                if (button == "Ok") {
                    //Cancel the PostBack and return
                    args.set_cancel(true);
                    //Obtain a reference to the  parent window manager
                    var oManager = GetRadWindow().get_windowManager();
                    //Close the window
                    oManager.closeActiveWindow();
                }
 
                //Checking if any text is in the controls before closing the form on cancel event
                if (button == "Cancel") {
                    var button1 = $find("<%= btnAdd.ClientID %>");
                    var txtCurrCode = $find("<%= txtCurrencyCode.ClientID %>");
                    var txtCurrName = $find("<%= txtCurrencyName.ClientID %>");
                    var txtNumericCode = $find("<%= txtNumericCode.ClientID %>");
                    debugger
                    //Check if any text is there in the controls
                    if (txtCurrCode.isEmpty() != true || txtCurrName.isEmpty() != true || txtNumericCode.isEmpty() != true) {
                        if (button1.get_text() == "Add" || button1.get_text() == "Update") {
                            if (!clickCalledAfterRadconfirm) {
                                args.set_cancel(true);
                                lastClickedItem = sender;
                                radconfirm("Any unsaved data will be lost. Do you wish to continue ?", CancelconfirmCallbackFunction, 330, 100, null, 'Currencies');
                            }
                            else {
                                //Cancel the PostBack and return
                                args.set_cancel(true);
                                //Obtain a reference to the  parent window manager
                                var oManager = GetRadWindow().get_windowManager();
                                //Close the window
                                oManager.closeActiveWindow();
                            }
                        }
                        else {
                            //Cancel the PostBack and return
                            args.set_cancel(true);
                            //Obtain a reference to the  parent window manager
                            var oManager = GetRadWindow().get_windowManager();
                            //Close the window
                            oManager.closeActiveWindow();
                        }
                    }
                    else {
                        //Cancel the PostBack and return
                        args.set_cancel(true);
                        //Obtain a reference to the  parent window manager
                        var oManager = GetRadWindow().get_windowManager();
                        //Close the window
                        oManager.closeActiveWindow();
                    }
                }                 
                   
                //Validation Starts here
                if (button == "Add" || button == "Update") {
                    //Check for Currency Code empty
                    var txtCurrCode = $find("<%= txtCurrencyCode.ClientID %>");
                    if (txtCurrCode.isEmpty() == true) {
                        //Set the Focus
                        txtCurrCode.focus();
                        //Show the alert message
                        radalert('Please enter the Currency Code.', 330, 100, 'Currencies');
                        return false;
                         
                    }
 
                    //Check for Currency Name empty
                    var txtCurrName = $find("<%= txtCurrencyName.ClientID %>");
                    if (txtCurrName.isEmpty() == true) {
                        //Show the alert message
                        radalert('Please enter the Currency Name.', 330, 100, 'Currencies');
                        return false;
                        //Set the Focus
                        txtCurrName.focus();
 
                    }
                }
            }
 
 
 
            //Confirmation messagebox function
 
            var lastClickedItem = null;           
            var clickCalledAfterRadconfirm = false;
            function onClientButtonClicking(sender, args) {
            //Confirmation Messagebox for Delete button
                if (args.get_item().get_index() == "3") {
                    if (!clickCalledAfterRadconfirm) {
                        args.set_cancel(true);
                        lastClickedItem = args.get_item();
                        radconfirm("Are you sure you want to delete the currency?", confirmCallbackFunction,330, 100, null, 'Currencies');
                    }
                }
                //Confirmation Messagebox for Browse,Add,Search button
                if (args.get_item().get_index() == "0" || args.get_item().get_index() == "1" || args.get_item().get_index() == "4" || args.get_item().get_index() == "5" || args.get_item().get_index() == "6" || args.get_item().get_index() == "7") {
                    var button = $find("<%= btnAdd.ClientID %>");
                    var txtCurrCode = $find("<%= txtCurrencyCode.ClientID %>");
                    var txtCurrName = $find("<%= txtCurrencyName.ClientID %>");
                    var txtNumericCode = $find("<%= txtNumericCode.ClientID %>");              
                    //Check if any text is there in the controls
                    if (txtCurrCode.isEmpty() != true || txtCurrName.isEmpty() != true || txtNumericCode.isEmpty() != true) {
                        if (button.get_text() == "Add" || button.get_text() == "Update") {
                            if (!clickCalledAfterRadconfirm) {
                                args.set_cancel(true);
                                lastClickedItem = args.get_item();
                                radconfirm("Any unsaved data will be lost. Do you wish to continue ?", confirmCallbackFunction, 330, 100, null, 'Currencies');
                            }
                        }
                     
                    }
                }
            }
 
            //Call Back function for Confirmation Messagebox
            function confirmCallbackFunction(args) {
                         if (args) {
                    clickCalledAfterRadconfirm = true;
                    lastClickedItem.click();
                }
                else
                    clickCalledAfterRadconfirm = false;
                lastClickedItem = null;
            }
 
            //Call Back function for Cancel Confirmation Messagebox
            function CancelconfirmCallbackFunction(args) {
                 
                if (args) {
                    clickCalledAfterRadconfirm = true;
                    //lastClickedItem.click();
                    //Obtain a reference to the  parent window manager
                    var oManager = GetRadWindow().get_windowManager();
                    //Close the window
                    oManager.closeActiveWindow();
                }
                else
                    clickCalledAfterRadconfirm = false;
                lastClickedItem = null;
            }
            
            //Get a reference to existing window
            function GetRadWindow() {
                var oWindow = null;
                if (window.radWindow)
                    oWindow = window.radWindow;
                else if (window.frameElement.radWindow)
                    oWindow = window.frameElement.radWindow;
                return oWindow;
            }          
             
                       
        </script>          
        </telerik:RadCodeBlock>
    <telerik:RadSplitter runat="Server" ID="RadSplitter1" Width="100%" BorderSize="0"
            BorderStyle="Inset" PanesBorderSize="1" Orientation="Horizontal"
            VisibleDuringInit="false">
        <telerik:RadPane ID="RadPane1" runat="server">      
            <%--<telerik:RadAjaxPanel ID="RadAjaxPanel1" runat="server" LoadingPanelID="RadAjaxLoadingPanel1"> --%>     
             <telerik:RadToolBar ID="RadToolBar1" runat="server" Width="99%"
                Height="22px" style="position:absolute;top:1px; left:1px" OnClientButtonClicking="onClientButtonClicking">
            <Items>
                <telerik:RadToolBarButton ToolTip="NEW" ImageUrl="../Images/add.png" />                       
                        <telerik:RadToolBarButton ToolTip="SEARCH" ImageUrl="../Images/search16.png" />
                        <telerik:RadToolBarButton ToolTip="EDIT" ImageUrl="../Images/edit.png" />
                        <telerik:RadToolBarButton ToolTip="DELETE" ImageUrl="../Images/del.png" />                   
                        <telerik:RadToolBarButton ToolTip="FIRST" ImageUrl="../Images/first16.png" />
                        <telerik:RadToolBarButton ToolTip="PREVIOUS" ImageUrl="../Images/back16.png" />
                        <telerik:RadToolBarButton ToolTip="NEXT" ImageUrl="../Images/play16.png" />
                        <telerik:RadToolBarButton ToolTip="LAST" ImageUrl="../Images/last16.png" />
                        <telerik:RadToolBarButton ToolTip="SAVE AS" ImageUrl="../Images/saveas.gif" />
                        <telerik:RadToolBarButton ToolTip="BASE-DOCUMENT" ImageUrl="../Images/baseDoc.png" />
                        <telerik:RadToolBarButton ToolTip="TARGET-DOCUMENT" ImageUrl="../Images/targetDoc.png" />
                        <telerik:RadToolBarButton ToolTip="PRINT-PREVIEW" ImageUrl="../Images/print_preview.png" />
                        <telerik:RadToolBarButton ToolTip="PRINT" ImageUrl="../Images/Printer.png" />
                        <telerik:RadToolBarButton ToolTip="COPY-TO" ImageUrl="../Images/copyTo.png" />
                        <telerik:RadToolBarButton ToolTip="COPY-FROM" ImageUrl="../Images/copyFrom.png" />                       
                         
            </Items>
             
         </telerik:RadToolBar>
      
         <div style="margin-left:30px; margin-top:50px;font-size:11px;">
            <table>
                           <tr>
                              <td width="110px"><span style="color: #0F3789;">Currency Code</span> </td>
                              <td width="250px">
                                  <telerik:RadTextBox ID="txtCurrencyCode" runat="server" width="200px"
                                      MaxLength="25" onkeydown="return KeyDownAlphaNumeric(event)"></telerik:RadTextBox>
                              </td>                                         
                           </tr>
                           <tr>
                               <td><span style="color: #0F3789;">Currency Name</span></td>
                               <td><telerik:RadTextBox ID="txtCurrencyName" runat="server" width="200px"
                                       MaxLength="100" >
                                       <ClientEvents OnKeyPress="AlphabetOnly" />
                                       </telerik:RadTextBox>                                   
                                      </td>
                           </tr
                            <tr>
                               <td><span style="color: #0F3789;">International Code</span></td>
                               <td><telerik:RadTextBox ID="txtNumericCode" runat="server" width="200px"
                                       MaxLength="50" onkeydown="return KeyDownAlphaNumeric(event)" /></td>
                           </tr>
                           <tr>
                           <td>
                               <telerik:RadButton ID="btnAdd" runat="server" Text="Add" OnClientClicking="OnClientClicking" Width="50px">
                               </telerik:RadButton>
                           </td>
                           <td><telerik:RadButton ID="btnCancel" runat="server" Text="Cancel" OnClientClicking="OnClientClicking" Width="50px">
                               </telerik:RadButton></td>
                           </tr>                                                        
                        </table>
         </div>
         <%--</telerik:RadAjaxPanel>--%>
    </telerik:RadPane>   
  </telerik:RadSplitter>
   
    </div>
 
    </form>
</body>
</html>
Imports BNB.ELL
Imports BNB.BLL
Imports BNB.DAL
Public Class frmCurrencies
    Inherits System.Web.UI.Page
 
#Region "Variable Decleration"
 
    ''' <summary>
    ''' Entity Layer Object Initialisation
    ''' </summary>
    ''' <remarks></remarks>
    Public objELCurrencies As New ELCurrencies
 
    ''' <summary>
    ''' Business Layer Object Initialisation
    ''' </summary>
    ''' <remarks></remarks>
    Public objBLCurrencies As New BLCurrencies
 
    ''' <summary>
    ''' Data Layer Object Initialisation
    ''' </summary>
    ''' <remarks></remarks>
    Public objDLCurrencies As New DLCurrencies
 
    ''' <summary>
    ''' Dataset to hold the browsing data
    ''' </summary>
    ''' <remarks></remarks>
    Public dsBrowse As DataSet
 
 
    Public rowNum As Integer
 
#End Region
 
#Region "Methods"
 
    ''' <summary>
    ''' This method is used to clear the controls
    ''' </summary>
    ''' <remarks></remarks>
    Private Sub ClearControls()
        txtCurrencyCode.Text = ""
        txtCurrencyName.Text = ""
        txtNumericCode.Text = ""
    End Sub
 
    ''' <summary>
    ''' This Method is used for enabling or disabling controls
    ''' </summary>
    ''' <param name="enabledisable">True:Enables the controls
    ''' False:Disables the controls</param>
    ''' <remarks>True:Enables the controls
    ''' False:Disables the controls</remarks>
    Private Sub EnableDisableControls(ByVal enabledisable As Boolean)
        txtCurrencyCode.Enabled = enabledisable
        txtCurrencyName.Enabled = enabledisable
        txtNumericCode.Enabled = enabledisable
 
    End Sub
    ''' <summary>
    ''' This Method is used to set the form mode
    ''' </summary>
    ''' <param name="mode">0:New Mode
    ''' 1:Search Mode
    ''' 2:Browse Mode
    ''' 3:Edit Mode</param>
    ''' <remarks>Pass Integer Value</remarks>
    Private Sub FormMode(ByVal mode As Integer)
        Select Case mode
            Case "0" 'Add Mode
                'Disable New Record
                RadToolBar1.Items(0).Enabled = False
                'Disable Save As
                RadToolBar1.Items(8).Enabled = False
                'Disable Base Document
                RadToolBar1.Items(9).Enabled = False
                'Disable Target Document
                RadToolBar1.Items(10).Enabled = False
                'Disable Print Preview Document
                RadToolBar1.Items(11).Enabled = False
                'Disable Print
                RadToolBar1.Items(12).Enabled = False
                'Disable Copy To
                RadToolBar1.Items(13).Enabled = False
                'Disable Copy From
                RadToolBar1.Items(14).Enabled = False
 
                'Disable Delete
                RadToolBar1.Items(3).Enabled = False
 
                'Disable Edit
                RadToolBar1.Items(2).Enabled = False
 
                'Enable the Search
                RadToolBar1.Items(1).Enabled = True
 
                'Change the button text to Add
                btnAdd.Text = "Add"
 
                'Focus the Main Textbox
                txtCurrencyCode.Focus()
 
            Case "1" 'Find Mode
                'Disable the Search
                RadToolBar1.Items(1).Enabled = False
                'Enable the New
                RadToolBar1.Items(0).Enabled = True
                'Disable Save As
                RadToolBar1.Items(8).Enabled = False
                'Disable Base Document
                RadToolBar1.Items(9).Enabled = False
                'Disable Target Document
                RadToolBar1.Items(10).Enabled = False
                'Disable Print Preview Document
                RadToolBar1.Items(11).Enabled = False
                'Disable Print
                RadToolBar1.Items(12).Enabled = False
                'Disable Copy To
                RadToolBar1.Items(13).Enabled = False
                'Disable Copy From
                RadToolBar1.Items(14).Enabled = False
                'Disable the Delete
                RadToolBar1.Items(3).Enabled = False
                'Disable the Edit
                RadToolBar1.Items(2).Enabled = False
 
 
                'Change the text to Search
                btnAdd.Text = "Search"
                'Focus the Main Textbox
                txtCurrencyCode.Focus()
 
 
            Case "2" 'Browse Mode
                'Enable the New
                RadToolBar1.Items(1).Enabled = True
                'Enable the Search
                RadToolBar1.Items(0).Enabled = True
                'Enable the Edit
                RadToolBar1.Items(2).Enabled = True
                'Enable the Save As
                RadToolBar1.Items(8).Enabled = True
                'Disable Print Preview Document
                RadToolBar1.Items(11).Enabled = True
                'Disable Print
                RadToolBar1.Items(12).Enabled = True
                'Enable the Delete
                RadToolBar1.Items(3).Enabled = True
 
                'Change the text to Ok
                btnAdd.Text = "Ok"
 
 
            Case "3" 'Edit Mode
                'Disable Save As
                RadToolBar1.Items(8).Enabled = False
                'Disable Base Document
                RadToolBar1.Items(9).Enabled = False
                'Disable Target Document
                RadToolBar1.Items(10).Enabled = False
                'Disable Print Preview Document
                RadToolBar1.Items(11).Enabled = False
                'Disable Print
                RadToolBar1.Items(12).Enabled = False
                'Disable Copy To
                RadToolBar1.Items(13).Enabled = False
                'Disable Copy From
                RadToolBar1.Items(14).Enabled = False
                'Disable the Delete
                RadToolBar1.Items(3).Enabled = False
                'Disable the Edit
                RadToolBar1.Items(2).Enabled = False
                'Change the text to Ok
                btnAdd.Text = "Update"
 
 
 
        End Select
 
    End Sub
 
#End Region
 
#Region "Properties"
 
 
#End Region
 
#Region "Events"
 
    ''' <summary>
    ''' Event for Page Load
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks>Page Initialisation Code</remarks>
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Page.IsPostBack = False Then
            Try
                'Set the Form Mode to New
                FormMode(0)
 
                'Enable Controls
                EnableDisableControls(True)
 
                'Set the focus
                txtCurrencyCode.Focus()
 
            Catch ex As Exception
 
            Finally
 
            End Try
        End If
    End Sub
 
    ''' <summary>
    ''' ToolBar Event
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub RadToolBar1_ButtonClick(ByVal sender As Object, ByVal e As Telerik.Web.UI.RadToolBarEventArgs) Handles RadToolBar1.ButtonClick
        Try
            Select Case e.Item.Index
 
                Case "0" 'New Button
 
                    'Set The Form Mode
                    FormMode(0)
 
                    'Clear the controls
                    ClearControls()
 
                    'Enable Controls
                    EnableDisableControls(True)
 
                    'Set the focus
                    txtCurrencyCode.Focus()
 
                Case "1" 'Search Button
 
                    FormMode(1)
 
                    'Clear Controls
                    ClearControls()
 
                    'Enable Controls
                    EnableDisableControls(True)
 
                    'Set the Focus
                    txtCurrencyCode.Focus()
 
                Case "2" 'Edit Button
 
                    FormMode(3)
 
                    'Enable Controls
                    EnableDisableControls(True)
 
                    'Disable the Primary key field
                    txtCurrencyCode.Enabled = False
 
                    'Set the Focus
                    txtCurrencyName.Focus()
 
                Case "3" 'Delete Button
                    ' Call the Entity Layer
                    objELCurrencies.CurrencyCode = txtCurrencyCode.Text
                    'Call Business Layer Update Method
                    If objBLCurrencies.Delete(objELCurrencies) = True Then
 
                        'Display the Message to user                      
                        Dim radalertscript As String = "<script language='javascript'>function f(){radalert('Record Deleted Sucessfully', 330, 100,'Currencies'); Sys.Application.remove_load(f);}; Sys.Application.add_load(f);</script>"
                        Page.ClientScript.RegisterStartupScript(Me.[GetType](), "Deleteradalert", radalertscript)
 
                        'Set the Form mode to search
                        FormMode(1)
 
                        'Clear Controls
                        ClearControls()
 
                        'Enable Controls
                        EnableDisableControls(True)
 
                        'Set the Focus
                        txtCurrencyCode.Focus()
                    Else
 
                    End If
 
 
                Case "4" 'First Record Browse button
 
                    'Enable Controls
                    EnableDisableControls(True)
 
                    'Intialise the DataSet
                    dsBrowse = New DataSet()
 
                    'get the data
                    dsBrowse = objDLCurrencies.GetAllData()
 
                    'Set the first record data
                    txtCurrencyCode.Text = dsBrowse.Tables(0).Rows(0)(0).ToString()
                    txtCurrencyName.Text = dsBrowse.Tables(0).Rows(0)(1).ToString()
                    txtNumericCode.Text = dsBrowse.Tables(0).Rows(0)(2).ToString()
 
                    'Set the form mode
                    FormMode(2)
 
                    'Disable the Controls
                    EnableDisableControls(False)
 
                Case "5" 'Previous record Browse button
                    'Intialise the DataSet
                    dsBrowse = New DataSet()
 
                    'get the data
                    dsBrowse = objDLCurrencies.GetPreviousRecord(txtCurrencyCode.Text)
 
                    txtCurrencyCode.Text = dsBrowse.Tables(0).Rows(dsBrowse.Tables(0).Rows.Count - 1)(0).ToString
                    txtCurrencyName.Text = dsBrowse.Tables(0).Rows(dsBrowse.Tables(0).Rows.Count - 1)(1).ToString
                    txtNumericCode.Text = dsBrowse.Tables(0).Rows(dsBrowse.Tables(0).Rows.Count - 1)(2).ToString
 
                    'Set the form mode
                    FormMode(2)
 
                    'Disable the Controls
                    EnableDisableControls(False)
 
 
                Case "6" 'Next record Browse button
                    'Intialise the DataSet
                    dsBrowse = New DataSet()
 
                    'get data
                    dsBrowse = objDLCurrencies.GetPreviousRecord(txtCurrencyCode.Text)
 
                    txtCurrencyCode.Text = dsBrowse.Tables(0).Rows(dsBrowse.Tables(0).Rows.Count - 1)(0).ToString
                    txtCurrencyName.Text = dsBrowse.Tables(0).Rows(dsBrowse.Tables(0).Rows.Count - 1)(1).ToString
                    txtNumericCode.Text = dsBrowse.Tables(0).Rows(dsBrowse.Tables(0).Rows.Count - 1)(2).ToString
 
                    'Set the form mode
                    FormMode(2)
 
                    'Disable the Controls
                    EnableDisableControls(False)
 
                Case "7" 'Last record Browse button
                    'row Number
                    Dim rowNum As Integer = 0
                    'Intialise the DataSet
                    dsBrowse = New DataSet()
 
                    'get the data
                    dsBrowse = objDLCurrencies.GetAllData()
                    rowNum = dsBrowse.Tables(0).Rows.Count - 1
 
                    'Set the last record data
                    txtCurrencyCode.Text = dsBrowse.Tables(0).Rows(rowNum)(0).ToString()
                    txtCurrencyName.Text = dsBrowse.Tables(0).Rows(rowNum)(1).ToString()
                    txtNumericCode.Text = dsBrowse.Tables(0).Rows(rowNum)(2).ToString()
 
                    'Set the form mode
                    FormMode(2)
 
                    'Disable the Controls
                    EnableDisableControls(False)
 
                Case "8" 'Save As
 
                    'Set the form mode to Add
                    FormMode(0)
 
                    'Enable the Controls
                    EnableDisableControls(True)
 
                    'Clear the Primary Key field and set focus
                    txtCurrencyCode.Text = String.Empty
                    txtCurrencyCode.Focus()
 
            End Select
        Catch ex As Exception
 
        End Try
    End Sub
#End Region
 
 
 
 
 
    Private Sub btnAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAdd.Click
        Try
            Select Case btnAdd.Text
                Case "Add"
                    'Call the Entity Layer
                    objELCurrencies.CurrencyCode = txtCurrencyCode.Text
                    objELCurrencies.CurrencyName = txtCurrencyName.Text
                    objELCurrencies.CurrencyInternationalCode = txtNumericCode.Text
                    objELCurrencies.UserCode = ""
                    objELCurrencies.URI = ""
                    objELCurrencies.CreateDate = DateTime.Now
                    objELCurrencies.UpdateDate = DateTime.Now
 
                    'Call Business Layer Create Method
                    If objBLCurrencies.Create(objELCurrencies) = True Then
 
 
                        'Display the Message to user
                        Dim radalertscript As String = "<script language='javascript'>function f(){radalert('Record Saved Sucessfully', 330, 100,'Currencies'); Sys.Application.remove_load(f);}; Sys.Application.add_load(f);</script>"
                        Page.ClientScript.RegisterStartupScript(Me.[GetType](), "radalert", radalertscript)
 
                        'Clear the controls
                        ClearControls()
                        'Set the form mode
                        FormMode(0)
                        'set the form mode
                        txtCurrencyCode.Focus()
                    Else
 
                    End If
                Case "Update"
                    'Call the Entity Layer
                    objELCurrencies.CurrencyCode = txtCurrencyCode.Text
                    objELCurrencies.CurrencyName = txtCurrencyName.Text
                    objELCurrencies.CurrencyInternationalCode = txtNumericCode.Text
                    objELCurrencies.UserCode = ""
                    objELCurrencies.URI = ""
                    objELCurrencies.CreateDate = DateTime.Now
                    objELCurrencies.UpdateDate = DateTime.Now
 
                    'Call Business Layer Update Method
                    If objBLCurrencies.Update(objELCurrencies) = True Then
 
 
 
                        'Display the Message to user                      
                        Dim radalertscript As String = "<script language='javascript'>function f(){radalert('Record Updated Sucessfully', 330, 100,'Currencies'); Sys.Application.remove_load(f);}; Sys.Application.add_load(f);</script>"
                        Page.ClientScript.RegisterStartupScript(Me.[GetType](), "Updateradalert", radalertscript)
 
                        'Set the Form Mode
                        FormMode(2)
 
                        'Disable Controls
                        EnableDisableControls(False)
 
                    Else
 
                    End If
 
                Case "Ok"
 
                Case "Search"
                    If txtCurrencyCode.Text <> String.Empty Or txtCurrencyName.Text <> String.Empty Or txtNumericCode.Text <> String.Empty Then
                        'Intialise the DataSet
                        dsBrowse = New DataSet()
 
                        'get the data
                        dsBrowse = objDLCurrencies.SearchRecord(txtCurrencyCode.Text, txtCurrencyName.Text, txtNumericCode.Text)
 
                        'Set the first record data
                        txtCurrencyCode.Text = dsBrowse.Tables(0).Rows(0)(0).ToString()
                        txtCurrencyName.Text = dsBrowse.Tables(0).Rows(0)(1).ToString()
                        txtNumericCode.Text = dsBrowse.Tables(0).Rows(0)(2).ToString()
                        txtCurrencyCode.Enabled = False
 
                        'Set the form mode
                        FormMode(2)
 
                        'Disable Controls
                        EnableDisableControls(False)
 
                    End If
 
            End Select
        Catch ex As Exception
        Finally
        End Try
    End Sub
 
 
End Class
Noor hussain
Top achievements
Rank 1
 answered on 27 Apr 2011
4 answers
150 views
Hi,

I am using two radlistbox. transferToDestination working correctly. but transferFromDestination is not working.

I have attached my code here,,,
   <telerik:RadListBox
        runat="server" ID="RadListBoxSource"
        Height="200px" Width="200px"
        AllowTransfer="true" TransferToID="RadListBoxDestination" AllowReorder="true" OnClientItemDoubleClicked="setText">
        <Items>
            <telerik:RadListBoxItem Text="Argentina" />
            <telerik:RadListBoxItem Text="Australia" />
            <telerik:RadListBoxItem Text="Brazil" />
            <telerik:RadListBoxItem Text="Canada" />           
            <telerik:RadListBoxItem Text="India" />         
        </Items>
    </telerik:RadListBox>
    
    <telerik:RadListBox
        runat="server" ID="RadListBoxDestination" OnClientItemDoubleClicked="returnText"
        Height="200px" Width="200px" />


javascript
------------
   function setText(sender, args) {
                var val = args.get_item().get_value();      
                    sender.transferToDestination(args.get_item());            
                }

                function returnText(sender, args) {
                    var val = args.get_item().get_value();
                    sender.transferFromDestination(args.get_item());
                }

Please check code. i want two suggestion,
1. how to transferFromDestination in client side
2. if working transferFromDestination means first radlistbox display same order (whatever order displaying when page loaded.)

Please give me tips for these two things,

Thanks in Advance,
Dhamu
Shinu
Top achievements
Rank 2
 answered on 27 Apr 2011
2 answers
67 views
When using this demo (see link below), I need it to reset to the originally selected tab:

http://demos.telerik.com/aspnet-ajax/tabstrip/examples/applicationscenarios/tabspreview/defaultcs.aspx

TIA!
Rich Coleman
Top achievements
Rank 1
 answered on 27 Apr 2011
2 answers
103 views
Hi All

I currently have a series of grids inside tabs, When the user clicks on a button this sets focus to the related Tab/Grid and opens a specific Radwindow for user to input data,

However i have added some child tabs lets say Child1 Child 2 Child 3 with a parent of Parent4 when i try to select Child2 as below

tabStrip.findTabByText('Child1').set_selected(true);

It will Select the parent4 tab but will not show the Child tabs below it, It does however show the correct pageview for Child1 below Parent4,

The only way i can get this to function correctly is as below
tabStrip.findTabByText('Parent4').set_selected(true);
tabStrip.findTabByText('Child1').set_selected(true);

My question: is there another way to select Child1 and show Parent4 and Child1 as selected.

Many Thanks

Regards

Cush
Cush
Top achievements
Rank 1
 answered on 27 Apr 2011
Narrow your results
Selected tags
Tags
+? more
Top users last month
Jay
Top achievements
Rank 3
Bronze
Iron
Iron
yw
Top achievements
Rank 2
Iron
Iron
Stefan
Top achievements
Rank 2
Iron
Iron
Iron
Kao Hung
Top achievements
Rank 1
Iron
Bohdan
Top achievements
Rank 2
Iron
Iron
Iron
Want to show your ninja superpower to fellow developers?
Top users last month
Jay
Top achievements
Rank 3
Bronze
Iron
Iron
yw
Top achievements
Rank 2
Iron
Iron
Stefan
Top achievements
Rank 2
Iron
Iron
Iron
Kao Hung
Top achievements
Rank 1
Iron
Bohdan
Top achievements
Rank 2
Iron
Iron
Iron
Want to show your ninja superpower to fellow developers?
Want to show your ninja superpower to fellow developers?