How to get Top Level Sites….

Public Sub GetTopSites() ‘—- This Function Gets the Root Webs —-‘

selectedVs =

New Uri(childexplorer.CmbVirtualServers.SelectedItem.ToString)

childexplorer.TvSites.Nodes.Clear()

SPVirtualServer = SPGlobalAdmin.OpenVirtualServer(selectedVs)

For Each Rootweb As SPSite In SPVirtualServer.Sites

childexplorer.TvSites.Nodes.Add(Rootweb.RootWeb.Url.ToString)

Next

End Sub

Advertisements

• Posted in: Uncategorized