or
<%@ Page Language="C#" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<
script
runat
=
"server"
>
protected override void OnLoad(EventArgs e)
{
base.OnLoad(e);
}
</
script
>
<
html
xmlns
=
"http://www.w3.org/1999/xhtml"
>
<
head
id
=
"Head1"
runat
=
"server"
>
<
title
></
title
>
<
style
>
html, body, form
{
height: 100%;
margin: 0px;
padding: 0px;
overflow: hidden;
}
body
{
background-color:#FFFFFF;
font-size:12px;
font-family:Arial;
direction:rtl;
}
#main
{
height: 100%
}
</
style
>
</
head
>
<
body
>
<
form
id
=
"form2"
runat
=
"server"
>
<
asp:ScriptManager
ID
=
"ScriptManager"
runat
=
"server"
>
<
Scripts
>
<
asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name
=
"Telerik.Web.UI.Common.Core.js"
/>
</
Scripts
>
</
asp:ScriptManager
>
<
telerik:RadAjaxManager
ID
=
"RadAjaxManager1"
runat
=
"server"
EnableOutsideScripts
=
"true"
EnablePageHeadUpdate
=
"False"
> </
telerik:RadAjaxManager
>
<
div
id
=
"main"
>
<
asp:Panel
runat
=
"server"
Height
=
"45"
>
header
</
asp:Panel
>
<
asp:Panel
runat
=
"server"
Height
=
"100%"
>
<
telerik:RadAjaxLoadingPanel
ID
=
"RadAjaxLoadingPanel1"
runat
=
"server"
/>
<
telerik:RadSplitter
ID
=
"NestedSplitter"
runat
=
"server"
LiveResize
=
"true"
Height
=
"100%"
Width
=
"100%"
>
<
telerik:RadPane
ID
=
"LeftPane"
runat
=
"server"
Width
=
"200"
MinWidth
=
"150"
MaxWidth
=
"400"
>
main menu
</
telerik:RadPane
>
<
telerik:RadSplitBar
ID
=
"VerticalSplitBar"
runat
=
"server"
CollapseMode
=
"Backward"
/>
<
telerik:RadPane
ID
=
"ContentPane"
runat
=
"server"
>
<
telerik:RadAjaxPanel
ID
=
"RadAjaxPanel1"
runat
=
"server"
LoadingPanelID
=
"RadAjaxLoadingPanel1"
>
<
telerik:RadSplitter
ID
=
"MainSplitter"
runat
=
"server"
Height
=
"100%"
Width
=
"100%"
Orientation
=
"Horizontal"
>
<
telerik:RadPane
ID
=
"TopPane"
runat
=
"server"
Scrolling
=
"Y"
Height
=
"30%"
MinHeight
=
"100"
CssClass
=
"TopPane"
>
top content
</
telerik:RadPane
>
<
telerik:RadSplitBar
ID
=
"RadsplitbarTop"
runat
=
"server"
CollapseMode
=
"Forward"
/>
<
telerik:RadPane
ID
=
"MainPane"
runat
=
"server"
Scrolling
=
"Y"
Height
=
"70%"
>
edit content
</
telerik:RadPane
>
</
telerik:RadSplitter
>
</
telerik:RadAjaxPanel
>
</
telerik:RadPane
>
</
telerik:RadSplitter
>
</
asp:Panel
>
</
div
>
</
form
>
</
body
>
</
html
>
If
ViewState(
"MasterEdit"
)
Is
Nothing
Or
Not
ViewState(
"MasterEdit"
) =
True
Then
Dim
editCol
As
GridEditCommandColumn
editCol =
New
GridEditCommandColumn
editCol.UniqueName =
"MasterEditColumn"
editCol.HeaderText =
""
editCol.HeaderStyle.Width = 20
editCol.ButtonType = GridButtonColumnType.ImageButton
editCol.EditImageUrl =
"~\img\edit.gif"
editCol.EditFormColumnIndex = 0
rgdTable.MasterTableView.Columns.Add(editCol)
ViewState.Add(
"MasterEdit"
,
True
)
End
If
<
form
id
=
"form1"
runat
=
"server"
>
<
telerik:RadScriptManager
ID
=
"RadScriptManager1"
runat
=
"server"
>
<
Scripts
>
<
asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name
=
"Telerik.Web.UI.Common.Core.js"
></
asp:ScriptReference
>
<
asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name
=
"Telerik.Web.UI.Common.jQuery.js"
></
asp:ScriptReference
>
<
asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name
=
"Telerik.Web.UI.Common.jQueryInclude.js"
></
asp:ScriptReference
>
</
Scripts
>
</
telerik:RadScriptManager
>
<
telerik:RadGrid
ID
=
"CustomerInfoGrid"
runat
=
"server"
AutoGenerateColumns
=
"False"
CellSpacing
=
"0"
DataSourceID
=
"CRMData"
GridLines
=
"None"
AllowPaging
=
"True"
PageSize
=
"20"
AllowFilteringByColumn
=
"True"
AllowSorting
=
"True"
>
<
MasterTableView
DataKeyNames
=
"CustomerID"
DataSourceID
=
"CRMData"
>
<
CommandItemSettings
ExportToPdfText
=
"Export to PDF"
></
CommandItemSettings
>
<
RowIndicatorColumn
Visible
=
"True"
FilterControlAltText
=
"Filter RowIndicator column"
>
<
HeaderStyle
Width
=
"20px"
></
HeaderStyle
>
</
RowIndicatorColumn
>
<
ExpandCollapseColumn
Visible
=
"True"
FilterControlAltText
=
"Filter ExpandColumn column"
>
<
HeaderStyle
Width
=
"20px"
></
HeaderStyle
>
</
ExpandCollapseColumn
>
<
Columns
>
<
telerik:GridTemplateColumn
UniqueName
=
"GenerateSupportCode"
AllowFiltering
=
"False"
Groupable
=
"False"
HeaderText
=
"Support Code"
Reorderable
=
"False"
ShowSortIcon
=
"False"
></
telerik:GridTemplateColumn
>
<
telerik:GridBoundColumn
DataField
=
"CustomerID"
DataType
=
"System.Int32"
FilterControlAltText
=
"Filter CustomerID column"
HeaderText
=
"Customer ID"
ReadOnly
=
"True"
SortExpression
=
"CustomerID"
UniqueName
=
"CustomerID"
></
telerik:GridBoundColumn
>
<
telerik:GridBoundColumn
DataField
=
"CustomerName"
FilterControlAltText
=
"Filter CustomerName column"
HeaderText
=
"Customer Name"
SortExpression
=
"CustomerName"
UniqueName
=
"CustomerName"
></
telerik:GridBoundColumn
>
<
telerik:GridBoundColumn
DataField
=
"FingerprintData"
FilterControlAltText
=
"Filter CustomerName column"
Display
=
"False"
SortExpression
=
"FingerprintData"
UniqueName
=
"FingerprintData"
></
telerik:GridBoundColumn
>
<
telerik:GridTemplateColumn
UniqueName
=
"ClearFingerprintDataColumn"
AllowFiltering
=
"False"
Groupable
=
"False"
HeaderText
=
"Fingerprint Data"
Reorderable
=
"False"
SortExpression
=
"FingerprintData"
></
telerik:GridTemplateColumn
>
<
telerik:GridBoundColumn
DataField
=
"LicenseData"
FilterControlAltText
=
"Filter CustomerName column"
Display
=
"False"
SortExpression
=
"LicenseData"
UniqueName
=
"LicenseData"
></
telerik:GridBoundColumn
>
<
telerik:GridTemplateColumn
UniqueName
=
"ClearLicenseDataColumn"
AllowFiltering
=
"False"
Groupable
=
"False"
HeaderText
=
"License Data"
Reorderable
=
"False"
SortExpression
=
"LicenseData"
></
telerik:GridTemplateColumn
>
</
Columns
>
<
EditFormSettings
>
<
EditColumn
FilterControlAltText
=
"Filter EditCommandColumn column"
></
EditColumn
>
</
EditFormSettings
>
</
MasterTableView
>
<
PagerStyle
Position
=
"TopAndBottom"
/>
<
FilterMenu
EnableImageSprites
=
"False"
>
<
WebServiceSettings
>
<
ODataSettings
InitialContainerName
=
""
></
ODataSettings
>
</
WebServiceSettings
>
</
FilterMenu
>
<
HeaderContextMenu
CssClass
=
"GridContextMenu GridContextMenu_Default"
>
<
WebServiceSettings
>
<
ODataSettings
InitialContainerName
=
""
></
ODataSettings
>
</
WebServiceSettings
>
</
HeaderContextMenu
>
</
telerik:RadGrid
>
<
asp:SqlDataSource
ID
=
"CRMData"
runat
=
"server"
ConnectionString="<%$ ConnectionStrings:CRMConnectionString %>"
SelectCommand="SELECT [CustomerName], [CustomerID], [LicenseData], [FingerprintData] FROM [Customers] WHERE ([Deleted] = @Deleted) ORDER BY [CustomerName]">
<
SelectParameters
>
<
asp:Parameter
DefaultValue
=
"0"
Name
=
"Deleted"
Type
=
"Byte"
/>
</
SelectParameters
>
</
asp:SqlDataSource
>
</
form
>
Codebehind:
protected
void
CustomerInfoGrid_ItemDataBound(
object
sender, Telerik.Web.UI.GridItemEventArgs e)
{
if
(e.Item
is
GridDataItem)
{
Button btn =
null
;
GridDataItem dataItem = e.Item
as
GridDataItem;
btn =
new
Button();
btn.OnClientClick = String.Format(
"return GetSupportCode({0})"
, dataItem[
"CustomerID"
].Text);
btn.Text =
"Generate"
;
dataItem[
"GenerateSupportCode"
].Controls.Add(btn);
dataItem[
"FingerprintData"
].Text = dataItem[
"FingerprintData"
].Text.Replace(
" "
,
""
);
if
(!String.IsNullOrEmpty(dataItem[
"FingerprintData"
].Text.Trim()))
{
btn =
new
Button();
btn.OnClientClick = String.Format(
"return ClearFingerprintData({0})"
, dataItem[
"CustomerID"
].Text);
btn.Text =
"Clear"
;
dataItem[
"ClearFingerprintDataColumn"
].Controls.Add(btn);
}
dataItem[
"LicenseData"
].Text = dataItem[
"LicenseData"
].Text.Replace(
" "
,
""
);
if
(!String.IsNullOrEmpty(dataItem[
"LicenseData"
].Text.Trim()))
{
btn =
new
Button();
btn.OnClientClick = String.Format(
"return ClearLicenseData({0})"
, dataItem[
"CustomerID"
].Text);
btn.Text =
"Clear"
;
dataItem[
"ClearLicenseDataColumn"
].Controls.Add(btn);
}
}
}
Private Sub chart1_ItemDataBinding(ByVal sender As Object, ByVal e As EventArgs) Handles Chart1.ItemDataBinding
Chart1.PlotArea.XAxis.Appearance.LabelAppearance.RotationAngle = -90
If Me.ReportParameters("Time").Value.ToString.Trim = "Daily" Then
Chart1.PlotArea.XAxis.DataLabelsColumn = "userlogdate"
ElseIf Me.ReportParameters("Time").Value.ToString.Trim = "Yearly" Then
Chart1.PlotArea.XAxis.DataLabelsColumn = "year"
Chart1.DataGroupColumn = "year"
ElseIf Me.ReportParameters("Time").Value.ToString.Trim = "Monthly" Then
Chart1.DataGroupColumn = "month"
Chart1.PlotArea.XAxis.DataLabelsColumn = "month"
Chart1.PlotArea.XAxis.Appearance.ValueFormat = Charting.Styles.ChartValueFormat.ShortDate
Chart1.PlotArea.XAxis.Appearance.CustomFormat = ???
End If
End Sub