Question : VBScript Exchange 2003 set user storage limit

Good afternoon,

Is it possible to set a user's Exchange storage limit settings using a VBScript? Explicitly I wish to set the 'Prohibit send and receive at (KB)' option. Also, I wish to set the ALLOW right on the 'Associated external account' option on the SELF user - can this be achieved through a VBScript too?

Regards,

Michael

Answer : VBScript Exchange 2003 set user storage limit

Taken from my article (http://www.experts-exchange.com/Programming/Languages/Visual_Basic/VB_Script/A_2859-VBScript-for-Windows-System-Administrators-Part-2.html) on the topic:

"In ADU&C enter some numbers in the "Issue Warning" box, the "Prohibit Send" box and the "Prohibit Send and Receive" box.  Then, open ADSIEdit and go look for them.  Here's the code:"


HTH,
exx

1: 2: 3: 4: 5: 6: 7:

Set oUser = GetObject("CN=Test User,OU=Employees,DC=mydomain,DC=local") oUser.mDBStorageQuota = 250000 oUser.mDBOverQuotaLimit = 275000 oUser.mDBOverHardQuotaLimit = 300000 oUser.SetInfo