Sample vbscript to set Forwarding to external contacts.
Posted on 2010-09-17
I'm using Exchange 2003, and I'm looking for vbscript of sorts that will enable me to configure about 100 users to forward to various contacts as well as set to send to local mailbox. Below is a sample script I found. However, I need to place these users in a spreadsheet. How do I configure the spreadsheet and use it in a script? Any thoughts?
So if Bill Gates wanted to set his email to be forwarded to Steve Ballmer
and also to his mailbox a very simple VBScript to do this might look like
Set objUser = GetObject ("LDAP://CN=Bill Gates,CN=Users,DC=microsoft,DC=com")
objUser.Put "altRecipient", "CN=Steve Ballmer,CN=Users,DC=microsoft,DC=com"
objUser.Put "DeliverandRedirect", True
You could write a slightly more complex script to set these attributes for
all users in a domain or all users in an OU.