or
<
telerik:RadComboBox
runat
=
"server"
ID
=
"ComboAllContacts"
Width
=
"300"
ShowMoreResultsBox
=
"true"
MaxLength
=
"250"
EnableVirtualScrolling
=
"true"
EnableLoadOnDemand
=
"true"
EmptyMessage
=
"Select Area"
MarkFirstMatch
=
"false"
AllowCustomText
=
"false"
HighlightTemplatedItems
=
"false"
EnableItemCaching
=
"false"
MinFilterLength
=
"1"
CssClass
=
"fx-areaselector"
OnItemsRequested
=
"rcboSearch_ItemsRequested"
skin
=
"Fluent"
EnableEmbeddedSkins
=
"false"
DataValueField
=
"CRMAreaID"
ClientIDMode
=
"Static"
>
<
ItemTemplate
>
<
div
class
=
"searchResult"
>
<
div
class
=
"profilePicContainer"
>
<
a
title
=
"View <%# DataBinder.Eval(Container, "
Attributes['Name']")%>"><%# DataBinder.Eval(Container, "Attributes['Name']")%></
a
>
</
div
>
</
div
>
<
div
class
=
"separatorTemplate"
style
=
"display: none;"
>
<
h2
><%#DataBinder.Eval(Container, "Attributes['Name']")%></
h2
>
</
div
>
</
ItemTemplate
>
</
telerik:RadComboBox
>
If
Not
IsPostBack
Then
Dim
currentRowType =
String
.Empty
Dim
ds
As
DataSet = AreaHelper.GetMyAreas()
Dim
dt
As
DataTable = ds.Tables(0)
ComboAllContacts.DataValueField =
"CRMAreaID"
For
Each
row
As
DataRow
In
dt.Rows
Dim
item
As
New
RadComboBoxItem
Dim
CRMAreaID
As
String
= row(
"CRMAreaID"
).ToString()
Dim
Name
As
String
= row(
"Name"
).ToString()
Dim
Region
As
String
= row(
"Region"
).ToString()
If
currentRowType <> Region
Then
' Add separator Row
ComboAllContacts.Items.Add(CreateSeparatorItem(Region))
currentRowType = Region
End
If
item.Value = CRMAreaID.ToString()
item.Text = Name
item.Attributes.Add(
"CRMAreaID"
, CRMAreaID)
item.Attributes.Add(
"Region"
, Region)
item.Attributes.Add(
"Name"
, Name)
item.Attributes.Add(
"IsSeparator"
,
False
)
item.Attributes.Add(
"onclick"
,
"NavigateAreaSelection("
+ CRMAreaID +
")"
)
If
Not
String
.IsNullOrWhiteSpace(item.Text)
Then
ComboAllContacts.Items.Add(item)
End
If
Next
row
ComboAllContacts.DataBind()
End
If
Protected
Sub
Protected
Sub
rcboSearch_ItemsRequested(
ByVal
sender
As
Object
,
ByVal
e
As
RadComboBoxItemsRequestedEventArgs)
'' RadComboBox combo = this.FindControl("combo") as RadComboBox;
ComboAllContacts.ClearSelection()
ComboAllContacts.Items.Clear()
ComboAllContacts.Dispose()
ComboAllContacts.Text =
""
Dim
data
As
DataTable = GetData(e.Text)
Dim
itemOffset
As
Integer
= e.NumberOfItems
Dim
endOffset
As
Integer
= data.Rows.Count
''Math.Min(itemOffset + ItemsPerRequest, data.Rows.Count)
e.EndOfItems = endOffset = data.Rows.Count
'If data.Rows.Count > 0 Then
'End If
Dim
currentRowType =
String
.Empty
''For i As Integer = itemOffset To endOffset - 1
For
Each
row
As
DataRow
In
data.Rows
Dim
item
As
New
RadComboBoxItem
'Dim CRMAreaID As String = data.Rows(i)("RowID").ToString()
'Dim rowName As String = data.Rows(i)("Name").ToString()
'Dim Region As String = data.Rows(i)("Region").ToString()
Dim
CRMAreaID
As
String
= row(
"RowID"
).ToString()
Dim
rowName
As
String
= row(
"Name"
).ToString()
Dim
Region
As
String
= row(
"Region"
).ToString()
If
currentRowType <> Region
Then
' Add separator Row
ComboAllContacts.Items.Add(CreateSeparatorItem(Region))
currentRowType = Region
End
If
item.Value = CRMAreaID
item.Text = rowName
item.Attributes.Add(
"CRMAreaID"
, CRMAreaID)
item.Attributes.Add(
"Region"
, Region)
item.Attributes.Add(
"Name"
, rowName)
item.Attributes.Add(
"IsSeparator"
,
False
)
item.Attributes.Add(
"onclick"
,
"NavigateAreaSelection("
+ CRMAreaID +
")"
)
If
Not
String
.IsNullOrWhiteSpace(item.Text)
Then
ComboAllContacts.Items.Add(item)
End
If
''Next row
Next
If
ComboAllContacts.Items.Count > 0
Then
ComboAllContacts.DataBind()
Else
End
If
e.Message = GetStatusMessage(endOffset, ComboAllContacts.Items.Count)(
ByVal
sender
As
Object
,
ByVal
e
As
RadComboBoxItemsRequestedEventArgs)
'' RadComboBox combo = this.FindControl("combo") as RadComboBox;
ComboAllContacts.ClearSelection()
ComboAllContacts.Items.Clear()
ComboAllContacts.Dispose()
ComboAllContacts.Text =
""
Dim
data
As
DataTable = GetData(e.Text)
Dim
itemOffset
As
Integer
= e.NumberOfItems
Dim
endOffset
As
Integer
= data.Rows.Count
''Math.Min(itemOffset + ItemsPerRequest, data.Rows.Count)
e.EndOfItems = endOffset = data.Rows.Count
'If data.Rows.Count > 0 Then
'End If
Dim
currentRowType =
String
.Empty
''For i As Integer = itemOffset To endOffset - 1
For
Each
row
As
DataRow
In
data.Rows
Dim
item
As
New
RadComboBoxItem
'Dim CRMAreaID As String = data.Rows(i)("RowID").ToString()
'Dim rowName As String = data.Rows(i)("Name").ToString()
'Dim Region As String = data.Rows(i)("Region").ToString()
Dim
CRMAreaID
As
String
= row(
"RowID"
).ToString()
Dim
rowName
As
String
= row(
"Name"
).ToString()
Dim
Region
As
String
= row(
"Region"
).ToString()
If
currentRowType <> Region
Then
' Add separator Row
ComboAllContacts.Items.Add(CreateSeparatorItem(Region))
currentRowType = Region
End
If
item.Value = CRMAreaID
item.Text = rowName
item.Attributes.Add(
"CRMAreaID"
, CRMAreaID)
item.Attributes.Add(
"Region"
, Region)
item.Attributes.Add(
"Name"
, rowName)
item.Attributes.Add(
"IsSeparator"
,
False
)
item.Attributes.Add(
"onclick"
,
"NavigateAreaSelection("
+ CRMAreaID +
")"
)
If
Not
String
.IsNullOrWhiteSpace(item.Text)
Then
ComboAllContacts.Items.Add(item)
End
If
''Next row
Next
If
ComboAllContacts.Items.Count > 0
Then
ComboAllContacts.DataBind()
Else
End
If
e.Message = GetStatusMessage(endOffset, ComboAllContacts.Items.Count)
var selectedNode = treeView.get_selectedNode();
alert(selectedNode.get_text());
selectedNode.expand();
<
telerik:RadGrid
ID
=
"radgrid1"
runat
=
"server"
OnDeleteCommand
=
"radgrid1_DeleteCommand"
OnInsertCommand
=
"radgrid1_InsertCommand"
OnUpdateCommand
=
"radgrid1_UpdateCommand"
OnNeedDataSource
=
"radgrid1_NeedDataSource"
OnPreRender
=
"radgrid1_PreRender"
CellSpacing
=
"0"
GridLines
=
"None"
ShowStatusBar
=
"True"
onitemdatabound
=
"radgrid1_ItemDataBound"
onitemcommand
=
"radgrid1_ItemCommand"
>
<
MasterTableView
DataKeyNames
=
"TestId"
AutoGenerateColumns
=
"false"
EditMode
=
"InPlace"
CommandItemSettings-ShowRefreshButton
=
"false"
CommandItemDisplay
=
"TopAndBottom"
CommandItemSettings-AddNewRecordText
=
"Add New"
>
<
Columns
>
<
telerik:GridEditCommandColumn
ButtonType
=
"ImageButton"
>
</
telerik:GridEditCommandColumn
>
<
telerik:GridButtonColumn
ConfirmText
=
"Delete?"
ConfirmDialogType
=
"RadWindow"
ConfirmTitle
=
"Delete"
ButtonType
=
"ImageButton"
CommandName
=
"Delete"
ConfirmDialogHeight
=
"100px"
ConfirmDialogWidth
=
"220px"
>
</
telerik:GridButtonColumn
>
<
telerik:GridTemplateColumn
HeaderText
=
"Enter Id"
DataField
=
"TestName"
UniqueName
=
"TestName"
Visible
=
"true"
>
<
ItemTemplate
>
<
asp:TextBox
ID
=
"txtTestName"
runat
=
"server"
ReadOnly
=
"true"
Text='<%# Eval("TestName") %>' />
<
asp:TextBox
ID
=
"txtTestId"
ReadOnly
=
"true"
runat
=
"server"
Text='<%# Eval("TestId") %>'
Width="100px" />
</
ItemTemplate
>
<
InsertItemTemplate
>
<
asp:DropDownList
ID
=
"ddlTestApp"
runat
=
"server"
>
<
asp:ListItem
Text
=
"Java"
Value
=
"Java"
></
asp:ListItem
>
<
asp:ListItem
Text
=
"UIDesign"
Value
=
"UIDesign"
></
asp:ListItem
>
</
asp:DropDownList
>
<
asp:TextBox
ID
=
"txtTestId"
runat
=
"server"
Width
=
"100px"
></
asp:TextBox
>
<
asp:Button
ID
=
"btnInsertFetchData"
runat
=
"server"
Text
=
"Fetch Details"
OnClick
=
"btnInsertFetchData_Click"
/>
</
InsertItemTemplate
>
<
EditItemTemplate
>
<
asp:DropDownList
ID
=
"ddlTestApp"
runat
=
"server"
>
<
asp:ListItem
Text
=
"Java"
Value
=
"Java"
></
asp:ListItem
>
<
asp:ListItem
Text
=
"UIDesign"
Value
=
"UIDesign"
></
asp:ListItem
>
</
asp:DropDownList
>
<
asp:TextBox
ID
=
"txtNetworkId"
runat
=
"server"
Text='<%# Eval("TestId") %>'
Width="100px"></
asp:TextBox
>
<
asp:Button
ID
=
"btnUpdateFetchData"
runat
=
"server"
Text
=
"Fetch Details"
OnClick
=
"btnUpdateFetchData_Click"
/>
</
EditItemTemplate
>
</
telerik:GridTemplateColumn
>
<
telerik:GridTemplateColumn
DataField
=
"FirstName"
UniqueName
=
"FirstName"
Visible
=
"true"
HeaderText
=
"First Name"
>
<
InsertItemTemplate
>
<
telerik:RadTextBox
ID
=
"RadtxtFirstName"
runat
=
"server"
Text
=
""
Width
=
"100px"
>
</
telerik:RadTextBox
>
</
InsertItemTemplate
>
<
EditItemTemplate
>
<
telerik:RadTextBox
ID
=
"RadtxtFirstName"
runat
=
"server"
Text='<%# Eval("FirstName") %>'
Width="100px">
</
telerik:RadTextBox
>
</
EditItemTemplate
>
<
ItemTemplate
>
<
telerik:RadTextBox
ID
=
"RadtxtFirstName"
ReadOnly
=
"true"
runat
=
"server"
Text='<%# Eval("FirstName") %>'
Width="100px" />
</
ItemTemplate
>
</
telerik:GridTemplateColumn
>
</
Columns
>
</
MasterTableView
>
<
ClientSettings
EnableRowHoverStyle
=
"true"
>
</
ClientSettings
>
</
telerik:RadGrid
>