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

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s

%d bloggers like this: