or
string[] args = Request.Form["radGridClickedRowIndex"].Split('_');
int indice = Convert.ToInt32(args[args.Length - 1]);
string UId = Request.Form["radGridClickedTableId"];
GridTableView tableView;
tableView = this.Page.FindControl(UId) as GridTableView;
string userName = ((tableView as GridTableView).Items[indice] as GridDataItem)["UserName"].Text;
string roleName = ((tableView as GridTableView).Items[indice] as GridDataItem)["RoleName"].Text;
Roles.RemoveUserFromRole(userName, roleName);
tableView.Rebind();
<
asp:RadioButton
ID
=
"RadioButtonWork"
runat
=
"server"
Checked
=
"true"
GroupName
=
"Invoice"
AutoPostBack
=
"true"
OnCheckedChanged
=
"RadioButtonsInvoice_OnCheckedChange"
/>
<
asp:RadioButton
ID
=
"RadioButtonInvoice"
runat
=
"server"
Checked
=
"false"
GroupName
=
"Invoice"
AutoPostBack
=
"true"
OnCheckedChanged
=
"RadioButtonsInvoice_OnCheckedChange"
/>
<
asp:RadioButton
ID
=
"RadioButtonHome"
runat
=
"server"
Checked
=
"false"
GroupName
=
"Invoice"
AutoPostBack
=
"true"
OnCheckedChanged
=
"RadioButtonsInvoice_OnCheckedChange"
/>
<
telerik:RadAjaxManager
ID
=
"RadAjaxManager1"
runat
=
"server"
EnableAJAX
=
"false"
>...</
telerik:RadAjaxManager
>
<
telerik:RadAjaxManagerProxy
ID
=
"RadAjaxManagerProxy1"
runat
=
"server"
>
<
AjaxSettings
>
<
telerik:AjaxSetting
AjaxControlID
=
"RadioButtonWork"
>
<
UpdatedControls
>
<
telerik:AjaxUpdatedControl
ControlID
=
"PlaceHolderInvoiceAddress"
/>
<
telerik:AjaxUpdatedControl
ControlID
=
"PlaceHolderHomeAddress"
/>
</
UpdatedControls
>
</
telerik:AjaxSetting
>
<
telerik:AjaxSetting
AjaxControlID
=
"RadioButtonInvoice"
>
<
UpdatedControls
>
<
telerik:AjaxUpdatedControl
ControlID
=
"PlaceHolderInvoiceAddress"
/>
<
telerik:AjaxUpdatedControl
ControlID
=
"PlaceHolderHomeAddress"
/>
</
UpdatedControls
>
</
telerik:AjaxSetting
>
<
telerik:AjaxSetting
AjaxControlID
=
"RadioButtonHome"
>
<
UpdatedControls
>
<
telerik:AjaxUpdatedControl
ControlID
=
"PlaceHolderInvoiceAddress"
/>
<
telerik:AjaxUpdatedControl
ControlID
=
"PlaceHolderHomeAddress"
/>
</
UpdatedControls
>
</
telerik:AjaxSetting
>
</
AjaxSettings
>
</
telerik:RadAjaxManagerProxy
>
Hi All,
I actually have two questions:
How can I extend the width of the column in my RadGridview. Also, I only have one item in my gridview.I want to see the vertical lines, but i don't see any. may be because there is only one item in the whole gridview. Is it possible that I can see vertical line in my gridview. I have gridLines set to both
Thanks.
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="CRMScheduler.ascx.vb" Inherits="CRM_TestClient.CRMScheduler" %>
<%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="rad" %>
<
rad:RadAjaxManager
ID
=
"RadAjaxManager1"
runat
=
"server"
>
<
AjaxSettings
>
<
rad:AjaxSetting
AjaxControlID
=
"RadAjaxManager1"
>
<
UpdatedControls
>
<
rad:AjaxUpdatedControl
ControlID
=
"RadAjaxManager1"
/>
</
UpdatedControls
>
</
rad:AjaxSetting
>
<
rad:AjaxSetting
AjaxControlID
=
"RadAjaxManager1"
>
<
UpdatedControls
>
<
rad:AjaxUpdatedControl
ControlID
=
"Scheduler"
/>
</
UpdatedControls
>
</
rad:AjaxSetting
>
<
rad:AjaxSetting
AjaxControlID
=
"Scheduler"
>
<
UpdatedControls
>
<
rad:AjaxUpdatedControl
ControlID
=
"Scheduler"
/>
</
UpdatedControls
>
</
rad:AjaxSetting
>
</
AjaxSettings
>
</
rad:RadAjaxManager
>
<
rad:RadScheduler
runat
=
"server"
ID
=
"Scheduler"
Width
=
"753px"
Height
=
"600px"
Skin
=
"Vista"
EnableExactTimeRendering
=
"true"
StartEditingInAdvancedForm
=
"true"
StartInsertingInAdvancedForm
=
"true"
DataKeyField
=
"Schedule_id"
DataStartField
=
"Start"
DataEndField
=
"End"
DataSubjectField
=
"Subject"
DataDescriptionField
=
"Description"
DataRecurrenceField
=
"RecurrenceRule"
DataReminderField
=
"Reminder"
DataRecurrenceParentKeyField
=
"RecurrenceParentSchedule_id"
AppointmentContextMenuSettings-EnableDefault
=
"false"
TimeSlotContextMenuSettings-EnableDefault
=
"false"
TimelineView-UserSelectable
=
"false"
>
<
AdvancedForm
Modal
=
"true"
/>
</
rad:RadScheduler
>
Imports System
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports Telerik.Web.UI
Public Class CRMScheduler
Inherits System.Web.UI.UserControl
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
' 2011-06-03 10:00:00
Scheduler.SelectedDate = Now()
Scheduler.SelectedView = SchedulerViewType.WeekView
Scheduler.DayStartTime = New TimeSpan(7, 0, 0)
Scheduler.DayEndTime = New TimeSpan(20, 0, 0)
Scheduler.WorkDayStartTime = New TimeSpan(8, 0, 0)
Scheduler.WorkDayEndTime = New TimeSpan(18, 0, 0)
Scheduler.FirstDayOfWeek = DayOfWeek.Monday
Scheduler.LastDayOfWeek = DayOfWeek.Saturday
BindSchedule()
End If
End Sub
Private Sub BindSchedule()
Dim ds As List(Of objCRM.Schedule) = objCRM.Schedule.SelectScheduleByDealer(Session("Dealer_id"))
For i As Int32 = 0 To ds.Count - 1
If ds(i).RecurrenceRule = "" Then
ds(i).RecurrenceRule = Nothing
End If
Next
Scheduler.DataSource = ds
Scheduler.DataBind()
End Sub
Private Sub Scheduler_AppointmentDataBound(sender As Object, e As Telerik.Web.UI.SchedulerEventArgs) Handles Scheduler.AppointmentDataBound
Dim RecurrenceRule As String = e.Appointment.RecurrenceRule
If e.Appointment.RecurrenceParentID = -1 Then
e.Appointment.RecurrenceParentID = Nothing
End If
End Sub
Private Sub Scheduler_AppointmentDelete(sender As Object, e As Telerik.Web.UI.AppointmentDeleteEventArgs) Handles Scheduler.AppointmentDelete
objCRM.Schedule.DeleteSchedule(e.Appointment.ID)
BindSchedule()
End Sub
Private Sub Scheduler_AppointmentInsert(sender As Object, e As Telerik.Web.UI.AppointmentInsertEventArgs) Handles Scheduler.AppointmentInsert
Dim User_id As Int32 = -1
Dim Subject As String = e.Appointment.Subject
Dim Description As String = e.Appointment.Description
Dim Start As String = e.Appointment.Start.ToString
Dim [End] As String = e.Appointment.End.ToString
Dim RecurrenceRule As String = e.Appointment.RecurrenceRule.ToString
Dim RecurrenceParentSchedule_id As String = IIf(e.Appointment.RecurrenceParentID Is Nothing, -1, CInt(e.Appointment.RecurrenceParentID))
Dim Reminder As String = e.Appointment.Reminders.ToString
Dim s As objCRM.Schedule = New objCRM.Schedule(Session("Dealer_id"), User_id, Subject, Description, Start, [End], RecurrenceRule, RecurrenceParentSchedule_id, Reminder)
BindSchedule()
End Sub
Private Sub Scheduler_AppointmentUpdate(sender As Object, e As Telerik.Web.UI.AppointmentUpdateEventArgs) Handles Scheduler.AppointmentUpdate
Dim s As objCRM.Schedule = New objCRM.Schedule(e.Appointment.ID)
' Dim User_id As Int32 = -1
s.Subject = e.ModifiedAppointment.Subject
s.Description = e.ModifiedAppointment.Description
s.Start = e.ModifiedAppointment.Start.ToString
s.[End] = e.ModifiedAppointment.End.ToString
s.RecurrenceRule = e.ModifiedAppointment.RecurrenceRule.ToString
s.RecurrenceParentSchedule_id = IIf(e.ModifiedAppointment.RecurrenceParentID Is Nothing, -1, CInt(e.ModifiedAppointment.RecurrenceParentID))
s.Reminder = e.ModifiedAppointment.Reminders.ToString
s.Update()
BindSchedule()
End Sub
Private Sub Scheduler_NavigationCommand(sender As Object, e As Telerik.Web.UI.SchedulerNavigationCommandEventArgs) Handles Scheduler.NavigationCommand
BindSchedule()
End Sub
End Class