AD上のオブジェクトのプロパティを一括で変更する@ADSI

後から後からごちゃごちゃ追加していったらなんだか訳のわからないVBスクリプトになってしまいました。
たぶん動くと思いますがエラー処理をほぼやっていないので過信しないでください。

このスクリプトは

ADSIを使ってAD上のコンピュータのプロパティの管理者の値をテキストファイルから一括で入れる（削除する）スクリプト

です。

そもそもPCViewなんかを使ってコンピュータを管理していたことがあったんですが、そこから一括でActive Directory上に値を入れられないものかと思って作ってみたわけです。

とりあえずコンピュータオブジェクトの管理者タブに最後にログインしたユーザの名前を入れたくて作ったので

managedBy

以外の値には対応していないです。男らしいでしょ。

テキスト文書を適当に作ってタブ区切りで

PC名ユーザ名

の一覧を作ればあとはVBSを実行するだけです。

管理者タブに値を入力する場合、ユーザのdistinguishedNameを入れないといけないのでそのへんがややこしくなっています。プログラマーの人ならサクッと作るんだろうなーなんて思いながらHey, Scripting Guy!を読みつつ書いていました。

もし使うのであれば“’”が全角になってしまっているのでそこだけ半角に置換して使ってください。

実行にはAD上のオブジェクトを変更できる権限が必要です。

ちなみにこのスクリプトを実行してAD上のオブジェクトがおかしくなったなんて言われても責任取れませんのでよろしくお願いします。