Clearing a value in a user object within AD

[RPLEng]

The following script reads a value in the AD which is okay.

Set adsSystemInfo = CreateObject("ADSystemInfo&quot
Set User = getobject("LDAP://OU=Users,DC=mydomain,DC=com&quot
strCurrentDrive = User.HomeDrive
strCurrentDrivePath = User.HomeDirectory
User.SetInfo

The following code updates an existing value and this works.

Set adsSystemInfo = CreateObject("ADSystemInfo&quot
Set User = getobject("LDAP://OU=Users,DC=mydomain,DC=com&quot
User.HomeDrive = "H:"
User.HomeDirectory = "\\server\user\fred"
User.SetInfo

The following code generates the error indictated at the bottom. It seems I cannot blank an entry in the AD. Any ideas how I can achieve this ?

Set adsSystemInfo = CreateObject("ADSystemInfo&quot
Set User = getobject("LDAP://OU=Users,DC=mydomain,DC=com&quot
User.HomeDrive = empty
User.HomeDirectory = empty
User.SetInfo

ERROR : Unspecified error
Code: 80004005
Source: (Null)


Thanks in advance.

Rich

 

[Ouch]

have you tried

User.HomeDrive = ""
User.HomeDirectory = ""
User.SetInfo

it may not like 'empty'

 

[RPLEng]

Nope. If I use the following then it appears to work but the AD does not accept the change and continues to connect to the old home drive.

User.HomeDrive = " "
User.HomeDirectory = " "
User.SetInfo