Active Directory Settings

Script to Change Outlook data storage folder:

'MsgBox "Please be sure Outlook Express is closed before you make any changes to the files in the store folder."

Set WshShell = WScript.CreateObject("WScript.Shell")

set net = Wscript.CreateObject("Wscript.Network")

OE_ID = "HKEY_CURRENT_USER\Identities\Default User ID"

OE_ID2 = WshShell.RegRead(OE_ID)

OE_ID3 = "HKEY_CURRENT_USER\Identities\" & OE_ID2 & "\Software\Microsoft\Outlook Express\5.0\Store Root"

cUserName = net.UserName

WshShell.RegWrite OE_ID3, "\\dc\Users\" + cUserName + "\Outlook Express\", "REG_SZ"

Set WshShell = Nothing

Script to manually create Shadow Copy is here

Script to Backup all file to external drive is here