作成 2010.01.07
更新 2010.01.07
更新 2010.01.07
VBScript で Active Directory ユーザーの移動
このサンプルではUsersに格納されているuser01ユーザーを指定したpeople OUへ移動します。指定したOUがなければ実行エラーになります。
Option Explicit
Dim adsObj, adsMovedUser
Set adsObj = GetObject("LDAP://OU=people,DC=example,DC=lan")
Set adsMovedUser = adsObj.MoveHere("LDAP://CN=user01,CN=Users,DC=example,DC=lan", vbNullString)
WScript.Echo adsMovedUser.ADsPath
参考
VBScript で Active Directory ユーザーの削除 | コンピュータを不明な OU から既知の OU に移動する方法はありますか | IADsContainer インターフェース