or
<
telerik:RadTreeView
ID
=
"tvHierarchy"
runat
=
"server"
CheckBoxes
=
"True"
LoadingStatusPosition
=
"BeforeNodeText"
OnClientNodeChecked
=
"tv_Check"
OnClientNodeClicking
=
"tv_Clk"
>
<
CollapseAnimation
Duration
=
"100"
Type
=
"None"
/>
<
ExpandAnimation
Duration
=
"100"
/>
</
telerik:RadTreeView
>
For
Each
rootNode
As
dbo_BASE_NODE
In
rootNodes
Dim
node
As
New
RadTreeNode()
node.Text = rootNode.BN_ID &
" "
& rootNode.BN_NAME
node.Value = rootNode.HN_RID
tvHierarchy.Nodes.Add(node)
Next
<
telerik.web.ui
>
<
radCompression
>
<
excludeHandlers
>
<
add
handlerPath
=
"LaunchLink.aspx"
matchExact
=
"false"
/>
<
add
handlerPath
=
"LaunchExternalSite.aspx"
matchExact
=
"false
/>
</
excludeHandlers
>
</
radCompression
>
</
telerik.web.ui
>