Condividi tramite


QuickLink Class

Represents a quick link.

Inheritance Hierarchy

System.Object
  Microsoft.Office.Server.UserProfiles.PrivacyItem
    Microsoft.Office.Server.UserProfiles.QuickLink

Namespace:  Microsoft.Office.Server.UserProfiles
Assembly:  Microsoft.Office.Server.UserProfiles (in Microsoft.Office.Server.UserProfiles.dll)

Syntax

'Declaration
<SharePointPermissionAttribute(SecurityAction.InheritanceDemand, ObjectModel := True)> _
<SharePointPermissionAttribute(SecurityAction.Demand, ObjectModel := True)> _
Public Class QuickLink _
    Inherits PrivacyItem
'Usage
Dim instance As QuickLink
[SharePointPermissionAttribute(SecurityAction.InheritanceDemand, ObjectModel = true)]
[SharePointPermissionAttribute(SecurityAction.Demand, ObjectModel = true)]
public class QuickLink : PrivacyItem

Examples

The following code example shows the use of the QuickLink class.

[Visual Basic]

      Public Sub QuickLinkSample() 
         'Get portal site context from topology.          Dim strUrl As String = "http://SampleName"          Dim tm As New TopologyManager()          Dim ps As PortalSite = tm.PortalSites(New Uri(strUrl))          Dim pc As PortalContext = PortalApplication.GetContext(ps)           'Initialize user profile config manager object.          Dim upm As New UserProfileManager(pc)          Dim sAccount As String = "mydomain\myalias"          Dim u As UserProfile = upm.GetUserProfile(sAccount)          Dim qlm As QuickLinkManager = u.QuickLinks          Dim strTitle As String = "mylink"          Dim sLinkUrl As String = "http://my"          Dim strGroup As String = "my group"          Dim ql As QuickLink = qlm.Create(strTitle, sLinkUrl, QuickLinkGroupType.UserSpecified, strGroup, Privacy.Public)          Dim iLinkID As Integer = ql.LinkID           'Edit quick link.          Dim qedit As QuickLink = qlm(iLinkID)          qedit.Group = "new group"          qedit.Commit()           'Remove quick link.          qlm.Delete(iLinkID)           'Add another quick link to a person          Dim strTitle2 As String = "mycontact"          Dim sContactAcc As String = "mydomain\mycontact"          Dim ucon As UserProfile = upm.GetUserProfile(sContactAcc)          Dim userguid As Guid = ucon.ID          qlm.AddPerson(strTitle2, userguid, strGroup, False)       End Sub 'QuickLinkSample

[C#]

public void QuickLinkSample() 
{ // Get portal site context from topology. string strUrl = "http://SampleName"; TopologyManager tm = new TopologyManager(); PortalSite ps = tm.PortalSites[new Uri(strUrl)]; PortalContext pc = PortalApplication.GetContext(ps);  // Initialize user profile config manager object. UserProfileManager upm = new UserProfileManager(pc); string sAccount = "mydomain\\myalias"; UserProfile u = upm.GetUserProfile(sAccount); QuickLinkManager qlm = u.QuickLinks; string strTitle = "mylink"; string sLinkUrl = "http://my"; string strGroup = "my group"; QuickLink ql = qlm.Create(strTitle, sLinkUrl, QuickLinkGroupType.UserSpecified, strGroup, Privacy.Public);  // Edit quick link. QuickLink qedit = qlm[iLinkID]; qedit.Group = "new group"; qedit.Commit();  // Remove quick link. qlm.Delete(iLinkID);  // Add another quick link to a person. string strTitle2 = "mycontact"; string sContactAcc = "mydomain\\mycontact"; UserProfile ucon = upm.GetUserProfile(sContactAcc); Guid userguid = ucon.ID; qlm.AddPerson(strTitle2, userguid, strGroup, false);

}

Thread Safety

Any public static (Shared in Visual Basic) members of this type are thread safe. Any instance members are not guaranteed to be thread safe.

See Also

Reference

QuickLink Members

Microsoft.Office.Server.UserProfiles Namespace