Looks simple but it ain't workin for me. I am using code I got from
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss/_cdo_creating_a_mailbox_enabled_recipient.asp
I have the asp running as a domain admin. It fails while trying to create
the user with "objPerson.DataSource.SaveTo". The error code is: 0x80040E21
I've omitted the mailbox create part since it won't even pass the user
creation.
thank you in advance
Below is the code:
Dim objPerson
Set objPerson = CreateObject("CDO.Person")
Dim objMailbox
objPerson.FirstName = "Fred"
objPerson.LastName = "Flintstone"
objPerson.Fields("userPrincipalName") = "Flintstone"
objPerson.Fields("userAccountControl") = 512
objPerson.Fields("userPassword") = "password"
objPerson.Fields.Update
objPerson.DataSource.SaveTo "LDAP://servername/CN=Fred
Flintstone,cn=users,dc=domain,dc=com"
_________________________________________________________________
List posting FAQ: http://www.swinc.com/resource/exch_faq.htm
Archives: http://www.swynk.com/sitesearch/search.asp
To unsubscribe: mailto:[EMAIL PROTECTED]
Exchange List admin: [EMAIL PROTECTED]
