Microsoft.Office.Server.UserProfiles
using(var site = new SPSite("http://server/site"))
{
var serviceContext = SPServiceContext.GetContext(site);
var profilePropertyManager = new UserProfileConfigManager(serviceContxt).ProfilePropertyManager;
var corePropertyManager = profilePropertyManager.GetCoreProperties();
// create a new core property
var coreProperty = corePropertyManger.Create(false);
coreProperty.Name = "MyProperty";
coreProperty.DisplayName = "My Property";
coreProperty.Description = "This is a custom property.";
coreProperty.Type = PropertyDataType.String;
coreProperty.Length = 100;
corePropertyManager.Add(coreProperty);
// create a new type property
var typePropertyManager = ProfilePropertyManager.GetProfileTypeProperties(ProfileType.User);
var typeProperty = typePropertyManager.Create(coreProperty);
typeProperty.IsVisibleOnViewer = true;
typePropertyManager.Add(typeProperty);
// create a new subtype property
var profileSubtypeManager = ProfileSubtypeManager.Get(sericeContext);
var profileSubtype = profileSubtypeManager.GetProfileSubtype(ProfileSubtypeManager.GetDefaultProfileName(ProfileType.User));
var profileSubtypePropertyManager = profilePropertyManager.GetProfileSubtypeProperties(profileSubtype.Name);
var profileSubtypeProperty = subtypePropertyManager.Create(typeProperty);
profileSubtypeProperty.IsUserEditable = false;
profileSubtypeProperty.DefaultPrivacy = Privacy.Public;
profileSubtypeProperty.UserOverridePrivacy = true;
profileSubtypePropertyManager.Add(profileSubtypeProperty);
}
