Microsoft Sharepoint Products and Technologies Resource Kit eBook

946 Part IX: Maintaining a Server in Windows SharePoint Services
SharePoint farm goes live to save the performance hit of creating the site during
peak times.
C#
public static void Create()
{
//Connect to the portal and get the portal context.
TopologyManager topology = new TopologyManager();
PortalSite portal = topology.PortalSites[new Uri("http://test-server")];
PortalContext context = PortalApplication.GetContext(portal);
//initialize user profile config manager object
UserProfileManager profileManager = new UserProfileManager(context);
foreach (UserProfile profile in profileManager)
{
Console.Write("Creating a Personal Site for " + profile["PreferredName"] + "..." );
try
{
profile.CreatePersonalSite();
Console.Write("Success!\n");
}
catch (PersonalSiteExistsException)
{
Console.Write("Site already exists!\n");
}
catch
{
// Write code to Log or Display Error
}
}
VB.NET
Public Class CreateProfiles
Public Shared Sub Create()
'Connect to the portal and get the portal context.
Dim topology As New TopologyManager
Dim portal As PortalSite = topology.PortalSites(New Uri("http://testserver"))
Dim context As PortalContext = PortalApplication.GetContext(portal)
'initialize user profile config manager object
Dim profileManager As New UserProfileManager(context)
Dim profile As UserProfile
For Each profile In profileManager
Console.Write(("Creating a Personal Site for "
+ profile("PreferredName") + "..."))
Try
profile.CreatePersonalSite()
Console.Write("Success!" + ControlChars.Lf)
Catch
Console.Write("Site Already Exists!" + ControlChars.Lf)
End Try
Next profile
End Sub