or
var result =
new
RadComboBoxData();
result.Context[
"users"
] = context.ContainsKey(
"users"
) ? Convert.ToInt32(context[
"users"
]) : 0 + userList.Count();
result.Context[
"contacts"
] = context.ContainsKey(
"contacts"
) ? Convert.ToInt32(context[
"contacts"
]) : 0 + userList.Count();
return
result;
<
telerik:RadMenu
ID
=
"rmnuMainMenu"
DataSourceID
=
"smdsMenuSource"
OnClientItemClicked
=
"OnClientItemClicked"
Width
=
"100%"
runat
=
"server"
OnItemDataBound
=
"rmnuMainMenu_ItemDataBound"
OnItemClick
=
"rmnuMainMenu_ItemClick"
/>
<
asp:SiteMapDataSource
ID
=
"smdsMenuSource"
ShowStartingNode
=
"false"
runat
=
"server"
/>
<?
xml
version
=
"1.0"
encoding
=
"utf-8"
?>
<
siteMap
xmlns
=
"http://schemas.microsoft.com/AspNet/SiteMap-File-1.0"
enableLocalization
=
"true"
>
<
siteMapNode
url
=
""
title
=
"Inicio"
>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuCatalogs"
>
<
siteMapNode
url
=
"~/CatMaterials.aspx"
title
=
"$Resources:Localization, mnuMaterials"
/>
<
siteMapNode
url
=
"~/CatTrains.aspx"
title
=
"$Resources:Localization, mnuTrains"
/>
<
siteMapNode
url
=
"~/CatBatchSizes.aspx"
title
=
"$Resources:Localization, mnuBatchSizes"
/>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuFC"
/>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuMI"
/>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuBPR"
/>
</
siteMapNode
>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuPreferences"
>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuLanguage"
>
<
siteMapNode
url
=
""
image
=
"../Img/mxFlag.png"
title
=
"$Resources:Localization, mnuSpanish"
/>
<
siteMapNode
url
=
""
image
=
"../Img/usFlag.png"
title
=
"$Resources:Localization, mnuEnglish"
/>
</
siteMapNode
>
<
siteMapNode
url
=
"~/UsersAdmin.aspx"
title
=
"$Resources:Localization, mnuUsers"
/>
</
siteMapNode
>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuHelp"
>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuContents"
/>
<
siteMapNode
url
=
""
title
=
"$Resources:Localization, mnuAbout"
/>
</
siteMapNode
>
</
siteMapNode
>
</
siteMap
>
protected
void
rmnuMainMenu_ItemClick(
object
sender, Telerik.Web.UI.RadMenuEventArgs e)
{
// Store requested language as new culture in the session
if
(e.Item.Text ==
"Español"
|| e.Item.Text ==
"Spanish"
)
Session[
"SelectedCulture"
] =
"es-MX"
;
if
(e.Item.Text ==
"Inglés"
|| e.Item.Text ==
"English"
)
Session[
"SelectedCulture"
] =
"en-US"
;
// Reload last requested page with new culture
Server.Transfer(Request.Path);
}
protected
void
rmnuMainMenu_ItemDataBound(
object
sender, Telerik.Web.UI.RadMenuEventArgs e)
{
// Load the specific image for every menu item, from the Sitemap information
e.Item.ImageUrl = ((SiteMapNode)e.Item.DataItem)[
"image"
];
if
(e.Item.Level == 0)
{
RadMenuItem separator =
new
RadMenuItem();
separator.IsSeparator =
true
;
separator.Text =
"|"
;
e.Item.Owner.Items.Insert(e.Item.Index + 1, separator);
}
}
<script type=
"text/javascript"
>
// Close RadMenu after click
function
OnClientItemClicked(sender, eventArgs) {
sender.close();
}
</script>
Imports System.Data Partial Class Sales_SalesPresentationGenerator Inherits System.Web.UI.Page Dim ds As New DataSet Dim TitleName As DataColumn = New DataColumn("Title", Type.GetType("System.String")) Dim TitleID As DataColumn = New DataColumn("TitleID", Type.GetType("System.Int32")) Dim Territory As DataColumn = New DataColumn("Territory", Type.GetType("System.String")) Dim TerritoryID As DataColumn = New DataColumn("TerritoryID", Type.GetType("System.Int32")) Dim Medium As DataColumn = New DataColumn("Medium", Type.GetType("System.String")) Dim MediumID As DataColumn = New DataColumn("MediumID", Type.GetType("System.Int32")) Private Property dt As DataTable Get Return ViewState("dt") End Get Set(value As DataTable) ViewState("dt") = value End Set End Property Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load If Not IsPostBack Then dt = New DataTable() dt.Columns.Add(TitleID) dt.Columns.Add(TitleName) dt.Columns.Add(TerritoryID) dt.Columns.Add(Territory) dt.Columns.Add(MediumID) dt.Columns.Add(Medium) SelectedGrid.DataSource = dt SelectedGrid.DataBind() End If End Sub 'Add to selected Protected Sub TitlesGrid_RowDrop(sender As Object, e As Telerik.Web.UI.GridDragDropEventArgs) Handles TitlesGrid.RowDrop 'e.DraggedItems.Count For Each r In e.DraggedItems Dim temp As DataRow temp = dt.NewRow() temp.Item("TitleID") = CType(CType(r.Item("TitleID"), TableCell).Text, Integer) temp.Item("Title") = CType(r.Item("Title"), TableCell).Text temp.Item("Medium") = CType(r.Item("Medium"), TableCell).Text temp.Item("MediumID") = CType(CType(r.Item("MediumID"), TableCell).Text, Integer) temp.Item("Territory") = CType(r.Item("Territory"), TableCell).Text temp.Item("TerritoryID") = CType(CType(r.Item("TerritoryID"), TableCell).Text, Integer) dt.Rows.Add(temp) ' MsgBox(dt.Rows.Count) Next SelectedGrid.Rebind() End Sub 'Remove from Selected Protected Sub SelectedRowDrop(sender As Object, e As Telerik.Web.UI.GridDragDropEventArgs) Handles SelectedGrid.RowDrop End Sub End Class
<%@ Page Title="" Language="VB" MasterPageFile="~/All/Site.master" AutoEventWireup="false" CodeFile="SalesPresentationGenerator.aspx.vb" Inherits="Sales_SalesPresentationGenerator" %> <%@ Register assembly="Telerik.Web.UI" namespace="Telerik.Web.UI" tagprefix="telerik" %> <asp:Content ID="Content1" ContentPlaceHolderID="HeadContent" Runat="Server"> </asp:Content> <asp:Content ID="Content2" ContentPlaceHolderID="MainContent" Runat="Server"> <telerik:RadScriptManager ID="RadScriptManager1" runat="server"> </telerik:RadScriptManager> <telerik:RadFilter ID="RadFilter1" runat="server" CssClass="RadFilter RadFilter_Default RadFilter RadFilter_Default RadFilter RadFilter_Default " FilterContainerID="TitlesGrid" Skin="Vista"> </telerik:RadFilter> <div style="width:48%; float:left"> <telerik:RadGrid ID="TitlesGrid" runat="server" AllowPaging="True" AllowSorting="True" DataSourceID="TitlesDataSource" GridLines="None" ShowGroupPanel="True" Skin="Vista" AllowMultiRowSelection="True"> <ClientSettings AllowDragToGroup="True" AllowRowsDragDrop="True"> <Selecting AllowRowSelect="True" /> </ClientSettings> <MasterTableView AutoGenerateColumns="False" DataSourceID="TitlesDataSource"> <CommandItemSettings ExportToPdfText="Export to Pdf"></CommandItemSettings> <RowIndicatorColumn> <HeaderStyle Width="20px"></HeaderStyle> </RowIndicatorColumn> <ExpandCollapseColumn> <HeaderStyle Width="20px"></HeaderStyle> </ExpandCollapseColumn> <Columns> <telerik:GridBoundColumn DataField="Title" HeaderText="Title" SortExpression="Title" UniqueName="Title"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="TitleID" HeaderText="TitleID" SortExpression="TitleID" UniqueName="TitleID" Visible="False" DataType="System.Int32"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="Synopsis" HeaderText="Synopsis" SortExpression="Synopsis" UniqueName="Synopsis" Visible="False"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="Genre" HeaderText="Genre" SortExpression="Genre" UniqueName="Genre"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="Territory" HeaderText="Territory" SortExpression="Territory" UniqueName="Territory"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="TerritoryID" DataType="System.Int32" HeaderText="TerritoryID" SortExpression="TerritoryID" UniqueName="TerritoryID" Visible="False"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="Medium" HeaderText="Medium" SortExpression="Medium" UniqueName="Medium"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="MediumID" DataType="System.Int32" HeaderText="MediumID" SortExpression="MediumID" UniqueName="MediumID" Visible="False"> </telerik:GridBoundColumn> <telerik:GridBoundColumn DataField="AvailDate" DataType="System.DateTime" HeaderText="AvailDate" SortExpression="AvailDate" UniqueName="AvailDate"> </telerik:GridBoundColumn> </Columns> </MasterTableView> <HeaderContextMenu EnableImageSprites="True" CssClass="GridContextMenu GridContextMenu_Default"></HeaderContextMenu> </telerik:RadGrid> <asp:AccessDataSource ID="TitlesDataSource" runat="server" DataFile="~/App_Data/PDF GENERATOR DATA.accdb" SelectCommand="SELECT * FROM [Avails]"></asp:AccessDataSource> <telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" Runat="server" InitialDelayTime="5" MinDisplayTime="5" Skin="Default" Transparency="20"> </telerik:RadAjaxLoadingPanel> <telerik:RadAjaxManager ID="RadAjaxManager1" runat="server" DefaultLoadingPanelID="RadAjaxLoadingPanel1"> <AjaxSettings> <telerik:AjaxSetting AjaxControlID="SelectedGrid"> <UpdatedControls> <telerik:AjaxUpdatedControl ControlID="SelectedGrid" /> <telerik:AjaxUpdatedControl ControlID="TitlesGrid" /> </UpdatedControls> </telerik:AjaxSetting> <telerik:AjaxSetting AjaxControlID="TitlesGrid"> <UpdatedControls> <telerik:AjaxUpdatedControl ControlID="SelectedGrid" /> <telerik:AjaxUpdatedControl ControlID="TitlesGrid" /> </UpdatedControls> </telerik:AjaxSetting> </AjaxSettings> </telerik:RadAjaxManager> </div> <div style="width:48%; float:left"> <telerik:RadGrid ID="SelectedGrid" runat="server" Skin="Vista" AllowMultiRowSelection="True"> <ClientSettings AllowRowsDragDrop="True"> <Selecting AllowRowSelect="True" /> </ClientSettings> <MasterTableView> <CommandItemSettings ExportToPdfText="Export to Pdf"></CommandItemSettings> <RowIndicatorColumn> <HeaderStyle Width="20px"></HeaderStyle> </RowIndicatorColumn> <ExpandCollapseColumn> <HeaderStyle Width="20px"></HeaderStyle> </ExpandCollapseColumn> </MasterTableView> <HeaderContextMenu EnableImageSprites="True" CssClass="GridContextMenu GridContextMenu_Vista"></HeaderContextMenu> </telerik:RadGrid> </div> </asp:Content>
rdChart2.Series(0).Clear()
rdChart2.Series(0).DataXColumn =
"Compliance"
rdChart2.Series(0).DataYColumn =
"Report"
rdChart2.DataSource = dailDataSet
rdChart2.DataBind()
rdChart2.PlotArea.XAxis.AutoScale =
False