Ajouter un courriel à la liste de distribution de perspectives en utilisant Powershell

Question

Je viens de créer une nouvelle liste de distribution d'Outlook byt il script suivant

$outlook = new-object -com Outlook.Application 
$contacts = $outlook.Session.GetDefaultFolder(10) 
$dl = $contacts.Items.Add("IPM.DistLIst") 
$dl.DLName = "Group A" 
$dl.Save() 

et moi avons une adresse e-mail « manager@abc.com » avec le nom de être "manager"

Comment est-ce que j'utilise powershell pour ajouter ceci à la liste de distribution nouvellement créée?

Je dois utiliser powershell pour une raison quelconque, et je l'ai essayé:

Add-DistributionGroupMember -Idneity "Group A" -Member "manager@abc.com" 

Mais donne cette erreur:

The term 'Add-DistributionGroupMember' is not recognized as the name of a cmdlet, function, 
script file, or operable program. 

S'il vous plaît aider

[UPDATE] maintenant J'ai un script qui fonctionne:

$outlook = new-object -com Outlook.Application 
    $contacts = $outlook.Session.GetDefaultFolder(10) 
    $session = $outlook.Session 
    $session.Logon("Outlook") 
    $namespace = $outlook.GetNamespace("MAPI") 
    $recipient = $namespace.CreateRecipient("John Smith@abc.com") # this has to be an exsiting contact 
    $recipient.Resolve() # check if this returns true 
    $DL = $contacts.Items.Add("IPM.DistList") 
    $DL.DLName = "test dl" 
    $DL.AddMember($recipient) 
    $DL.Save() 

Answer 1

AddMember ne permet de passer un objet de destinataire en tant que paramètre: appel Application.Session.CreateRecipient("manager@abc.com")/Recipient.Resolve/DistListItem.AddMember(Recipient).

Si vous devez ajouter un contact directement, vous pouvez utiliser Redemption et sa méthode .AddContact RDODistListItem.

MISE À JOUR: Redemption, le code suivant ajoute un membre on-off à une nouvelle liste DL:

set Session = CreateObject("Redemption.RDOSession") 
    Session.MAPIOBJECT = Application.Session.MAPIOBJECT 
    set Contacts = Session.GetDefaultFolder(olFolderContacts) 
    set DL = Contacts.Items.Add("IPM.DistList") 
    DL.DLName = "test dl" 
    DL.AddMember("test@dimastr.com") 
    DL.Save