Returns a NavigationNodes collection object that represents a collection of all navigation nodes in the current web. Navigation nodes are used to display a graphic representation of the current web in Microsoft FrontPage Navigation view.
expression.AllNavigationNodes
expression Required. An expression that returns one of the objects in the Applies To list.
The following example returns a reference to the NavigationNodes collection and displays the file name of the first object in the collection and the title of the web in which it exists.
Sub AllNavigationNodes()
'Return a collection of all navigation nodes used in the current web
Dim objApp As FrontPage.Application
Dim objNavNode As NavigationNode
Dim objNavNodes As NavigationNodes
Set objApp = FrontPage.Application
'Create a reference to the NavigationNodes collection.
Set objNavNodes = objApp.ActiveWeb.AllNavigationNodes
'Return a reference to the first node in the collection.
Set objNavNode = objNavNodes.Item(0)
'Display the file name and the web of the first
'navigation node in the collection
MsgBox "The URL of this file is " & objNavNode.Url & _
vbCr & ". It is found in the web " _
& objNavNode.Web.Title & "."
End Sub