Fixed it in case anyone is interested. There are a few problems with the
original. Biggest problem is that the "/" in the subnet name needed to be
escaped. Also the "_" character was a typo, and there was a "," missing in
front of "cn=Subnets" .
strNewSiteName = "TESTSite1"
strSubnetName = "10.170.2.0\/24"
Set objRootDSE = GetObject("LDAP://RootDSE")
strConfigurationNC = objRootDSE.Get("configurationNamingContext")
Set objSiteSettings = GetObject("LDAP://cn=" & strSubnetName &
",cn=Subnets,cn=Sites," & strConfigurationNC)
objSiteSettings.Put "siteObject", "cn=" & strNewSiteName & ",cn=Sites," &
strConfigurationNC
objSiteSettings.SetInfo
WScript.Echo("Site Membership updated successfully!")
~ Finally, powerful endpoint security that ISN'T a resource hog! ~
~ <http://www.sunbeltsoftware.com/Business/VIPRE-Enterprise/> ~
