Exchange Postfach erstellen per script

[schade 10]

Hallo Kollegen,

wir erstellen unser Benutzer mit Homeverzeichnissen per Script und möchten das auch mit Emailpostfächern tun.

 

Im Script (batch) werden bereits Vorname und Nachname des Benutzers mitangegeben, als Variable 1 und 2.

 

so was in der art:

 

call newprof.exe /parameter

 

wäre super wenn mir da jemand weiterhelfen könnte

[phoenixcp 10]

Womit kann man dir denn helfen? Stell doch mal ne konkrete Frage. ;)

 

Ansonsten werfe ich dir einfach mal das hier hin:

' Source: Microsoft Webseite: Exchange 2000 ASP Guide
org="CompanyA.com"
SG="CompanyA.com,CN=SG A"

' bind to container, create user and set some (basic) settings
Set ou = GetObject("LDAP://OU=" + org + ", DC=MYNET, DC=COM")
Set usr = ou.Create("user", "cn=JSmith")
usr.Put "samAccountName", "jsmith"
usr.givenName = "John"
usr.sn = "Smith"
usr.displayName = "John Smith"
usr.userPrincipalName = jsmith@CompanyA.com
usr.mail = JSmith@CompanyA.com
usr.SetInfo


'use CDOEXM to create mailbox, this is not possible with ADSI
'when using this script take care of the correct names !
Set objMailbox = usr
objMailbox.CreateMailbox ("LDAP://MyNet-BE/CN=" + SG + ",CN=Infor_
mationStore,CN=MyNet-BE,CN=Servers,CN=First Administrative Group,_
CN=Administrative Groups,CN=MyNet ASP,CN=Microsoft Exchange,CN=Se_
rvices,CN=Configuration,DC=MyNet,DC=com")
'use IMailboxStore interface from CDOEXM to set Store Limits
objMailbox.EnableStoreDefaults = FALSE
objMailbox.StoreQuota = 10000
objMailbox.OverQuotaLimit = 12000
objMailbox.HardLimit = 15000

' set password and enable account
usr.setPassword "password"
usr.AccountDisabled = False
usr.SetInfo
wscript.echo "Finished!"
[/Code]

 

Quelle: http://www.msexchangefaq.de/code/makeuser.htm