or
| Dim mySqlCmd As New SqlCommand |
| Dim da As New SqlDataAdapter |
| Dim SchedSource As New SchedulerBindingDataSource() |
| Dim appointmentMappingInfo As New AppointmentMappingInfo() |
| Dim resourceMappingInfo As New ResourceMappingInfo |
| Dim mySqlConn = New SqlConnection("server = compname\SQLEXPRESS;database = dbname;Trusted_Connection = yes") |
| mySqlConn.Open() |
| Try |
| mySqlCmd = mySqlConn.CreateCommand |
| mySqlCmd.CommandText = _ |
| "SELECT tbl_ReservationInfo.ReservationInfoID as 'ID', tbl_ReservationInfo.ReservationStart as 'Start', tbl_ReservationInfo.ReservationEnd as 'End', tbl_ResourceInfo.ResourceName As 'Resource Name', tbl_ResourceInfo.Description as 'Description', tbl_ResourceInfo.Type as 'Type'" |
| mySqlCmd.CommandText += " FROM tbl_ReservationInfo INNER JOIN tbl_Reservations ON tbl_ReservationInfo.ReservationID = tbl_Reservations.ReservationID INNER JOIN tbl_ResourceInfo ON tbl_ReservationInfo.ResourceInfoID = tbl_ResourceInfo.ResourceInfoID INNER JOIN" |
| mySqlCmd.CommandText += " tbl_Resources ON tbl_ResourceInfo.ResourceInfoID = tbl_Resources.ResourceInfoID INNER JOIN" |
| mySqlCmd.CommandText += " tbl_Users ON tbl_ReservationInfo.UserID = tbl_Users.UserID" |
| mySqlCmd.CommandText += " WHERE (tbl_ResourceInfo.Type = 'Venue')" |
| da.SelectCommand = mySqlCmd |
| da.Fill(SchedDataSet, "Schedules") |
| appointmentMappingInfo.Start = "Start" |
| appointmentMappingInfo.End = "End" |
| appointmentMappingInfo.Summary = "Resource Name" |
| appointmentMappingInfo.Location = "Resource Name" |
| appointmentMappingInfo.Description = "Description" |
| appointmentMappingInfo.Visible = "Visible" |
| resourceMappingInfo.Id = "ID" |
| resourceMappingInfo.Name = "Type" |
| SchedulerBindingDataSource1.ResourceProvider.Mapping = appointmentMappingInfo |
| SchedulerBindingDataSource1.ResourceProvider.DataSource = "Schedules" |
| SchedulerBindingDataSource1.ResourceProvider.Mapping = resourceMappingInfo |
| SchedulerBindingDataSource1.ResourceProvider.DataSource = "Schedules" |
| VenueSchedTable.DataSource = SchedulerBindingDataSource1 |
| Catch ex As Exception |
| MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OkOnly, "Connection Error !!") |
| End Try |

public class MyRadButtonElement:Telerik.WinControls.UI.RadButtonElement { private String _blabla; public MyRadButtonElement(String blabla) : base() { _blabla = blabla; } protected override Type ThemeEffectiveType { get { return typeof(Telerik.WinControls.UI.RadButtonElement); } } }if (someConditionIsTrue)
{
e.CellElement.BackColor = Color.Red;
return;
}
e.CellElement.ResetValue(LightVisualElement.BackColorProperty, Telerik.WinControls.ValueResetFlags.Local);
Hi.
I want to show the new appointment Dialog (advanced) (see pictures attached) rather than the “inline” 3 option ( Save, Cancel, Options) dialog, when you DoubleClick on the RadSchduler to create a new appointment.
Your help will be appreciated.
Thank you


When I attempt to enable row reordering with a gridview bound to a DataTable rather than manually adding rows like in the demo application, nothing happens.
Is it possible to make reordering or drag/drop work when bound to a DataTable?
