[导读]如何不编写一行代码就完成站点的导航工作,如何实现更加灵活的导航,在过去的日子对于开发人员来说是一个天方夜谭,从今开始,将不再是一个梦想。Visual Studio 2005提供的导航控件将为我们做好这一切的工作,本文详细介绍了在Visual Studio 2005下利用Breadcrumb控件实现导航。

在为Web应用程序生成UI时,首要工作之一是设计Web站点的总体结构,包括所有的站点导航。导航控件通常放在Web页的左侧或顶部,并且可能包括渐成气候的breadcrumb导航(它显示用户曾经浏览的路径),从而创建总体菜单系统。实现导航的技术有很多,但对于开发人员而言它们通常过于繁琐。这方面的例子有DHTML、include文件(对于那些使用传统ASP的人们而言)和ASP.NET中的用户控件。某些情况下导航元素被硬编码,但更常见的情形是,导航项目被保存在数据存储中以供在运行时进行只读访问——无论是在数据库(及高速缓存)中还是在XML配置文件中。

在ASP.NET 2.0中,实现站点导航所需的大多数工作均已内置,这使您能够利用丰富的功能集并且无须编写一行服务器端代码。

简单的Web站点

要证明使用ASP.NET 2.0导航控件生成Web站点是如此之简单,我们创建了一个例子——一家虚构的万事通型计算机公司:Northwind Traders。该公司Web站点的左侧有一个菜单,在右上方有一个浏览途径记录(breadcrumb)。请在Visual Studio 2005设计器中观察其中一个页面的设计(如图1所示),您可以看到有三个控件被圈了起来。蓝色圈起来的是SiteMapPath控件,它有效地显示了常见的Breadcrumb导航。红色圈起来的是TreeView控件,它当前被设置为显示平面视图,并且不能展开。绿色圈起来的是SiteMapDataSource控件,它充当TreeView控件的数据源。在我们演练新的导航控件、它们的属性以及其他有趣的项目时,请记住这张图。

PathDirection默认值为RootToCurrent,它以下列方式显示breadcrumb:Home > Products > Software。另一个选项是CurrentToRoot,它将前面的顺序颠倒过来:Software > Products > Home。

PathSeparator这是您希望在breadcrumb节点之间显示的任何文字。不要忘记包含前导空格和尾随空格。例如,要显示“Home > Products > Software”,您应该将该属性设置为“>”,而不是“>”。

RenderCurrentNodeAsLink这基本上决定了是否在breadcrumb中将您所在的当前页显示为指向自身的链接。默认值为False。

以下列表中的每一项都是一组属性,用于定义所有的字体和样式项以及总体外观。每组属性都包含相同的属性子集。

CurrentNodeStyle为breadcrumb中的当前节点提供外观(可替代NodeStyle)。

HoverNodeStyle当鼠标在某个breadcrumb节点上悬停时,决定该节点的外观。

NodeStyle当显示breadcrumb时,为breadcrumb中的所有节点提供统一的样式(除非它由RootNodeStyle或CurrentNodeStyle替代)。

PathSeparatorStyle是您在PathSeparator中定义的任意文字设置外观。

RootNodeStyle决定breadcrumb根节点的样式(可替代NodeStyle)。

如您所见,您可以完全控制breadcrumb的行为和外观,并且这些行为和外观都已经准备好供您使用,从而使您无需编写服务器端代码。例如,如果您希望用户快速识别Web站点的breadcrumb中的当前节点,可以将CurrentNodeStyle下的font bold(粗体)属性设置为True,或者将font size(字号)设置为Large,同时,可以将NodeStyle下的font bold属性设置为False,而将其font size设置为Small。快速查看一下Northwind Traders Web站点主页的源代码,就可以明白我们是如何实现SiteMapPath控件的:

<asp:SiteMapPath id="SiteMapPath1" runat="server" pathseparator=" -> ">
<hovernodestyle cssclass="crumbHoverNode" />
<nodestyle cssclass="crumbNode" />
<pathseparatorstyle cssclass="crumbPathSeparator" />
</asp:SiteMapPath>

SiteMapPath控件还有一个名为SiteMapProvider的属性。当该属性为空(默认)时,控件将使用前面提到的AspNetXmlSiteMapProvider(或XmlSiteMapProvider),随后它将读取web.SiteMap文件。如果您创建了自己的站点映射提供程序,并且在machine.config或web.config中添加了该项,则这就是您用来进行相应更改的属性。

SiteMapDataSource控件

当需要查看层次结构数据(例如,公共导航结构)时,该控件十分重要。SiteMapDataSource控件经常被用作供其他控件(如TreeView或DropDownList控件)绑定的数据源。要使用SiteMapDataSource控件,请在设计器工具箱的“Data”选项卡下找到它,并将它拖放到Web窗体中。


图4 SiteMapDataSource属性

如果看一下图4,您就会发现SiteMapDataSource控件的属性列表开销不是很大,下面让我们详细讨论一下该控件的每个属性。

EnableViewState如果使用过ASP.NET,您就会很熟悉该属性。它用于打开或关闭ViewState。默认情况下,该值设置为True。

FlatDepth该属性指定从分层网站地图检索节点的深度(由SiteMapProvider提供,默认情况下是web.SiteMap文件)。默认值为-1,这表示对深度没有限制。值0对应于层次结构的根节点级别,而正整数对应于低于根节点的多个级别。如果层次结构较深,并希望限制对一些级别的显示,则该属性十分有用。

ParentLevelsDisplayed指定要检索的父节点的等级数(相对于当前节点)。默认值为–1,这表示对所检索的父层没有限制。

SiteMapProvider决定供控件绑定的站点映射提供程序。默认值为空,这意味着控件使用前面讨论过的默认站点映射提供程序。如果您希望使用自己的站点映射提供程序,而不是默认的站点映射提供程序,则应该在此处键入它。

SiteMapViewType决定如何查看数据源。默认值为Tree,它使用与站点映射所指定的相同的层次结构来表示数据。其他值为Flat和Path。Flat只显示没有层次结构的节点平面视图,而Path将数据显示为当前节点和根节点之间的层次结构路径,这与SiteMapPath控件呈现其站点映射数据的方式相同。

StartingDepth指定控件开始从web.SiteMap文件中检索元素的深度。默认值为-1,表示对于数据源开始检索节点的深度没有限制。值0用于表示根节点。

StartingNodeType默认情况下,该属性设置为Root,这意味着起始节点是层次结构的根节点,但您可以将起始节点设置为任意节点。通过将该属性设置为Parent或Current,可以将起始节点设置为相对于站点映射中当前位置的某个节点。如果您使用Parent,则控件总是从当前显示页的父节点开始,除非当前显示页对应于根节点。如果将该属性设置为Current,则控件将始终从表示当前显示页的节点开始。

StartingNodeUrl您可以将web.SiteMap文件中元素的URL指定为起始节点,而不是将起始节点设置为Root、Current或Parent节点。设置该属性的过程应优先于StartingDepth和StartingNodeType属性。

ID在使用某个控件作为其他控件(如TreeView或DropDownList控件)的数据源时,记录该控件的ID。

Northwind Traders Web站点上SiteMapDataSource控件的典型声明,该声明使用所有属性(SiteMapViewType除外)的默认值,如下所示:

<asp:SiteMapDataSource
id="SiteMapDataSource1"
runat="server"
SiteMapviewtype="Flat"
/>

对于您可以拥有的SiteMapDataSource控件的数量,没有任何限制。例如,您可以在Web页的左侧拥有一个绑定到一个SiteMapDataSource控件的TreeView控件,并在右侧拥有绑定到另一个SiteMapDataSource控件的平面导航控件。

TreeView控件

对于曾经使用Windows窗体开发基于Windows应用程序的人来说,应该比较熟悉TreeView控件,然而,在Web应用程序领域中,使用TreeView还不太普遍。当前要在Web站点中实现与TreeView类似的功能,通常必须在客户端编写大量的DHTML,以使其正常工作。这被证明是非常痛苦的一件事,因为您必须考虑各种Web浏览器及其各个版本的所有特质,而测试将十分困难。在ASP.NET 2.0中,所有这些复杂性都不存在了,它们被封装在新增的TreeView控件中。

要使用TreeView控件进行站点导航,最容易的方法是从设计器工具箱中拖动该控件(位于Core选项卡下),并将它的数据源绑定到SiteMapDataSource控件。在完成该工作以后,剩下的实现就是设置属性——自始至终都不必编写任何服务器端代码。与SiteMapPath控件一样,在本文中难以对它的所有属性进行讨论,但图5列出了主要属性。在这里,我们将详细介绍个别几个属性。


图5 TreeView属性

ImageSet它可定义一组要在TreeView控件中使用的图像。它提供了大量图像集样式,最著名的有Custom、MSDN、XPFileExplorer和Windows_Help。采用其中一个预先定义的图像集,可以让TreeView使用熟悉的图像并继承所有样式。

ShowExpandCollapse起初,这看上去可能有些奇怪,因为我们都习惯于看到带有展开/折叠指示符(+号和–号)的TreeView,然而,该属性为您提供了不显示这些指示符的选项。但是,默认值为True。

ShowLines该属性决定是否在父节点树中显示连接子节点的行。默认值为False。

EnableClientScript这是一个相当重要的属性,尤其是在您希望TreeView控件能够展开和折叠时,这种情况很常见(虽然我们选择不在Northwind Traders Web站点中执行这些操作)。该属性指示是否让客户端脚本处理用于展开和折叠节点的事件(默认情况下处理)。将该属性设置为True时,将避免与服务器之间进行代价高昂的信息传递,但是如果您将该属性设置为False,则每当用户单击树中的节点时,都需要向服务器进行回发。

ExpandDepth在首次显示TreeView控件时设置展开的树层次的数目。例如,如果将该属性设置为2,则将展开根节点及根节点下方紧邻的所有父节点。默认值为–1,这表示将所有节点完全展开。

MaxDataBindDepth将此控件绑定到数据源(如SiteMapDataSource控件)时,可使用该属性来限制绑定到该控件的树级别的数目。例如,如果将该属性设置为2,则仅将根节点及根节点下方紧邻的所有节点绑定到TreeView控件。该数据源(SiteMapDataSource控件)中的所有其余节点将被忽略,这在较深的层次结构站点映射中会比较方便。默认值为–1,这会将数据源中的所有树级别绑定到该控件。

PopulateNodesFromClient默认情况下,该属性设置为True,这意味着TreeView将由web.SiteMap文件中的内容静态预先定义。因此,这可以避免到服务器的往返行程。为了使该属性为True,EnableClientScript属性也必须设置为True;否则,将发生到服务器的回发。

DataSourceID这是要绑定到的数据源的ID。如果您已经创建了一个SiteMapDataSource控件,并且希望将其用作TreeView的数据源,则请在此处键入SiteMapDataSource控件的ID。

TreeView控件所具有的属性要比在这里详细介绍的属性多很多,包括SiteMapPath控件中的相同节点样式属性(和子属性),从而使您可以对TreeView的行为和外观进行极为细致的控制。我们将探索其余TreeView属性的工作留给您自己去完成。图6 显示了Northwind Traders Web站点中某个Web页的源代码,使您能够对我们实现TreeView控件的方式有一个大致的了解。

<asp:treeview
id="TreeView1"
runat="server"
datasourceid="SiteMapDataSource1"
font-underline="False"
font-names="Verdana"
font-size="8pt"
font-italic="False"
font-bold="False"
imageset="MSDN"
forecolor="#000000"
nodeindent="30"
backcolor="#EEEEEE"
showexpandcollapse="False"
>

<selectednodestyle
verticalpadding="1"
bordercolor="#999999"
horizontalpadding="3"
backcolor="White"
font-underline="False"
font-italic="False"
font-bold="False"
borderwidth="1px"
borderstyle="Solid"
/>

<hovernodestyle
verticalpadding="1"
bordercolor="#999999"
horizontalpadding="3"
backcolor="#C7C7C7"
font-underline="True"
font-italic="False"
font-bold="False"
borderwidth="1px"
borderstyle="Solid"
/>

<parentnodestyle
font-underline="False"
font-italic="False"
font-bold="False"
/>

<leafnodestyle
font-underline="False"
font-italic="False"
font-bold="False"
/>

<nodestyle
font-underline="False"
forecolor="Black"
verticalpadding="2"
nodespacing="1"
horizontalpadding="4"
font-names="Verdana"
font-size="8pt"
font-italic="False"
font-bold="False"
/>

<rootnodestyle
font-underline="False"
font-italic="False"
font-bold="False"
/>

</asp:treeview>

图6 使用TreeView控件

目前的Breadcrumb控件

现在,您可能在想:这些控件都很棒并且我已经迫不及待地想去使用它们,我希望立即实现该功能。好,我们已经使用ASP.NET 1.1随意创建了一个简单的Breadcrumb控件,并且不是十分严格地将其设计建立在Visual Studio 2005 SiteMapPath控件的基础之上。通过遵循该控件的设计,我们已经创建了一条在需要从该控件切换到新控件时能够方便地进行迁移的途径。很自然地,我们调用了控件Breadcrumb。

对于Breadcrumb控件,我们认为将web.SiteMap文件(及其内部结构)保持为从Web站点根目录中加载的默认数据源会是一个好主意。该示例应该使您对如何逐步完成自己的控件有一个全面的了解,但ASP.NET 2.0最终版本中的实际API和实现可能有所不同。

因为web.SiteMap文件可能包含任意数量的非嵌套和嵌套元素,所以我们创建了SiteMapNode类以存放各个元素的属性,如Title、Url和Description。由于每个元素可以包含其他元素,我们在该类中添加了一个名为NodeList的属性,该属性是其他SiteMapNodes的集合。图7 包含了该类的代码。

Namespace DoughLibrary

Public Class SiteMapNode
Private m_strUrl As String = String.Empty
Private m_strTitle As String = String.Empty
Private m_strDescription As String = String.Empty
Private m_blnHasLeaf As Boolean = False
Private m_objNodeList As SiteMapNodeList

Public Sub New()
Me.New(False)
End Sub

Public Sub New(ByVal hasLeaf As Boolean, ByVal url As String, _
ByVal title As String, ByVal description As _
String)

Me.New(hasLeaf)
Me.m_strUrl = url
Me.m_strTitle = title
Me.m_strDescription = description
End Sub

Public Sub New(ByVal hasLeaf As Boolean)
If (hasLeaf = True) Then
Me.m_blnHasLeaf = True
Me.m_objNodeList = New SiteMapNodeList
Else
Me.m_blnHasLeaf = False
End If
End Sub

Public Property HasLeaf() As Boolean
Get
Return Me.m_blnHasLeaf
End Get
Set(ByVal Value As Boolean)
Me.m_blnHasLeaf = Value
End Set
End Property

Public Property NodeList() As SiteMapNodeList
Get
Return Me.m_objNodeList
End Get
Set(ByVal Value As SiteMapNodeList)
Me.m_objNodeList = Value
End Set
End Property

Public Property Url() As String
Get
Return Me.m_strUrl
End Get
Set(ByVal Value As String)
Me.m_strUrl = Value
End Set
End Property

Public Property Title() As String
Get
Return Me.m_strTitle
End Get
Set(ByVal Value As String)
Me.m_strTitle = Value
End Set
End Property

Public Property Description() As String
Get
Return Me.m_strDescription
End Get
Set(ByVal Value As String)
Me.m_strDescription = Value
End Set
End Property
End Class

End Namespace

图7 SiteMapNode类

图8显示了SiteMapNodeList类的代码,该类是从ArrayList继承的基本集合,但已强类型化为只包含SiteMapNodes。当确定某个SiteMapNode包含其他SiteMapNodes,然后通过向其简单地添加一些SiteMapNode对象来进行填充时,构建SiteMapNodeList类。

Namespace DoughLibrary

Public Class SiteMapNodeList : Inherits ArrayList
Default Public Shadows Property Item(ByVal index As Integer) _
As SiteMapNode

Get
Return CType(MyBase.Item(index), SiteMapNode)
End Get
Set(ByVal Value As SiteMapNode)
MyBase.Item(index) = Value
End Set
End Property

Public Shadows Function Add(ByVal value As SiteMapNode) _
As Integer

MyBase.Add(value)
End Function
End Class

End Namespace

图8 SiteMapNodeList类

与SiteMapNodeList类似,SiteMapPath类也是一个SiteMapNode对象的强类型集合,并且由Breadcrumb控件用来获得要呈现到浏览器的实际节点(实际上,除了类本身的名称以外,该代码与SiteMapNodeList类的代码完全相同)。例如,如果要向用户显示的路径应该是Home > Services > Training,则SiteMapPath对象将包含Home SiteMapNode、Services SiteMapNode和Training SiteMapNode。

请注意,SiteMapPath集合的顺序总是从根节点到当前节点。因此,Breadcrumb控件可以轻松地确定在浏览器中呈现节点时所遵循的方向。如果将PathDirection属性设置为RootToCurrent,控件将按照从第一个元素到最后一个元素的顺序读取SiteMapPath集合,而如果将PathDirection属性设置为CurrentToRoot,控件将按照从最后一个元素到第一个元素的顺序读取该集合。

Imports System.Xml

Namespace DoughLibrary

Public Class SiteMap
Private m_objSiteMapNode As SiteMapNode
Private m_objSiteMapPath As SiteMapPath
Private m_uriSiteMapFile As Uri
Private m_uriCurrentUrl As Uri
Private m_objXmlReader As XmlTextReader
Private m_intNodeDepth As Integer = 0

Public Sub New(ByVal siteMapFile As Uri, ByVal currentUrl As Uri)
Me.m_uriSiteMapFile = siteMapFile
Me.m_uriCurrentUrl = currentUrl
Me.m_objSiteMapNode = New SiteMapNode(True)
Me.LoadSiteMapNodes()
Me.m_objSiteMapPath = GetSiteMapPath()
End Sub

Public ReadOnly Property SiteMapPath() As SiteMapPath
Get
Return Me.m_objSiteMapPath
End Get
End Property

Private ReadOnly Property CurrentUrl() As Uri
Get
Return Me.m_uriCurrentUrl
End Get
End Property

Private ReadOnly Property SiteMapFile() As Uri
Get
Return Me.m_uriSiteMapFile
End Get
End Property

Private Property Depth() As Integer
Get
Return Me.m_intNodeDepth
End Get
Set(ByVal Value As Integer)
Me.m_intNodeDepth = Value
End Set
End Property

Private Sub LoadSiteMapNodes()
Me.m_objXmlReader = New XmlTextReader(SiteMapFile.ToString())
Me.LoadSiteMapXmlFile()
End Sub

Private Sub LoadSiteMapXmlFile()
' Ignore whitespace in web.sitemap file
Me.m_objXmlReader.WhitespaceHandling = WhitespaceHandling.None

' Skip xml declaration and any xml prolog
Me.m_objXmlReader.MoveToContent()

If (Me.m_objXmlReader.IsStartElement("siteMap") = True) Then
' Read past <siteMap> document root element
Me.m_objXmlReader.ReadStartElement("siteMap")
ReadSiteMapNode()
End If
End Sub

Private Sub ReadSiteMapNode()
' Temp branch and leaf nodes for tree traversal
Dim objBranch As SiteMapNode
Dim objLeaf As SiteMapNode

' Read the root node's attributes
ReadNodeAttribs(Me.m_objSiteMapNode)

' Cycle through the web.sitemap file nodes
While (Me.m_objXmlReader.Read())
If (Me.m_objXmlReader.NodeType = XmlNodeType.Element) Then
If (Me.m_objXmlReader.IsEmptyElement() = False) Then
Me.Depth += 1

' On a branch node, so create NodeList for leaves
objBranch = New SiteMapNode(True)
ReadNodeAttribs(objBranch)
Me.m_objSiteMapNode.NodeList.Add(objBranch)
Else
' At leaf, so don't create NodeList
objLeaf = New SiteMapNode(False)
objBranch.NodeList.Add(objLeaf)
ReadNodeAttribs(objLeaf)
End If
Else
If (Me.m_objXmlReader.NodeType = _
XmlNodeType.EndElement) Then

Me.Depth -= 1
End If
End If
End While
End Sub

Private Sub ReadNodeAttribs(ByRef node As SiteMapNode)
' Read title, description, and url attributes for the passed
' node
node.Title = Me.m_objXmlReader.GetAttribute("title")
node.Description = Me.m_objXmlReader.GetAttribute("description")
node.Url = Me.m_objXmlReader.GetAttribute("url")
End Sub

Private Function GetSiteMapPath() As SiteMapPath
Dim objPath As SiteMapPath = New SiteMapPath
Dim objCurrentNode As SiteMapNode = GetCurrentNode()
Dim objTempNode As SiteMapNode = New SiteMapNode
Dim i As Integer = 0
Dim blnFound As Boolean = False

' Always add the root node
objPath.Add(Me.m_objSiteMapNode)

If Not (objCurrentNode Is Me.m_objSiteMapNode) Then
' This loop takes advantage of knowing that the web.sitemap
' file is 3 levels deep. For robustness, this loop should
' make use of recursion instead.
While Not blnFound
objTempNode = Me.m_objSiteMapNode.NodeList.Item(i)
If (objTempNode Is objCurrentNode) Then
objPath.Add(objTempNode)
blnFound = True
Else
If (objTempNode.HasLeaf) Then
For Each objNode As SiteMapNode In _
objTempNode.NodeList
If (objNode Is objCurrentNode) Then
objPath.Add(objTempNode)
objPath.Add(objNode)
blnFound = True
Exit For
End If
Next
End If
End If
i += 1
End While
End If

Return objPath
End Function

Private Function GetCurrentNode() As SiteMapNode
Dim objResultNode As SiteMapNode = New SiteMapNode
Dim objTempNode As SiteMapNode = New SiteMapNode
Dim i As Integer = 0
Dim blnFound As Boolean = False

If (Me.m_objSiteMapNode.Url.Equals( _
Me.CurrentUrl.PathAndQuery)) Then

objResultNode = Me.m_objSiteMapNode
Else
' This loop takes advantage of knowing that the web.sitemap
' file is 3 levels deep. For robustness, this loop should
' make use of recursion instead.
While Not blnFound
objTempNode = Me.m_objSiteMapNode.NodeList.Item(i)
If (objTempNode.Url.Equals( _
Me.CurrentUrl.PathAndQuery)) Then

objResultNode = objTempNode
blnFound = True
Else
If (objTempNode.HasLeaf) Then
For Each objNode As SiteMapNode In _
objTempNode.NodeList

If _
(objNode.Url.Equals( _
Me.CurrentUrl.PathAndQuery)) Then
objResultNode = objNode
blnFound = True
Exit For
End If
Next
End If
End If
i += 1
End While
End If

Return objResultNode
End Function
End Class

End Namespace

图9 SiteMap类

SiteMap类是全部秘密所在;它负责从web.SiteMap文件加载全部节点并生成SiteMapPath对象,然后将该对象公开为只读属性(请参见图9)。因为我们知道Breadcrumb控件只关心呈现导航路径,所以提供SiteMapPath属性是有意义的,原因在于:从本质上说SiteMapPath是控件所关心的唯一对象。还要注意,我们的实现对图2 中显示的SiteMap文件的形状具有硬编码的依赖性。为了提高健壮性,GetSiteMapPath方法应改为使用递归。

当控件加载后,它将通过向SiteMap类传递站点映射文件的当前URL和名称,来创建该类的新实例。SiteMap类中的所有工作都是在构造函数中完成的:首先将所有元素加载到它们自己的SiteMapNode对象中(并将其链接在一起),然后生成SiteMapPath对象。在控件实例化SiteMap以后,它可以只请求SiteMapPath属性以呈现给浏览器。完成这一工作的代码非常简短:

Dim uriFile As Uri = New Uri("http://localhost/nwt/web.SiteMap")
Dim uriUrl As Uri = New Uri("http://localhost/nwt/products.aspx")
Dim objSiteMap As SiteMap = New SiteMap(uriFile, uriUrl)
Dim objPath As SiteMapPath = objSiteMap.SiteMapPath

所有SiteMapNodes的加载都是借助于XmlTextReader完成的,后者由一些私有Helper方法使用。通过检查web.SiteMap文件中的各个是否为空元素,我们可以确定哪些节点是分支,以及哪些节点是叶子(分支等同于嵌套节点,而叶子是非嵌套节点)。如果确定某个节点是分支,则将它添加到父节点的NodeList中,但如果该节点是叶子,则将其添加到当前分支的NodeList中。这同时使我们可以捕获树的深度。

当所有SiteMapNodes加载后,将生成SiteMapPath(这需要首先确定哪个SiteMapNode是当前节点)。像Breadcrumb实现的Visual Studio 2005版本一样,唯一性由给定的URL保证。在遍历各个SiteMapNode时,会将给定的URL与它们的URL属性进行比较,直至找到匹配项为止(随后将退出循环)。既然已经找到当前的SiteMapNode,我们将再次遍历所有节点(总是从根节点到当前节点)以跟踪路径,如GetSiteMapPath方法所示。

Breadcrumb类

Breadcrumb控件的所有服务器端代码都包含在它的自定义控件类中,并可以处理web.SiteMap文件的加载(OnLoad)和HTML的呈现(Render)。它公开了一个枚举—PathDirection,该枚举具有下列值:RootToCurrent(默认值)和CurrentToRoot。还提供了图10 中列出的属性,它们的名称与ASP.NET 2.0中的名称相同。请注意,每个“样式”属性的命名方式都与它们的ASP.NET 2.0对应属性类似,但它们的行为方式稍有不同。各个样式不再是一组属性,而是可以通过样式表设置的个别属性。

属性 描述
PathDirection 和ASP.NET 2.0相同
PathSeparator 和ASP.NET 2.0相同
RenderCurrentNodeAsLink 和ASP.NET 2.0相同
CurrentNodeStyle 给出在 breadcrumb 的当前节点(重载 NodeStyle)
HoverNodeStyle 定义鼠标移动到breadcrumb节点上呈现的样式
NodeStyle 提供所有节点显示时一致的样式
PathSeparatorStyle 设置定义在PathSeparator的文本的样式
RootNodeStyle 定义根节点的样式(重载NodeStyle)

图10 breadcrumb控件属性

Imports System.ComponentModel
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web

Namespace DoughLibrary

Public Enum PathDirection
RootToCurrent
CurrentToRoot
End Enum

Public Class Breadcrumb : Inherits WebControl
Private m_enmPathDirection As PathDirection = _
PathDirection.RootToCurrent
Private m_strPathSeparator As String = String.Empty
Private m_blnRenderCurrentNodeAsLink As Boolean = False
Private m_strCurrentNodeStyle As String = String.Empty
Private m_strHoverNodeStyle As String = String.Empty
Private m_strNodeStyle As String = String.Empty
Private m_strPathSeparatorStyle As String = String.Empty
Private m_strRootNodeStyle As String = String.Empty
Private m_SiteMapPath As SiteMapPath

Private Property SiteMapPath() As SiteMapPath
Get
Return Me.m_SiteMapPath
End Get
Set(ByVal Value As SiteMapPath)
Me.m_SiteMapPath = Value
End Set
End Property

Public Property PathDirection() As PathDirection
Get
Return Me.m_enmPathDirection
End Get
Set(ByVal Value As PathDirection)
Me.m_enmPathDirection = Value
End Set
End Property

Public Property PathSeparator() As String
Get
Return Me.m_strPathSeparator
End Get
Set(ByVal Value As String)
Me.m_strPathSeparator = Value
End Set
End Property

Public Property RenderCurrentNodeAsLink() As Boolean
Get
Return Me.m_blnRenderCurrentNodeAsLink
End Get
Set(ByVal Value As Boolean)
Me.m_blnRenderCurrentNodeAsLink = Value
End Set
End Property

Public Property CurrentNodeStyle() As String
Get
Return Me.m_strCurrentNodeStyle
End Get
Set(ByVal Value As String)
Me.m_strCurrentNodeStyle = Value
End Set
End Property

'Other properties removed for brevity

Public Property PathSeparatorStyle() As String
Get
Return Me.m_strPathSeparatorStyle
End Get
Set(ByVal Value As String)
Me.m_strPathSeparatorStyle = Value
End Set
End Property

Public Property RootNodeStyle() As String
Get
Return Me.m_strRootNodeStyle
End Get
Set(ByVal Value As String)
Me.m_strRootNodeStyle = Value
End Set
End Property

Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
Dim strFile As String = Page.Request.MapPath("web.sitemap")
Dim strPage As String = Page.Request.Url.ToString.ToLower
Dim objSiteMap As SiteMap = New SiteMap(New Uri(strFile), _
New Uri(strPage))
Me.m_SiteMapPath = objSiteMap.SiteMapPath
End Sub

Protected Overrides Sub Render(ByVal output As _
System.Web.UI.HtmlTextWriter)

' SiteMap Class always returns the SiteMapPath in RootToCurrent
' Order. If PathDirection attribute is set to CurrentToRoot,
' reverse the SiteMapPath direction before rendering.
If Me.PathDirection = PathDirection.CurrentToRoot Then
Me.SiteMapPath.Reverse()
End If

' outermost span start element for breadcrumb control
output.AddAttribute(HtmlTextWriterAttribute.Id, Me.ID)
output.RenderBeginTag(HtmlTextWriterTag.Span)

For Each objCrumb As SiteMapNode In Me.SiteMapPath
' start crumb span
output.RenderBeginTag(HtmlTextWriterTag.Span)

' start crumb hyperlink anchor
If Me.SiteMapPath.IndexOf(objCrumb) = 0 Then
If Me.PathDirection = PathDirection.RootToCurrent Then
' set css of 1st crumb: root if RootToCurrent
' direction
output.AddAttribute( _
HtmlTextWriterAttribute.Class, Me.RootNodeStyle)
Else
' set css of 1st crumb: current if CurrentToRoot
' direction
output.AddAttribute( _
HtmlTextWriterAttribute.Class, Me.CurrentNodeStyle)
End If
ElseIf Me.SiteMapPath.IndexOf(objCrumb) = _
(Me.SiteMapPath.Count - 1) Then
If Me.PathDirection = PathDirection.RootToCurrent Then
' set css of last crumb: current if RootToCurrent
' direction
output.AddAttribute(HtmlTextWriterAttribute.Class, _
Me.CurrentNodeStyle)
Else
' set css of last crumb: root if CurrentToRoot
' direction
output.AddAttribute(HtmlTextWriterAttribute.Class, _
Me.RootNodeStyle)
End If
Else
' set css of all other crumbs to the NodeStyle property
' value
output.AddAttribute(HtmlTextWriterAttribute.Class, _
Me.NodeStyle)
End If

If RenderCurrentNodeAsLink = False Then
If ((Me.PathDirection = PathDirection.RootToCurrent) _
AndAlso (Me.SiteMapPath.IndexOf(objCrumb) = _
(Me.SiteMapPath.Count - 1))) Or _
((Me.PathDirection = _
PathDirection.CurrentToRoot) AndAlso _
(Me.SiteMapPath.IndexOf(objCrumb) = 0)) Then

output.RenderBeginTag(HtmlTextWriterTag.Span)
' <span>
output.Write(objCrumb.Title)
output.RenderEndTag() ' </span>
Else
output.AddAttribute(HtmlTextWriterAttribute.Title, _
objCrumb.Description)
output.AddAttribute(HtmlTextWriterAttribute.Href, _
objCrumb.Url)
output.RenderBeginTag(HtmlTextWriterTag.A) ' <a>
output.Write(objCrumb.Title)
output.RenderEndTag() ' </a>
End If
Else
output.AddAttribute(HtmlTextWriterAttribute.Title, _
objCrumb.Description)
output.AddAttribute(HtmlTextWriterAttribute.Href, _
objCrumb.Url)
output.RenderBeginTag(HtmlTextWriterTag.A) ' <a>
output.Write(objCrumb.Title)
output.RenderEndTag() ' </a>
End If

output.RenderEndTag() ' </span> (end crumb span)

' append path separator if not on last crumb
If (Me.SiteMapPath.IndexOf(objCrumb) _
< (Me.SiteMapPath.Count - 1)) Then
output.AddAttribute(HtmlTextWriterAttribute.Class, _
Me.PathSeparatorStyle)
output.RenderBeginTag(HtmlTextWriterTag.Span)
output.Write(Me.PathSeparator)
output.RenderEndTag() ' </span>
End If
Next

output.RenderEndTag() ' </span> (outermost span)
End Sub
End Class
End Namespace

图11 breakcrumb类

在控件的加载事件过程中,创建了一个SiteMap实例,然后控件像刚才介绍的那样获取SiteMapPath。接下来,Render重写方法会按照正确的PathDirection将导航路径输出到浏览器中,并且带有所有关联的样式以完成其外观。图11 显示了该类的代码,而随后的代码片段演示了如何在Web表单上使用该自定义控件。请观察一下这些代码与使用ASP.NET 2.0 SiteMapPath控件所需的代码之间的相似性。

<nwt:breadcrumb
id="Breadcrumb1"
runat="server"
pathseparator=" -> "
currentnodestyle="crumbNode"
nodestyle="crumbNode"
pathseparatorstyle="crumbPathSeparator"
rootnodestyle="crumbNode"
rendercurrentnodeaslink="True"
/>

我们为Breadcrumb控件介绍的所有代码为您提供了一个向Web站点添加导航路径的简单方法。虽然还有提高其健壮性(通过缓存、错误处理和递归)的余地,但设计和编写该控件的主要目的是提高其可扩展性。

小结

如您所见,在目前实现SiteMapPath (Breadcrumb)控件,并使其具有ASP.NET 2.0相应控件所提供的某些功能,需要数百行代码。要在目前实现一个与ASP.NET 2.0版本同样强大的TreeView控件,需要花费大量的时间,并编写成千上万行代码。仅这一点,就足以使您为ASP.NET 2.0中包含的新导航控件而欢呼了,因为所有上述功能及其他功能都以现成的方式提供给您,只需要进行最少量的配置,而且更为重要的是,根本不需要自己编写代码。如果您装备了ASP.NET 2.0,那么将实现您以前做梦都不敢想的导航目标。

作者简介:Dave Donaldson和Steven DeWalt都是大型保险公司的IT架构师顾问。工作之余,他们会忙于为他们的小型软件工作室LoudCarrot Software生成基于.NET的应用程序和服务。您可以访问http://www.loudcarrot.com与他们进行联系。

转自:http://thinhunan.cnblogs.com/archive/2005/12/22/302446.html