Discussion :

[ian13260]

Bonjour,

Je cherche à créer un utilisateur dans mon AD - ce qui est facilement réalisable pour un compte simple - mais avec un compte mail associé.

Faut-il créer tous les attributs msExchxxx, extensionAttributex, etc... ? (et je pense que cela ne suffirai pas)

Bien cordialement?

PS : la quasi totalité de mes recherches aboutissent à la création d'un compte sans mail...

[nasty]

Bonjour

Euh question a 2€. Tu veux faire ca en VB? Si oui, le tuto de Morpheus peut t'aider.

Sinon, bah tu t'es trompé de section.

Nasty

[ian13260]

Merci pour cette réponse...

mais j'avais bien lu ce tuto et il n'indique pas comment créer un compte utilisateur avec un mail associé (mail exchange) et tous les attributs liés à celui-ci.

[ian13260]

Une petite réponse à moi-meme afin de donner la solution trouvée....

il faut importer CDOEXM : nécessite l'installation des outils d'administration exchange sur le poste concerné.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
' Connexion à l'utilisateur
Dim monUser As New DirectoryEntry("LDAP://" & cheminLDAPUser)
Dim mbx As CDOEXM.IMailboxStore = monUser.NativeObject()
mbx.CreateMailbox("LDAP://" & cheminLDAPBanqueBAL)
monUser.CommitChanges()
monUser.Close()

ATTENTION : au début j'établissais la connexion avec Dim monUser As New DirectoryEntry("LDAP://" & cheminLDAPUser, compteAD, mdpAD, AuthenticationTypes.Secure) et j'avais une exception. cf. http://blogs.msdn.com/b/vikas/archiv...m-asp-net.aspx