TrustedPublishingDomainCollection object

The TrustedPublishingDomainCollection object contains a collection of TrustedPublishingDomain objects. A trusted publishing domain contains the information necessary to enable an AD RMS server in one domain to issue end-user licenses for content that is published by an AD RMS server that resides in another domain under a different root of trust. This information includes the server licensor certificate, private signing key, and rights policy templates associated with the other server.

Members

The TrustedPublishingDomainCollection object has these types of members:

Methods

The TrustedPublishingDomainCollection object has these methods.

MethodDescription
Clear

Removes all objects from the collection (inherited from IList).

Contains

Determines whether the collection contains a specific object (inherited from IList).

CopyTo

Copies the collection elements to an array, starting at a specified index (inherited from ICollection).

Export

Exports the trusted publishing domain data for the current AD RMS server to a file.

Import

Imports an external trusted publishing domain into the collection.

IndexOf

Retrieves the index of a specific object in the collection (inherited from IList).

Refresh

Updates the current collection instance from the collection of trusted publishing domains on the server.

Remove

Removes the first occurrence of the specified object from the collection (inherited from IList).

RemoveAt

Removes the object at the specified index from the collection (inherited from IList).

 

Properties

The TrustedPublishingDomainCollection object has these properties.

PropertyDescription

Count

Retrieves the number of objects contained in the collection (inherited from ICollection).

Item

Specifies or retrieves the object at the specified index (inherited from IList).

 

Examples



DIM config_manager
DIM admin_role

' *******************************************************************
' Create and initialize a ConfigurationManager object.

SUB InitObject()

  CALL WScript.Echo( "Create ConfigurationManager object...")
  SET config_manager = CreateObject _
    ("Microsoft.RightsManagementServices.Admin.ConfigurationManager")      
  CheckError()
    
  CALL WScript.Echo( "Initialize...")
  admin_role=config_manager.Initialize(false,"localhost",80,"","","")
  CheckError()

END SUB

' *******************************************************************
' Retrieve trusted publishing domain information.

SUB GetTPDInfo()

  DIM trustPolicy
  DIM TPDs
  DIM TPD

  ' Retrieve the trust policy object.
  SET trustPolicy = config_manager.Enterprise.TrustPolicy
  CheckError()

  ' Retrieve the trusted publishing domain collection object.
  SET TPDs = trustPolicy.TrustedPublishingDomains
  CheckError()

  ' Import a trusted publishing domain into the collection.
  SET TPD = TPDs.Import( "TPD_Name", _
                         "password"
                         "c:\TPDfile.xml")
  CheckError()

  IF TPDs.Count < 1 OR IsNull(TPD.Id) THEN
    CALL RaiseError(-610, "Import failed.")
  END IF

  CALL WScript.Echo("Trusted publishing domain information: ");
  CALL WScript.Echo("Display name = " & _
                    TPD.DisplayName)
  CALL WScript.Echo("Unique ID = " & _
                    TPD.Id)
  CALL WScript.Echo("Imported = " & _
                    TPD.IsImported)
  CALL WScript.Echo("CSP name = " & _
                    TPD.CryptoSvcProvider)
  CALL WScript.Echo("Key container name = " & _
                    TPD.KeyContainer)

END SUB

' *******************************************************************
' Error checking function.

FUNCTION CheckError()
  CheckError = Err.number
  IF Err.number <> 0 THEN
    CALL WScript.Echo( vbTab & "*****Error Number: " _
                       & Err.number _
                       & " Desc:" _
                       & Err.Description _
                       & "*****")
    WScript.StdErr.Write(Err.Description)
    WScript.Quit( Err.number )
  END IF
END FUNCTION

' *******************************************************************
' Generate a runtime error.

SUB RaiseError(errId, desc)
  CALL Err.Raise( errId, "", desc )
  CheckError()
END SUB


Requirements

Minimum supported client

None supported

Minimum supported server

Windows Server 2008

Assembly

Microsoft.RightsManagementServices.Admin.dll

See also

Active Directory Rights Management Services Scripting API Reference
TrustedPublishingDomain
TrustPolicy

 

 

Show: