| <telerik:radgrid id="RadGridFieldMappings" runat="server" |
| AutoGenerateColumns= "False" |
| AllowSorting="True" |
| AllowPaging="True" |
| OnNeedDataSource="RadGridFieldMappings_NeedDataSource" |
| OnDataBound = "RadGridFieldMappings_DataBound" |
| OnUpdateCommand="RadGridFieldMappings_UpdateCommand" |
| AllowAutomaticUpdates="true" |
| PageSize="15" |
| GridLines="Both" |
| Height="300px" |
| > |
| <MasterTableView ShowFooter="false" DataKeyNames="ID" EditMode="InPlace"> |
| <PagerStyle Mode="NextPrevNumericAndAdvanced"></PagerStyle> |
| <Columns> |
| <telerik:GridNumericColumn DataField="ID" UniqueName="ID" HeaderText="ID" Visible="false" ReadOnly="True"/> |
| <telerik:GridBoundColumn UniqueName="ListID" HeaderText="ListID" DataField="ListID" Visible="false" ReadOnly="True"> |
| <HeaderStyle Width="40px"></HeaderStyle> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn UniqueName="ListName" HeaderText="List Name" DataField="ListName" ReadOnly="True"> |
| <HeaderStyle Width="155px"></HeaderStyle> |
| </telerik:GridBoundColumn> |
| <telerik:GridBoundColumn UniqueName="FieldName" HeaderText="FieldName" DataField="FieldName" ReadOnly="True"> |
| <HeaderStyle Width="120px"></HeaderStyle> |
| </telerik:GridBoundColumn> |
| <telerik:GridTemplateColumn |
| UniqueName="DestFieldName" |
| HeaderText="Destination Field" |
| SortExpression="DestFieldName" |
| Visible="true"> |
| <FooterStyle VerticalAlign="Middle" HorizontalAlign="Center" /> |
| <HeaderStyle Width="230px"></HeaderStyle> |
| <ItemTemplate> |
| <%#DataBinder.Eval(Container.DataItem, "DestFieldName")%> |
| </ItemTemplate> |
| <EditItemTemplate> |
| <telerik:RadComboBox |
| DataTextField="DestFieldName" |
| DataValueField="DestFieldName" |
| EnableLoadOnDemand="True" |
| ID="RadComboBox1" |
| runat="server" |
| Height="140px" |
| Width="220px" |
| DataSourceID="DestinationFields"> |
| </telerik:RadComboBox> |
| </EditItemTemplate> |
| </telerik:GridTemplateColumn> |
| <telerik:GridEditCommandColumn FooterText="EditCommand footer" UniqueName="EditCommandColumn" |
| HeaderText="Edit" HeaderStyle-Width="100px"> |
| </telerik:GridEditCommandColumn> |
| </Columns> |
| </MasterTableView> |
| <PagerStyle Mode="NumericPages"></PagerStyle> |
| </telerik:radgrid> |
| <asp:SqlDataSource ID="DestinationFields" runat="server" ConnectionString="<%$ ConnectionStrings:iBase_DM %>" |
| ProviderName="System.Data.SqlClient" |
| SelectCommand="SELECT FieldName as DestFieldName FROM DMProfileFieldMap WITH(NOLOCK)" > |
| </asp:SqlDataSource> |
| Protected Sub RadGridFieldMappings_NeedDataSource(ByVal [source] As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles RadGridFieldMappings.NeedDataSource |
| GetUserDetails() |
| Try |
| Me.RadGridFieldMappings.ClientSettings.Scrolling.AllowScroll = True |
| Me.RadGridFieldMappings.ClientSettings.Scrolling.UseStaticHeaders = True |
| Me.RadGridFieldMappings.ShowHeader = True |
| Me.RadGridFieldMappings.ShowFooter = True |
| Me.RadGridFieldMappings.ClientSettings.Resizing.AllowColumnResize = True |
| Me.RadGridFieldMappings.ClientSettings.Resizing.AllowRowResize = False |
| Me.RadGridFieldMappings.ClientSettings.Resizing.EnableRealTimeResize = True |
| Me.RadGridFieldMappings.ClientSettings.Resizing.ResizeGridOnColumnResize = True |
| Me.RadGridFieldMappings.ClientSettings.Resizing.ClipCellContentOnResize = True |
| Me.RadGridFieldMappings.ClientSettings.AllowColumnsReorder = True |
| Me.RadGridFieldMappings.ClientSettings.ReorderColumnsOnClient = True |
| strSQL = "SELECT" & vbCrLf |
| strSQL += " l.ListName," & vbCrLf |
| strSQL += " l.ListID," & vbCrLf |
| strSQL += " lf.ID, " & vbCrLf |
| strSQL += " lf.EmailAddrField, " & vbCrLf |
| strSQL += " lf.FieldName, mdfm.DestFieldName" & vbCrLf |
| strSQL += "FROM " & vbCrLf |
| strSQL += " AppControl.Messages m WITH(NOLOCK) INNER JOIN " & vbCrLf |
| strSQL += " AppControl.MessageLists ml WITH(NOLOCK)" & vbCrLf |
| strSQL += " ON m.TaskID = ml.TaskID INNER JOIN " & vbCrLf |
| strSQL += " AppControl.Lists l WITH(NOLOCK)" & vbCrLf |
| strSQL += " ON ml.ListID = l.ListID INNER JOIN " & vbCrLf |
| strSQL += " AppControl.ListFields lf WITH(NOLOCK)" & vbCrLf |
| strSQL += " ON l.ListID = lf.ListID LEFT JOIN" & vbCrLf |
| strSQL += " AppControl.MessageDeployFieldMappings mdfm WITH(NOLOCK)" & vbCrLf |
| strSQL += " ON m.TaskId = mdfm.TaskID " & vbCrLf |
| strSQL += " AND lf.ID = mdfm.ListFieldID " & vbCrLf |
| strSQL += "WHERE" & vbCrLf |
| strSQL += " m.TaskID = " & TaskID & " " & vbCrLf |
| strSQL += " AND ml.IncludeList = 1" & vbCrLf |
| strSQL += " AND LoadIntoDMList = 1" & vbCrLf |
| strSQL += " AND EmailAddrField <> 1" & vbCrLf |
| If iTargetLists = 1 Then |
| RadGridFieldMappings.DataSource = ReadRecordsTargetLists(strSQL) |
| iTargetLists += 1 |
| Else |
| Exit Sub |
| End If |
| Catch ex As Exception |
| Response.Redirect("ErrorPage.aspx?ErrorPage=" & Server.UrlEncode(ThisPage) & "&Exception=" & Server.UrlEncode(ex.Message)) |
| End Try |
| End Sub |
| Protected Sub RadGridFieldMappings_UpdateCommand(ByVal source As Object, ByVal e As GridCommandEventArgs) |
| '?????????????????????????? |
| End Sub |
| Protected Sub RadGridFieldMappings_UpdateCommand(ByVal source As Object, ByVal e As GridCommandEventArgs) |
| '?????????????????????????? |
| End Sub |
<
telerik:GridButtonColumn ConfirmText="Delete this?" ConfirmDialogType="Classic" ConfirmTitle="Delete" ButtonType="ImageButton"
CommandName="Delete" Text="Delete" UniqueName="DeleteColumn"
Thanks
Tony
| <telerik:RadScheduler ID="RadScheduler1" runat="server" Width="950px" Height="480px" SelectedView="MonthView" DayStartTime="14:00:00" DayEndTime="23:59:00" |
| DataEndField="Sched_End" |
| DataKeyField="ID" DataRecurrenceField="RecurringInfo" DataRecurrenceParentKeyField="ParentID" |
| DataStartField="Sched_Start" DataSubjectField="Title" |
| HoursPanelTimeFormat="htt" ValidationGroup="RadScheduler1" ReadOnly="false" AllowDelete="false" AllowInsert="false"> |
| </telerik:RadScheduler> |
VB:
| Protected Sub RadScheduler1_FormCreated(ByVal sender As Object, ByVal e As Telerik.Web.UI.SchedulerFormCreatedEventArgs) Handles RadScheduler1.FormCreated |
| If e.Container.Mode = SchedulerFormMode.AdvancedEdit Then |
| Dim Description As TextBox = CType(e.Container.FindControl("Subject"), TextBox) |
| Dim startDate As RadDatePicker = CType(e.Container.FindControl("StartDate"), RadDatePicker) |
| Dim endDate As RadDatePicker = CType(e.Container.FindControl("EndDate"), RadDatePicker) |
| Dim startTime As RadTimePicker = CType(e.Container.FindControl("StartTime"), RadTimePicker) |
| Dim endTime As RadTimePicker = CType(e.Container.FindControl("EndTime"), RadTimePicker) |
| Description.Enabled = False |
| startDate.Enabled = False |
| endDate.Enabled = False |
| startTime.Enabled = False 'No error here but its not working |
| endTime.Enabled = False 'No error here but its not working |
| End If |
| End Sub |
Thanks in advance,
RJ
string scriptstring = "radalert('Task information loaded successfully!', 330, 210);";
RadScriptManager.RegisterStartupScript(this, this.GetType(), "radalert", scriptstring, true);
When I execute the code, I get the following error:
Error: Object expected
When looking a the page source, the error is occurring on the first open tag here:
<script type="text/javascript">
//<![CDATA[
radalert('Task information loaded successfully!', 330, 210);Sys.Application.initialize();
Sys.Application.add_init(function() {
$create(Telerik.Web.UI.RadAjaxManager, {"_updatePanels":"","ajaxSettings":[],"clientEvents":{OnRequestStart:"",OnResponseEnd:""},"defaultLoadingPanelID":"","enableAJAX":true,"enableHistory":false,"links":[],"styles":[],"uniqueID":"ctl00$RadAjaxManager1","updatePanelsRenderMode":0}, null, null, $get("ctl00_RadAjaxManager1"));
});
Sys.Application.add_init(function() {
$create(Telerik.Web.UI.RadTabStrip, {"_selectedIndex":0,"_skin":"Default","clientStateFieldID":"ctl00_RadTabStrip1_ClientState","selectedIndexes":["0"],"tabData":[{},{},{},{},{}]}, null, null, $get("ctl00_RadTabStrip1"));
});
//]]>
</script>
</form>
</body>
</html>
I am probably missing something obvious. Any help provided would be much appreciated.
Mike