or
<telerik:RadAjaxPanel ID="pnl" runat="server"> <telerik:RadTreeList ID="rdlMenu" Skin="Office2007" runat="server" DataKeyNames="Id" ParentDataKeyNames="ParentId" AutoGenerateColumns="false" OnItemCommand="rdlMenu_ItemCommand" OnNeedDataSource="rdlMenu_NeedDataSource" OnInsertCommand="rdlMenu_InsertCommand" OnItemCreated="rdlMenu_ItemCreated"> <Columns> <telerik:TreeListEditCommandColumn UniqueName="InsertCommandColumn" ButtonType="ImageButton" ShowEditButton="false" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Center" HeaderStyle-Width="80px"></telerik:TreeListEditCommandColumn> <telerik:TreeListBoundColumn DataField="Id" UniqueName="Id" HeaderText="Id" Display="false"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="ParentId" UniqueName="ParentId" HeaderText="ParentId" Display="false"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="Position" UniqueName="Position" HeaderText="Position"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="Description" UniqueName="Description" HeaderText="Descriptionn"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="URL" UniqueName="URL" HeaderText="URL"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="Division" UniqueName="Division" HeaderText="Division"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="Escalation" UniqueName="Escalation" HeaderText="Escalation"> </telerik:TreeListBoundColumn> <telerik:TreeListBoundColumn DataField="IsPortalAdmin" UniqueName="IsPortalAdmin" HeaderText="IsPortalAdmin"> </telerik:TreeListBoundColumn> <telerik:TreeListButtonColumn CommandName="Edit" Text="Edit" UniqueName="EditCommandColumn" ButtonType="ImageButton" ItemStyle-HorizontalAlign="Center" HeaderStyle-Width="80px"></telerik:TreeListButtonColumn> <telerik:TreeListButtonColumn UniqueName="DeleteCommandColumn" Text="Delete" CommandName="Delete" ButtonType="ImageButton" ItemStyle-HorizontalAlign="Center" HeaderStyle-Width="80px"></telerik:TreeListButtonColumn> </Columns> <EditFormSettings EditFormType="Template"> <FormTemplate> <div class="editTemplate"> <asp:HiddenField ID="hdnId" runat="server" Value='<%# Bind("Id") %>' /> <asp:HiddenField ID="hdnParentId" runat="server" Value='<%# Bind("ParentId") %>' /> <table> <tr> <td>Position</td> <td> <asp:TextBox ID="txtPosition" Text='<%# Bind("Position") %>' runat="server" Width="30px"> </asp:TextBox></td> </tr> <tr> <td>Description: </td> <td colspan="2"> <asp:TextBox ID="txtDescription" Text='<%# Bind("Description") %>' runat="server" Width="100%"> </asp:TextBox> </td> <td></td> </tr> <tr> <td>URL: </td> <td colspan="3"> <asp:TextBox ID="txtURL" Text='<%# Bind("URL") %>' runat="server" Width="100%"> </asp:TextBox> </td> <td></td> <td></td> </tr> <tr> <td>Division: </td> <td> <asp:TextBox ID="txtDivision" Text='<%# Bind("Division") %>' runat="server" Width="100%"> </asp:TextBox> </td> <td>Escalation: </td> <td> <asp:TextBox ID="TextBox4" Text='<%# Bind("Escalation") %>' runat="server"> </asp:TextBox> </td> </tr> <tr> <td></td> <td>IsPortalAdmin: <asp:CheckBox ID="chkAdmin" runat="server" /> </td> <td></td> <td> <telerik:RadButton ID="btnUpdate" Text='<%# (Container is TreeListEditFormInsertItem) ? "Insert" : "Update" %>' runat="server" CommandName='<%# (Container is TreeListEditFormInsertItem) ? "PerformInsert" : "Update" %>' Icon-PrimaryIconCssClass="rbOk"> </telerik:RadButton> <telerik:RadButton ID="btnCancel" Text="Cancel" runat="server" CausesValidation="False" CommandName="Cancel" Icon-PrimaryIconCssClass="rbCancel"> </telerik:RadButton> </td> </tr> </table> </div> </FormTemplate> </EditFormSettings> </telerik:RadTreeList>
EnableEventValidation
="false" on the Main page; as the RadGrid is running on a user controler inside the Admin page here is the code and HTML of the user controler...
| <%@ Control Language="VB" AutoEventWireup="false" CodeFile="PersonAdmin.ascx.vb" Inherits="PersonAdmin" %> |
| <%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %> |
| <script language="javascript" type="text/javascript"> |
| Sys.Application.add_load(function() |
| { |
| var form = Sys.WebForms.PageRequestManager.getInstance()._form; |
| formform._initialAction = form.action = window.location.href; |
| }); |
| </script> |
| <table> |
| <tr> |
| <td style="width: 3px"> |
| </td> |
| <td bgcolor="#ce9426"> |
| <strong><span style="font-size: 10pt; color: white">Phone Personnal Admin</span></strong></td> |
| </tr> |
| <tr> |
| <td style="width: 3px"> |
| </td> |
| <td> |
| <asp:Label ID="lblResult" runat="server" ForeColor="#C04000"></asp:Label></td> |
| </tr> |
| <tr> |
| <td style="width: 3px"> |
| </td> |
| <td> |
| <telerik:RadGrid ID="rgPersonAdmin" runat="server" AllowSorting="True" |
| AutoGenerateColumns="False" GridLines="None" Skin="WebBlue" OnItemCommand="rgPersonAdmin_ItemCommand" OnPreRender="rgPersonAdmin_PreRender"> |
| <MasterTableView CommandItemDisplay="Top" DataKeyNames="PersonID,PersonIndic,DepName,DepUniID,ContactUniID,RelationUniID"> |
| <Columns> |
| <telerik:GridBoundColumn DataField="PersonID" Display="False" HeaderText="PersonID" |
| ReadOnly="True" UniqueName="PersonID"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="DepUniID" Display="False" HeaderText="DepUniID" |
| ReadOnly="True" UniqueName="DepUniID"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="ContactUniID" Display="False" HeaderText="ContactUniID" |
| ReadOnly="True" UniqueName="ContactUniID"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="RelationUniID" Display="False" HeaderText="RelationUniID" |
| ReadOnly="True" UniqueName="RelationUniID"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="ContactType" Display="False" HeaderText="ContactType" |
| ReadOnly="True" UniqueName="ContactType"> |
| </telerik:GridBoundColumn> |
| <telerik:GridEditCommandColumn HeaderText="Edit" UniqueName="EditCommandColumn1"> |
| </telerik:GridEditCommandColumn> |
| <telerik:GridTemplateColumn HeaderText="LastName" SortExpression="LastName" UniqueName="TemplateColumn"> |
| <ItemTemplate> |
| <asp:Label ID="lblLastName" runat="server" Text='<%# Eval("LastName") %>'></asp:Label> |
| </ItemTemplate> |
| <EditItemTemplate> |
| <asp:TextBox ID="tbLastName" runat="server" Text='<%# Bind("LastName") %>'></asp:TextBox><span |
| style="color: Red">*</span> |
| <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="tbLastName" |
| ErrorMessage="This field is required"> |
| </asp:RequiredFieldValidator> |
| </EditItemTemplate> |
| </telerik:GridTemplateColumn> |
| <telerik:GridBoundColumn DataField="FirstName" HeaderText="First Name" UniqueName="FirstName"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="EmployeeID" HeaderText="EmployeeID" UniqueName="EmployeeID"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="Ext" HeaderText="Ext" UniqueName="Ext"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="Pager" HeaderText="Pager/Mobile" UniqueName="Pager"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="Office" HeaderText="Office" UniqueName="Office"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="Fax" HeaderText="Fax" UniqueName="Fax"> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn DataField="IP" HeaderText="IP" UniqueName="IP"> |
| </telerik:GridBoundColumn> |
| <telerik:GridTemplateColumn DataField="DepName" HeaderText="Dep Name" UniqueName="DepName"> |
| <ItemTemplate> |
| <asp:Label ID="lblDep" runat="server"></asp:Label> |
| </ItemTemplate> |
| <EditItemTemplate> |
| <asp:DropDownList ID="DepNameddl" runat="server"> |
| </asp:DropDownList> |
| </EditItemTemplate> |
| </telerik:GridTemplateColumn> |
| <telerik:GridBoundColumn DataField="Role" HeaderText="Role" UniqueName="Role"> |
| </telerik:GridBoundColumn> |
| <telerik:GridTemplateColumn AllowFiltering="False" DataField="PersonIndic" HeaderText="Active" |
| UniqueName="PersonIndic"> |
| <ItemTemplate> |
| <asp:CheckBox ID="cbPersonIndic" runat="server" Enabled="false" /> |
| </ItemTemplate> |
| <EditItemTemplate> |
| <asp:CheckBox ID="PersonIndicCB" runat="server" Checked='<%# Bind("PersonIndic")%>' /> |
| </EditItemTemplate> |
| </telerik:GridTemplateColumn> |
| </Columns> |
| <RowIndicatorColumn Visible="False"> |
| <HeaderStyle Width="20px" /> |
| </RowIndicatorColumn> |
| <ExpandCollapseColumn Visible="False"> |
| <HeaderStyle Width="19px" /> |
| </ExpandCollapseColumn> |
| </MasterTableView> |
| </telerik:RadGrid></td> |
| </tr> |
| <tr> |
| <td style="width: 3px"> |
| </td> |
| <td> |
| <telerik:RadAjaxManagerProxy ID="RadAjaxManagerProxy1" runat="server"> |
| <AjaxSettings> |
| <telerik:AjaxSetting AjaxControlID="rgPersonAdmin"> |
| <UpdatedControls> |
| <telerik:AjaxUpdatedControl ControlID="rgPersonAdmin" LoadingPanelID="RadAjaxLoadingPanel1" /> |
| <telerik:AjaxUpdatedControl ControlID="RadWindowManager1" LoadingPanelID="RadAjaxLoadingPanel1" /> |
| </UpdatedControls> |
| </telerik:AjaxSetting> |
| </AjaxSettings> |
| </telerik:RadAjaxManagerProxy> |
| <telerik:RadWindowManager ID="RadWindowManager1" runat="server" Behavior="Maximize, Close, resize" |
| DestroyOnClose="True" Height="400px" Left="" MinimizeZoneID="HorizontalMinimize" |
| Modal="True" Title="" Top="" Width="600px"> |
| <Windows> |
| <telerik:RadWindow ID="RadWindow1" runat="server" Left="" NavigateUrl="RadPhys.aspx" |
| Title="Physician Information" Top=""> |
| </telerik:RadWindow> |
| </Windows> |
| </telerik:RadWindowManager> |
| </td> |
| </tr> |
| <tr> |
| <td style="width: 3px"> |
| </td> |
| <td> |
| <asp:Label ID="Label1" runat="server" Text="Label" Visible="False"></asp:Label></td> |
| </tr> |
| </table> |
| Imports System.Data |
| Imports Telerik.Web.UI |
| Imports System.Collections |
| Imports System.Data.SqlClient |
| Imports System.Web.UI |
| Imports System.Web.UI.WebControls |
| Imports System.Web.UI.WebControls.WebParts |
| Imports System.Web.UI.HtmlControls |
| Imports System.Security.Principal |
| Imports AjaxControlToolkit |
| Partial Class PersonAdmin |
| Inherits System.Web.UI.UserControl |
| Public dataConn As New PhoneBookDLL.dl |
| Shared shouldDisableCommandItem As Boolean = False |
| Shared shouldDisableEditItems As Boolean = False |
| Protected Sub rgPersonAdmin_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles rgPersonAdmin.Init |
| Dim menu As GridFilterMenu = rgPersonAdmin.FilterMenu |
| Dim i As Integer = 0 |
| While i < menu.Items.Count |
| If menu.Items(i).Text = "NoFilter" Or menu.Items(i).Text = "Contains" Or menu.Items(i).Text = "EqualTo" Or menu.Items(i).Text = "StartsWith" Or _ |
| menu.Items(i).Text = "EndsWith" Then |
| i = i + 1 |
| Else |
| menu.Items.RemoveAt(i) |
| End If |
| End While |
| End Sub |
| Protected Sub rgPersonAdmin_InsertCommand1(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles rgPersonAdmin.InsertCommand |
| If TypeOf e.Item Is GridDataItem Then |
| Dim item As GridDataItem = DirectCast(e.Item, GridDataItem) |
| Dim strChk As String = item.GetDataKeyValue("PersonIndic").ToString() |
| Dim chkbx As CheckBox = DirectCast(item("PersonIndic").FindControl("cbPersonIndic"), CheckBox) |
| If strChk = "0" Then |
| chkbx.Checked = False |
| Else |
| chkbx.Checked = True |
| End If |
| Dim lbl As Label = DirectCast(item("DepName").FindControl("lblDep"), Label) |
| Dim DepNameDB As String = item.GetDataKeyValue("DepName").ToString() |
| If DepNameDB = System.DBNull.Value.ToString Then |
| lbl.Text = "" |
| Else : lbl.Text = DepNameDB |
| End If |
| Dim tbLastNamestr As TextBox = DirectCast(item("TemplateColumn").FindControl("tbLastName"), TextBox) |
| Dim LastNameDB As String = item.GetDataKeyValue("LastName").ToString() |
| If LastNameDB = System.DBNull.Value.ToString Then |
| tbLastNamestr.Text = "" |
| Else : tbLastNamestr.Text = LastNameDB |
| End If |
| End If |
| Dim insertedItem As GridEditFormInsertItem = DirectCast(e.Item, GridEditFormInsertItem) |
| 'Dim LastName As String = (TryCast(insertedItem("LastName").Controls(0), TextBox)).Text |
| Dim tbLastName As TextBox = DirectCast(insertedItem("TemplateColumn").FindControl("tbLastName"), TextBox) |
| Dim LastName As String = tbLastName.Text |
| Dim FirstName As String = (TryCast(insertedItem("FirstName").Controls(0), TextBox)).Text |
| Dim EmployeeID As String = (TryCast(insertedItem("EmployeeID").Controls(0), TextBox)).Text |
| Dim Ext As String = (TryCast(insertedItem("Ext").Controls(0), TextBox)).Text |
| Dim Pager As String = (TryCast(insertedItem("Pager").Controls(0), TextBox)).Text |
| Dim Office As String = (TryCast(insertedItem("Office").Controls(0), TextBox)).Text |
| Dim Fax As String = (TryCast(insertedItem("Fax").Controls(0), TextBox)).Text |
| Dim IP As String = (TryCast(insertedItem("IP").Controls(0), TextBox)).Text |
| Dim chkbx1 As CheckBox = DirectCast(insertedItem("PersonIndic").FindControl("PersonIndicCB"), CheckBox) |
| Dim Indic As Integer |
| If chkbx1.Checked = True Then |
| Indic = 1 |
| Else |
| Indic = 0 |
| End If |
| Dim ddlbx As DropDownList = DirectCast(insertedItem("DepName").FindControl("DepNameddl"), DropDownList) |
| Dim DepUniID As Integer |
| DepUniID = ddlbx.SelectedValue |
| Dim Role As String = (TryCast(insertedItem("Role").Controls(0), TextBox)).Text |
| Dim u As String = My.User.Name |
| Dim c As String = My.Computer.Name |
| Dim PersonID, result As Integer |
| PersonID = dataConn.PhoneInsPerson(LastName, FirstName, EmployeeID, Indic, u, c) |
| If PersonID <> -1 Then |
| result = dataConn.PhoneInsContact(2, PersonID, Ext, Pager, Office, Fax, "", IP, u, c) |
| result = result - dataConn.PhoneInsDepRel(DepUniID, PersonID, 2, 1, Role, u, c) |
| End If |
| End Sub |
| Protected Sub rgPersonAdmin_ItemCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles rgPersonAdmin.ItemCommand |
| If (e.CommandName = RadGrid.InitInsertCommandName) Then |
| 'cancel the default operation |
| e.Canceled = True |
| 'Prepare an IDictionary with the predefined values |
| Dim newValues As System.Collections.Specialized.ListDictionary = New System.Collections.Specialized.ListDictionary() |
| '' ''newValues("ContactName") = "default contact name" |
| '' ''newValues("CompanyName") = " default company name" |
| 'set default value for the dropdown list inside the EditItemTemplate |
| newValues("DepUniID") = "1" |
| 'set default checked state for checkbox inside the EditItemTemplate |
| newValues("PersonIndic") = "1" |
| 'Insert the item and rebind |
| e.Item.OwnerTableView.InsertItem(newValues) |
| End If |
| If e.CommandName = RadGrid.EditCommandName Then |
| shouldDisableCommandItem = True |
| ElseIf e.CommandName = RadGrid.InitInsertCommandName Then |
| shouldDisableEditItems = True |
| 'ElseIf e.CommandName = RadGrid.CancelCommandName Then |
| Else |
| shouldDisableCommandItem = False |
| shouldDisableEditItems = False |
| End If |
| End Sub |
| Protected Sub rgPersonAdmin_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles rgPersonAdmin.ItemDataBound |
| If TypeOf e.Item Is GridDataItem Then |
| Dim item As GridDataItem = DirectCast(e.Item, GridDataItem) |
| Dim strChk As String = item.GetDataKeyValue("PersonIndic").ToString() |
| Dim chkbx As CheckBox = DirectCast(item("PersonIndic").FindControl("cbPersonIndic"), CheckBox) |
| If strChk = "0" Then |
| chkbx.Checked = False |
| Else |
| chkbx.Checked = True |
| End If |
| Dim lbl As Label = DirectCast(item("DepName").FindControl("lblDep"), Label) |
| Dim DepNameDB As String = item.GetDataKeyValue("DepName").ToString() |
| If DepNameDB = System.DBNull.Value.ToString Then |
| lbl.Text = "" |
| Label1.Text = "0" |
| Else |
| lbl.Text = DepNameDB |
| Label1.Text = CType(item.GetDataKeyValue("DepUniID"), String) |
| End If |
| End If |
| 'dropdownlist |
| If (TypeOf e.Item Is GridEditableItem AndAlso CType(e.Item, GridEditableItem).IsInEditMode) Then |
| Dim edititem As GridEditableItem = DirectCast(e.Item, GridEditableItem) |
| Dim ddl As DropDownList = DirectCast(edititem("DepName").FindControl("DepNameddl"), DropDownList) |
| Dim getDS As New DataSet |
| getDS = dataConn.PhoneGetDepDDL() |
| ddl.DataSource = getDS.Tables(0).DefaultView |
| ddl.DataTextField = "DepName" |
| ddl.DataValueField = "DepID" |
| ddl.DataBind() |
| Dim chosen As String |
| chosen = Label1.Text |
| If chosen = System.DBNull.Value.ToString Or chosen = 0 Then |
| ddl.SelectedValue = 0 |
| Else |
| ddl.SelectedValue = chosen |
| End If |
| End If |
| End Sub |
| Protected Sub rgPersonAdmin_NeedDataSource(ByVal source As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles rgPersonAdmin.NeedDataSource |
| Dim getDS As New DataSet |
| getDS = dataConn.PhoneAllPerson() |
| rgPersonAdmin.DataSource = getDS.Tables(0).DefaultView |
| End Sub |
| Protected Sub rgPersonAdmin_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles rgPersonAdmin.PreRender |
| If shouldDisableEditItems Then |
| For Each dataItem As GridDataItem In rgPersonAdmin.MasterTableView.Items |
| TryCast(dataItem("EditCommandColumn1").Controls(0), LinkButton).Enabled = False |
| Next |
| ElseIf shouldDisableCommandItem Then |
| Dim commandItem As GridCommandItem = DirectCast(rgPersonAdmin.MasterTableView.GetItems(GridItemType.CommandItem)(0), GridCommandItem) |
| commandItem.Enabled = False |
| End If |
| End Sub |
| Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load |
| Page.Title = "Phonebook Personnel Admin" |
| End Sub |
| Protected Sub rgPersonAdmin_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles rgPersonAdmin.UpdateCommand |
| Dim editedItem As GridEditableItem = TryCast(e.Item, GridEditableItem) |
| Dim strPersonID As String = editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("PersonID").ToString() |
| Dim PersonID As Integer = CType(strPersonID, Integer) |
| Dim RelationUniID |
| Dim strRelationUniID As String = editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("RelationUniID").ToString() |
| If strRelationUniID = "" Then |
| RelationUniID = "0" |
| Else : RelationUniID = CType(strRelationUniID, Integer) |
| End If |
| Dim strContactUniID As String = editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("ContactUniID").ToString() |
| Dim ContactUniID As Integer = CType(strContactUniID, Integer) |
| 'Dim LastName As String = (TryCast(editedItem("LastName").Controls(0), TextBox)).Text |
| Dim tbLastName As TextBox = DirectCast(editedItem("TemplateColumn").FindControl("tbLastName"), TextBox) |
| Dim LastName As String = tbLastName.Text |
| Dim FirstName As String = (TryCast(editedItem("FirstName").Controls(0), TextBox)).Text |
| Dim EmployeeID As String = (TryCast(editedItem("EmployeeID").Controls(0), TextBox)).Text |
| Dim Ext As String = (TryCast(editedItem("Ext").Controls(0), TextBox)).Text |
| Dim Pager As String = (TryCast(editedItem("Pager").Controls(0), TextBox)).Text |
| Dim Office As String = (TryCast(editedItem("Office").Controls(0), TextBox)).Text |
| Dim Fax As String = (TryCast(editedItem("Fax").Controls(0), TextBox)).Text |
| Dim IP As String = (TryCast(editedItem("IP").Controls(0), TextBox)).Text |
| 'Dim DepName As String = (TryCast(editedItem("DepName").Controls(0), TextBox)).Text |
| Dim Role As String = (TryCast(editedItem("Role").Controls(0), TextBox)).Text |
| Dim item As GridEditFormItem = DirectCast(e.Item, GridEditFormItem) |
| Dim chkbx As CheckBox = DirectCast(item("PersonIndic").FindControl("PersonIndicCB"), CheckBox) |
| Dim Indic As Integer |
| If chkbx.Checked = True Then |
| Indic = 1 |
| Else |
| Indic = 0 |
| End If |
| Dim ddlbx As DropDownList = DirectCast(item("DepName").FindControl("DepNameddl"), DropDownList) |
| Dim DepUniID As Integer |
| DepUniID = ddlbx.SelectedValue |
| Dim u As String = My.User.Name |
| Dim c As String = My.Computer.Name |
| Dim PersonIndic As String = CType(Indic, String) |
| Dim confirm As Integer |
| confirm = dataConn.PhoneEditPerson(PersonID, DepUniID, ContactUniID, LastName, FirstName, EmployeeID, Ext, Pager, Office, Fax, IP, PersonIndic, Role, RelationUniID, u, c) |
| Dim commandItem As GridCommandItem = DirectCast(rgPersonAdmin.MasterTableView.GetItems(GridItemType.CommandItem)(0), GridCommandItem) |
| commandItem.Enabled = True |
| End Sub |
| End Class |
Thank you for all your help...
Shehab

<%@ Page Title="Report" Language="C#" MasterPageFile="~/MasterPages/Site.Master" AutoEventWireup="true" CodeBehind="Report.aspx.cs" Inherits="Report" Theme="Default" %><asp:Content ID="Content1" ContentPlaceHolderID="MainContent" runat="server"> <table> <tr> <td><label>User: </Label></td> <td> <telerik:RadComboBox ID="EmailRCB" runat="server" AutoPostBack="True" DataSourceID="dllDataSource" DataTextField="email" DataValueField="email" Width="250px" AppendDataBoundItems="true"> <Items> <telerik:RadComboBoxItem Text="- Select User -" Value="0" Selected="true"></telerik:RadComboBoxItem> </Items> </telerik:RadComboBox> </td> </tr> </table><br /> <!-- grid --> <telerik:RadGrid ID="OrdersGrid" AllowPaging="true" DataSourceID="gridSource" runat="server" GridLines="None" AllowSorting="true" ShowFooter="true" PageSize = "1000" Width="1500" > <PagerStyle AlwaysVisible="true" ShowPagerText="true" Position="TopAndBottom" /> <MasterTableView DataSourceID="gridSource" AllowMultiColumnSorting="false"> <NestedViewTemplate> <asp:Panel runat="server" ID="InnerContainer" Visible="true" ViewStateMode="Enabled"> <telerik:RadTabStrip runat="server" ID="tsMain" MultiPageID="mpMain" SelectedIndex="0"> <Tabs> <telerik:RadTab runat="server" Text="Details" PageViewID="pvMain" /> </Tabs> </telerik:RadTabStrip> <telerik:RadMultiPage runat="server" ID="mpMain" SelectedIndex="0" RenderSelectedPageOnly="false"> <telerik:RadPageView runat="server" ID="pvMain"> <asp:Label ID="lblNUM" Font-Bold="true" Font-Italic="true" Text='<%# Eval("NUMBER") %>' Visible="false" runat="server"></asp:Label> <!-- inner/nested grid --> <telerik:RadGrid runat="server" ID="grdOrders" DataSourceID="grdReportDataSource2" ShowFooter="false" AllowSorting="false" Width="700" EnableLinqExpressions="false"> <MasterTableView ShowHeader="true" AutoGenerateColumns="true" AllowPaging="False"> </MasterTableView> </telerik:RadGrid> <!-- datasource for inner/nested grid --> <asp:SqlDataSource ID="grdReportDataSource2" runat="server" ConnectionString="<%$ ConnectionStrings:intranetConnectionString %>" SelectCommand="dbo.sp_AuditClientReportNested2" SelectCommandType="StoredProcedure" > <SelectParameters> <asp:ControlParameter ControlID="lblNUM" PropertyName="Text" Type="String" Name="NUM"></asp:ControlParameter> </SelectParameters> </asp:SqlDataSource> </telerik:RadPageView> </telerik:RadMultiPage> </asp:Panel> </NestedViewTemplate> </MasterTableView> <ClientSettings AllowDragToGroup="false"> </ClientSettings> </telerik:RadGrid> </div> <!-- datasource for RadComboBox --> <asp:SqlDataSource ID="dllDataSource" runat="server" ConnectionString="<%$ ConnectionStrings:intranetConnectionString %>" SelectCommand="SELECT DISTINCT EMAIL FROM Table1"></asp:SqlDataSource> <!-- datasource for outer/header grid --> <asp:SqlDataSource ID="gridSource" runat="server" ConnectionString="<%$ ConnectionStrings:intranetConnectionString %>" SelectCommand=" SELECT DISTINCT NUM AS 'Number', EMAIL AS 'Email', BATCHID AS 'Batch ID', NAME AS 'Name', COMPANY AS 'Company', RTRIM(FIRSTNAME) + ' ' + RTRIM(LASTNAME) AS 'Contact Name', DateAdded AS 'Date' FROM Table1 WHERE EMAIL = @email ORDER BY NUM"> <SelectParameters> <asp:ControlParameter Name="email" PropertyName="SelectedValue" ControlID="EmailRCB"> </asp:ControlParameter> </SelectParameters> </asp:SqlDataSource> <telerik:RadAjaxManager ID="RadAjaxManager1" runat="server" EnableAJAX="true" DefaultLoadingPanelID="RadAjaxLoadingPanel1"> <AjaxSettings> <telerik:AjaxSetting AjaxControlID="EmailRCB"> <UpdatedControls> <telerik:AjaxUpdatedControl ControlID="OrdersGrid" LoadingPanelID="AjaxLoadingPanel1"> </telerik:AjaxUpdatedControl> <telerik:AjaxUpdatedControl ControlID="EmailRCB"></telerik:AjaxUpdatedControl> </UpdatedControls> </telerik:AjaxSetting> </AjaxSettings> </telerik:RadAjaxManager> <telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" runat="server"> </telerik:RadAjaxLoadingPanel></asp:Content><telerik:GridTemplateColumn><br><%# CustomerListActions(DataBinder.Eval(Container.DataItem, "ID"), DataBinder.Eval(Container.DataItem, "IsDeleted"), DataBinder.Eval(Container.DataItem, "CompanyName"))%><br></telerik:GridTemplateColumn><br>Public Function CustomerListActions(lngID As Long, intIsDeleted As Integer, strCompanyName As String) As String<br>End Function