Change the functional level of a forest (VBScript)

This code can be found in Chapter 3 of Exchange Server Cookbook

Purchase XP Cookbook or Networking Recipes for only $25 plus shipping! While supplies last.

Find out how to download all of the VBScript code from this site.

' This code changes the functional level of the forest.

' From the book "Active Directory Cookbook" by Robbie Allen
' ISBN: 0-596-00466-4

Set objRootDSE = GetObject("LDAP://RootDSE")
Set objDomain = GetObject("LDAP://cn=partitions,"& _
	                       objRootDSE.Get("configurationNamingContext") )
if objDomain.Get("msDS-Behavior-Version") <> 2 then
	Wscript.Echo "Attempting to change forest to " &_
                 "Windows Server 2003 functional level…"
	objDomain.Put "msDS-Behavior-Version", 2
	objDomain.SetInfo
else
	Wscript.Echo "Forest already at Windows Server 2003 functional level"
end if

This code has been viewed 810 times.

New from the creators of TechTasks.com: StatSheet.com