Hi,
I try to set a search box from list
however when I put words into the search box it is not showed a drop-down (AutoComplete) list with a proper result
I'll be glad for your help
Daniel
ASPX:
VB.NET
I try to set a search box from list
however when I put words into the search box it is not showed a drop-down (AutoComplete) list with a proper result
I'll be glad for your help
Daniel
ASPX:
<
telerik:RadAjaxPanel
ID
=
"RadAjaxPanel1"
runat
=
"server"
>
<
telerik:RadSearchBox
ID
=
"RadSearchBox1"
runat
=
"server"
Width
=
"250"
DataTextField
=
"Text"
DataValueField
=
"ReportID"
OnSearch
=
"RadSearchBox1_Search"
EnableAutoComplete
=
"true"
>
<
DropDownSettings
Height
=
"150"
Width
=
"250"
/>
</
telerik:RadSearchBox
>
</
telerik:RadAjaxPanel
>
<
br
/>
<
br
/>
<
br
/>
<
br
/>
<
br
/>
<
br
/>
<
br
/>
<
br
/>
<
telerik:RadTreeView
ID
=
"RadTreeView1"
Runat
=
"server"
>
</
telerik:RadTreeView
>
VB.NET
Imports
Telerik.Web.UI
Public
Class
searchTest
Inherits
System.Web.UI.Page
Dim
listreports
As
New
List(Of SiteDataItem)()
Protected
Sub
Page_Load(
ByVal
sender
As
Object
,
ByVal
e
As
System.EventArgs)
Handles
Me
.Load
If
Not
IsPostBack
Then
BindToIEnumerable(RadTreeView1)
End
If
' RadSearchBox1.DataTextField = "Text"
' RadSearchBox1.DataValueField = "ReportID"
RadSearchBox1.DataSource = listreports
End
Sub
Friend
Class
SiteDataItem
Private
text1
As
String
Private
id1
As
Integer
Private
parentId1
As
Integer
Private
reportId1
As
String
Public
Property
Text()
As
String
Get
Return
text1
End
Get
Set
(
ByVal
value
As
String
)
text1 = value
End
Set
End
Property
Public
Property
ID()
As
Integer
Get
Return
id1
End
Get
Set
(
ByVal
value
As
Integer
)
id1 = value
End
Set
End
Property
Public
Property
ParentID()
As
Integer
Get
Return
parentId1
End
Get
Set
(
ByVal
value
As
Integer
)
parentId1 = value
End
Set
End
Property
Public
Property
ReportID()
As
String
Get
Return
reportId1
End
Get
Set
(
ByVal
value
As
String
)
reportId1 = value
End
Set
End
Property
Public
Sub
New
(
ByVal
id
As
Integer
,
ByVal
parentId
As
Integer
,
ByVal
text
As
String
,
Optional
ByVal
reportId
As
String
=
"99"
)
Me
.id1 = id
Me
.parentId1 = parentId
Me
.text1 = text
Me
.reportId1 = reportId
End
Sub
End
Class
Private
Sub
BindToIEnumerable(
ByVal
treeView
As
RadTreeView)
Dim
siteData
As
New
List(Of SiteDataItem)()
siteData.Add(
New
SiteDataItem(1, 0,
"Location"
))
siteData.Add(
New
SiteDataItem(2, 0,
"func 1"
))
siteData.Add(
New
SiteDataItem(3, 0,
"func behavior"
))
siteData.Add(
New
SiteDataItem(4, 0,
"func 4"
))
siteData.Add(
New
SiteDataItem(5, 0,
"Additional reports"
))
siteData.Add(
New
SiteDataItem(6, 0,
"func 5 "
))
siteData.Add(
New
SiteDataItem(7, 0,
"func 6"
))
siteData.Add(
New
SiteDataItem(8, 0,
"example 5"
))
siteData.Add(
New
SiteDataItem(9, 0,
"Raw events"
))
siteData.Add(
New
SiteDataItem(10, 0,
"Care"
))
siteData.Add(
New
SiteDataItem(11, 0,
"Raw events"
))
siteData.Add(
New
SiteDataItem(12, 0,
"Working Reports"
, ))
siteData.Add(
New
SiteDataItem(13, 12,
"Sunday "
,
"101"
))
siteData.Add(
New
SiteDataItem(14, 12,
"Monday"
,
"102"
))
siteData.Add(
New
SiteDataItem(15, 12,
"Summery"
,
"103"
))
siteData.Add(
New
SiteDataItem(16, 12,
"Friday"
,
"104"
))
siteData.Add(
New
SiteDataItem(17, 0,
"New MultiLanguea Report"
,
"105"
))
treeView.DataTextField =
"Text"
treeView.DataFieldID =
"ID"
treeView.DataFieldParentID =
"ParentID"
treeView.DataValueField =
"ReportID"
treeView.DataSource = siteData
treeView.DataBind()
listreports = siteData
End
Sub
Protected
Sub
RadTreeView1_NodeClick(sender
As
Object
, e
As
RadTreeNodeEventArgs)
Handles
RadTreeView1.NodeClick
Session(
"Report_ID"
) = e.Node.Value
End
Sub
Protected
Sub
RadSearchBox1_Search(sender
As
Object
, e
As
SearchBoxEventArgs)
Handles
RadSearchBox1.Search
'setreport(e.Value)
End
Sub
End
Class